From 1168a90285ca948ed7398adc364324339814aea1 Mon Sep 17 00:00:00 2001
From: Peter Verthez <Peter.Verthez@advalvas.be>
Date: Mon, 26 Aug 2002 17:58:32 +0000
Subject: [PATCH] Set compatibility variables to sane value at restart.

---
 gedcom/compat.c | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/gedcom/compat.c b/gedcom/compat.c
index 21cac35..d4fdb9f 100644
--- a/gedcom/compat.c
+++ b/gedcom/compat.c
@@ -63,6 +63,11 @@ void gedcom_set_compat_handling(int enable_compat)
 
 void set_compatibility(char* program)
 {
+  /* Reinitialize compatibility */
+  compat_at = 0;
+  default_charset = "";
+  compatibility = 0;
+  
   if (compat_enabled) {
     if (! strncmp(program, "ftree", 6)) {
       gedcom_warning(_("Enabling compatibility with 'ftree'"));
@@ -75,9 +80,6 @@ void set_compatibility(char* program)
       default_charset = "ANSI";
       compat_at = 1;
     }
-    else {
-      compatibility = 0;
-    }
   }
 }
 
-- 
2.30.2