From 6e88b3b18d2b7815c1a6b4cf97075c31fed2c986 Mon Sep 17 00:00:00 2001
From: Don Allingham <don@gramps-project.org>
Date: Wed, 19 Dec 2001 03:33:23 +0000
Subject: [PATCH] Start of Pro-Gen GEDCOM support

svn: r635
---
 src/GedcomInfo.py   |  3 +++
 src/data/gedcom.xml | 11 +++++++++++
 2 files changed, 14 insertions(+)

diff --git a/src/GedcomInfo.py b/src/GedcomInfo.py
index e2b166f83..d8ea50b28 100644
--- a/src/GedcomInfo.py
+++ b/src/GedcomInfo.py
@@ -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)
diff --git a/src/data/gedcom.xml b/src/data/gedcom.xml
index 00d7eba08..53923950f 100644
--- a/src/data/gedcom.xml
+++ b/src/data/gedcom.xml
@@ -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"/>