gnucash maint: [qif-file.scm] Don't use match as an identifier

Christopher Lam clam at code.gnucash.org
Wed Jan 20 09:23:01 EST 2021


Updated	 via  https://github.com/Gnucash/gnucash/commit/1f045eb0 (commit)
	from  https://github.com/Gnucash/gnucash/commit/d1de9191 (commit)



commit 1f045eb0a56659443bfdf0e710ac29b9897a394d
Author: Christopher Lam <christopher.lck at gmail.com>
Date:   Tue Jan 19 19:30:20 2021 +0800

    [qif-file.scm] Don't use match as an identifier
    
    It is a (ice-9 match) keyword.

diff --git a/gnucash/import-export/qif-imp/qif-file.scm b/gnucash/import-export/qif-imp/qif-file.scm
index 1429b5483..500073aae 100644
--- a/gnucash/import-export/qif-imp/qif-file.scm
+++ b/gnucash/import-export/qif-imp/qif-file.scm
@@ -54,8 +54,7 @@
   (make-regexp "^\\.\\.\\."))
 
 (define (not-bad-numeric-string? input)
-  (let ((match (regexp-exec qif-bad-numeric-rexp input)))
-    (if match #f #t)))
+  (not (regexp-exec qif-bad-numeric-rexp input)))
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;



Summary of changes:
 gnucash/import-export/qif-imp/qif-file.scm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)



More information about the gnucash-changes mailing list