X-Git-Url: https://git.dlugolecki.net.pl/?a=blobdiff_plain;f=gedcom%2Fdate.c;h=a6a8eb52a62d278828e21eb99f8c69a2983881fb;hb=1cb22adafb0696887c3a7544f81898d0685b42b7;hp=9c086e7e2494ccb4de39d7517826ff574acbe710;hpb=d2dbc2834cae06a5de0dec22c0e7a530b7dd1589;p=gedcom-parse.git

diff --git a/gedcom/date.c b/gedcom/date.c
index 9c086e7..a6a8eb5 100644
--- a/gedcom/date.c
+++ b/gedcom/date.c
@@ -416,16 +416,23 @@ struct date_value gedcom_parse_date(const char* line_value)
     result = 1;
   }
   else {
+    compat_date_start();
     init_gedcom_date_lex(line_value);
     gedcom_date_parse();
     close_gedcom_date_lex();
+    if (compat_date_check(&dv_s, &curr_line_value)) {
+      init_gedcom_date_lex(curr_line_value);
+      gedcom_date_parse();
+      close_gedcom_date_lex();
+    }
     if (dv_s.date1.cal != CAL_UNKNOWN)
       result |= numbers_to_sdn(&dv_s.date1);
     if (dv_s.date2.cal != CAL_UNKNOWN)
       result |= numbers_to_sdn(&dv_s.date2);
   }
   if (result != 0) {
-    gedcom_date_error(_("Putting date in 'phrase' member"));
+    gedcom_date_error(_("Putting date '%s' in 'phrase' member"),
+		      curr_line_value);
     make_date_value(DV_PHRASE, &dv_s.date1, &dv_s.date2, curr_line_value);
   }
   return dv_s;