From 3ed1c7616df3b828f50165a0b68b5c16a4d17480 Mon Sep 17 00:00:00 2001 From: John Ralls Date: Sun, 11 Dec 2016 17:21:28 -0800 Subject: [PATCH] =?UTF-8?q?Remove=20QIF=20importer=20error=20=E2=80=9CDate?= =?UTF-8?q?s=20earlier=20than=201970=20are=20not=20supported=E2=80=9D.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Because they are. The parser can’t figure out years earlier than 1930, but that’s not really a major concern. --- src/import-export/qif-imp/qif-to-gnc.scm | 10 +--------- 1 file changed, 1 insertion(+), 9 deletions(-) diff --git a/src/import-export/qif-imp/qif-to-gnc.scm b/src/import-export/qif-imp/qif-to-gnc.scm index 48bed59620..519d6e90a3 100644 --- a/src/import-export/qif-imp/qif-to-gnc.scm +++ b/src/import-export/qif-imp/qif-to-gnc.scm @@ -481,15 +481,7 @@ "Missing transaction date." #f #f)) - ((< (list-ref qif-date 2) 1970) - (qif-import:log progress-dialog - "qif-import:qif-xtn-to-gnc-xtn" - (_ "Dates earlier than 1970 are not supported.")) - (throw 'bad-date - "qif-import:qif-xtn-to-gnc-xtn" - "Invalid transaction year (~A)." - (list (list-ref qif-date 2)) - #f)) + (else (apply xaccTransSetDate gnc-xtn (qif-xtn:date qif-xtn))))