%person;%nn; %if;(evar.t = "SUM"), [revision history] %else;
[difference between the two revisions] %end;

%if;(not cancel_links) %end; %define;no_diff(xx) [*insufficient revision history for %s:::xx] %end; %define;print_summary()

%hidden;

%if;(history_len >= 2) [*compare selected revisions] %else; %apply;no_diff(person) %end; %foreach;history_line; %end;

[*compare]	[*date/dates]0	[*wizard/wizards/friend/friends/exterior]0
	%apply;transl_date%with;%date;%end;	%wizard;

%end; %define;empty() %end; %define;print_diff_person() %if;(before.first_name!=after.first_name or before.surname!=after.surname or before.occ!=after.occ) [*name] %before.first_name;.%before.occ; %before.surname; %after.first_name;.%after.occ; %after.surname; %end; %if;(before.sex!=after.sex) [*sex] %before.sex; %after.sex; %end; %if;(before.public_name!=after.public_name) [*public name] %before.public_name; %after.public_name; %end; %if;(before.image!=after.image) [*image] %before.image; %after.image; %end; %if;(before.qualifiers!=after.qualifiers) [*qualifier] %before.qualifiers; %after.qualifiers; %end; %if;(before.aliases!=after.aliases) [*alias] %before.aliases; %after.aliases; %end; %if;(before.first_names_aliases!=after.first_names_aliases) [*first name alias] %before.first_names_aliases; %after.first_names_aliases; %end; %if;(before.surnames_aliases!=after.surnames_aliases) [*surname alias] %before.surnames_aliases; %after.surnames_aliases; %end; %if;(before.occupation!=after.occupation) [*occupation/occupations]1 %before.occupation; %after.occupation; %end; %foreach;pevent; %if;(before.pevent_name!=after.pevent_name or before.pevent_date!=after.pevent_date or before.pevent_place!=after.pevent_place or before.pevent_note!=after.pevent_note or before.pevent_src!=after.pevent_src or before.pevent_witness!=after.pevent_witness) [*event/events]0 %before.pevent_name; %after.pevent_name; %if;(before.pevent_date!=after.pevent_date) [*date/dates]0 %before.pevent_date; %after.pevent_date; %end; %if;(before.pevent_place!=after.pevent_place) [*place] %before.pevent_place; %after.pevent_place; %end; %if;(before.pevent_note!=after.pevent_note) [*note/notes]0 %before.pevent_note; %after.pevent_note; %end; %if;(before.pevent_src!=after.pevent_src) [*source/sources]0 %before.pevent_src; %after.pevent_src; %end; %if;(before.pevent_witness!=after.pevent_witness) [*witness/witnesses]1 %before.pevent_witness; %after.pevent_witness; %end; %apply;empty() %end; %end; %if;(before.relations!=after.relations) [*relation/relations]1 %before.relations; %after.relations; %end; %if;(before.titles!=after.titles) %apply;empty() [*title/titles]1 %before.titles; %after.titles; %end; %if;(before.psources!=after.psources) [*person source] %before.psources; %after.psources; %end; %if;(before.notes!=after.notes) [*note/notes]1 %before.notes; %after.notes; %end; %if;(before.access!=after.access) %apply;empty() [*access] %before.access; %after.access; %end; %end; %define;print_diff_family() %foreach;family; %foreach;fevent; %if;(before.fevent_name!=after.fevent_name or before.fevent_date!=after.fevent_date or before.fevent_place!=after.fevent_place or before.fevent_note!=after.fevent_note or before.fevent_src!=after.fevent_src or before.fevent_witness!=after.fevent_witness) [*event/events]0 %before.fevent_name;: %before.spouse; %after.fevent_name;: %after.spouse; %if;(before.fevent_date!=after.fevent_date) [*date/dates]0 %before.fevent_date; %after.fevent_date; %end; %if;(before.fevent_place!=after.fevent_place) [*place] %before.fevent_place; %after.fevent_place; %end; %if;(before.fevent_note!=after.fevent_note) [*note/notes]0 %before.fevent_note; %after.fevent_note; %end; %if;(before.fevent_src!=after.fevent_src) [*source/sources]0 %before.fevent_src; %after.fevent_src; %end; %if;(before.fevent_witness!=after.fevent_witness) [*witness/witnesses]1 %before.fevent_witness; %after.fevent_witness; %end; %apply;empty() %end; %end; %if;(before.children!=after.children) [*child/children]1 %before.children; %after.children; %end; %apply;empty() %end; %end; %define;print_diff()

[*revision of]	%apply;transl_date%with;%before.date;%end;	%apply;transl_date%with;%after.date;%end;
[*wizard/wizards/friend/friends/exterior]0	%before.wizard;	%after.wizard;

%apply;print_diff_person() %if;(nb_families > 0) %apply;print_diff_family() %end;

[*person/persons]0

[*family/families]0

%end; %if;(evar.t = "SUM") %apply;print_summary() %else; %apply;print_diff() %end; %include;trl %include;copyr