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

It is a (ice-9 match) keyword.

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)))
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;