r15112 - gnucash/trunk/src/import-export/qif-import - Fix some #f vs. '() issues in qif import files.

Chris Shoemaker chris at cvs.gnucash.org
Mon Nov 13 21:07:04 EST 2006


Author: chris
Date: 2006-11-13 21:07:03 -0500 (Mon, 13 Nov 2006)
New Revision: 15112
Trac: http://svn.gnucash.org/trac/changeset/15112

Modified:
   gnucash/trunk/src/import-export/qif-import/qif-merge-groups.scm
   gnucash/trunk/src/import-export/qif-import/qif-to-gnc.scm
Log:
Fix some #f vs. '() issues in qif import files.


Modified: gnucash/trunk/src/import-export/qif-import/qif-merge-groups.scm
===================================================================
--- gnucash/trunk/src/import-export/qif-import/qif-merge-groups.scm	2006-11-14 02:05:28 UTC (rev 15111)
+++ gnucash/trunk/src/import-export/qif-import/qif-merge-groups.scm	2006-11-14 02:07:03 UTC (rev 15112)
@@ -35,7 +35,7 @@
   ;; trying to find matches in the new group.  If there are matches, 
   ;; push the matches onto a list. 
   (let* ((new-xtns (gnc:group-get-transactions new-group))
-	 (progress-dialog #f)
+	 (progress-dialog '())
 	 (work-to-do (length new-xtns))
 	 (work-done 0)
          (matches '()))    

Modified: gnucash/trunk/src/import-export/qif-import/qif-to-gnc.scm
===================================================================
--- gnucash/trunk/src/import-export/qif-import/qif-to-gnc.scm	2006-11-14 02:05:28 UTC (rev 15111)
+++ gnucash/trunk/src/import-export/qif-import/qif-to-gnc.scm	2006-11-14 02:07:03 UTC (rev 15112)
@@ -193,7 +193,7 @@
                    (lambda (a b)
                      (> (length (qif-file:xtns a)) 
                         (length (qif-file:xtns b))))))
-            (progress-dialog #f)
+            (progress-dialog '())
             (work-to-do 0)
             (work-done 0))
        



More information about the gnucash-changes mailing list