Start of Pro-Gen GEDCOM support

svn: r635
This commit is contained in:
Don Allingham 2001-12-19 03:33:23 +00:00
parent ac61d1b767
commit 093da4ca66
2 changed files with 14 additions and 0 deletions

View File

@ -35,6 +35,7 @@ ALT_NAME_STD = 1
ALT_NAME_ALIAS = 2
ALT_NAME_AKA = 3
ALT_NAME_EVENT_AKA = 4
ALT_NAME_UALIAS = 5
CALENDAR_NO = 0
CALENDAR_YES = 1
OBJE_NO = 0
@ -206,6 +207,8 @@ class GedInfoParser:
self.current.set_alt_name(ALT_NAME_ALIAS)
elif val == 'aka':
self.current.set_alt_name(ALT_NAME_AKA)
elif val == '_alias':
self.current.set_alt_name(ALT_NAME_UALIAS)
elif tag == "calendars":
if u2l(attrs['val']) == 'no':
self.current.set_alt_calendar(CALENDAR_NO)

View File

@ -92,6 +92,17 @@
<object_support val="no"/>
<residence val="address"/>
</target>
<target name="Pro-Gen">
<dest val="PRO-GEN"/>
<adopt val="none"/>
<conc val="broken"/>
<alternate_names val="_alias"/>
<calendar val="no"/>
<extended_events>
</extended_events>
<object_support val="no"/>
<residence val="address"/>
</target>
<target name="Visual Genealogie">
<dest val=""/>
<adopt val="none"/>