From dfa30891c7fb2569312b9c0c759bc257a8064314 Mon Sep 17 00:00:00 2001 From: Charles Day Date: Sun, 22 Mar 2009 17:24:58 +0000 Subject: [PATCH] QIF Import: Support backslash characters in category names. There was a mistake the regular expression, as a pipe symbol shouldn't be escaped with a backslash when used inside brackets. git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@17998 57a11ea4-9604-0410-9ed3-97b8803252fd --- src/import-export/qif-import/qif-parse.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/import-export/qif-import/qif-parse.scm b/src/import-export/qif-import/qif-parse.scm index 1a93c93578..4dbe68505e 100644 --- a/src/import-export/qif-import/qif-parse.scm +++ b/src/import-export/qif-import/qif-parse.scm @@ -6,7 +6,7 @@ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (define qif-category-compiled-rexp - (make-regexp "^ *(\\[)?([^]/\\|]*)(]?)(/?)([^\\|]*)(\\|(\\[)?([^]/]*)(]?)(/?)(.*))? *$")) + (make-regexp "^ *(\\[)?([^]/|]*)(]?)(/?)([^|]*)(\\|(\\[)?([^]/]*)(]?)(/?)(.*))? *$")) (define qif-date-compiled-rexp (make-regexp "^ *([0-9]+) *[-/.'] *([0-9]+) *[-/.'] *([0-9]+).*$|^ *([0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]).*$"))