mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
"string-match" uses regexp which can error out if a GNC Account has a
paren in it, or any other regexp special character. Use "string-contains" from srfi-13 instead. Bug reported by Melinda Savoy: http://lists.gnucash.org/pipermail/gnucash-user/2007-January/019028.html BP git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@15414 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
parent
c59bda28a3
commit
860276bc63
@ -5,6 +5,8 @@
|
||||
;;; Bill Gribble <grib@billgribble.com> 20 Feb 2000
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
||||
(use-modules (srfi srfi-13))
|
||||
|
||||
(define GNC-BANK-TYPE 0)
|
||||
(define GNC-CASH-TYPE 1)
|
||||
(define GNC-ASSET-TYPE 2)
|
||||
@ -315,9 +317,8 @@
|
||||
;; this happens if you have the same tree but a different
|
||||
;; top-level structure. (i.e. expenses:tax vs. QIF tax)
|
||||
(and (> (string-length qif-acct-name) 0)
|
||||
(string-match (string-downcase qif-acct-name)
|
||||
(string-downcase (cadr gnc-acct))))))
|
||||
|
||||
(string-contains (string-downcase (cadr gnc-acct))
|
||||
(string-downcase qif-acct-name)))))
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
;; qif-import:find-new-acct
|
||||
|
Loading…
Reference in New Issue
Block a user