QIF importer: adjust order of "or" conditions for faster performance.

BP


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@16952 57a11ea4-9604-0410-9ed3-97b8803252fd
2.4
Charles Day 18 years ago
parent 7644d8fd2e
commit e2cff72ade

@ -701,9 +701,9 @@
;; just ignore the format ambiguity. Otherwise, it's really an
;; error. ATM since there's no way to correct the error let's
;; just leave it be.
(if (or (all-formats-equivalent? getter parser equiv-thunk formats
objects printer errormsg errortype)
(eq? on-error 'guess-on-ambiguity))
(if (or (eq? on-error 'guess-on-ambiguity)
(all-formats-equivalent? getter parser equiv-thunk formats
objects printer errormsg errortype))
(set! format (car formats))
(begin
(errormsg errortype formats)

Loading…
Cancel
Save