mirror of
https://github.com/Gnucash/gnucash.git
synced 2024-12-01 21:19:16 -06:00
[qif-file.scm] Don't use match as an identifier
It is a (ice-9 match) keyword.
This commit is contained in:
parent
d1de91916e
commit
1f045eb0a5
@ -54,8 +54,7 @@
|
|||||||
(make-regexp "^\\.\\.\\."))
|
(make-regexp "^\\.\\.\\."))
|
||||||
|
|
||||||
(define (not-bad-numeric-string? input)
|
(define (not-bad-numeric-string? input)
|
||||||
(let ((match (regexp-exec qif-bad-numeric-rexp input)))
|
(not (regexp-exec qif-bad-numeric-rexp input)))
|
||||||
(if match #f #t)))
|
|
||||||
|
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
|
Loading…
Reference in New Issue
Block a user