[nongnu] elpa/csv2ledger d00914d9f1 044/190: c2l-csv-line-to-ledger: Check c2l-fallback-account before asking the user.

[ELPA Syncer]

branch: elpa/csv2ledger
commit d00914d9f1c8742f7edbbbbebd67d3a477be02a5
Author: Joost Kremers <joost.kremers@ipsoft.com>
Commit: Joost Kremers <joost.kremers@ipsoft.com>

    c2l-csv-line-to-ledger: Check c2l-fallback-account before asking the user.
---
 csv2ledger.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/csv2ledger.el b/csv2ledger.el
index 233b0af021..8f169107e9 100644
--- a/csv2ledger.el
+++ b/csv2ledger.el
@@ -261,9 +261,14 @@ for that account."
   "Convert ROW to a ledger entry.
 ROW contains the data of the entry as a list of strings.  The
 strings are interpreted according to the template in
-`c2l-csv-columns'."
+`c2l-csv-columns'.  The transaction is booked to the account in
+`c2l-base-account'.  The reverse account is determined on the
+basis of the matchers in `c2l-account-matchers-file'.  If none is
+found, the value of `c2l-fallback-account' is used.  If that
+option is unset, the user is asked for an account."
   (let* ((fields (--remove (eq (car it) '_) (-zip-pair c2l-csv-columns row)))
          (account (or (-some #'c2l-match-account (mapcar #'cdr (--filter (memq 
(car it) c2l-title-match-fields) fields)))
+                      c2l-fallback-account
                       (completing-read (format "Account for transaction %s, %s 
«%.75s» "
                                                (funcall c2l-title-function 
fields)
                                                (alist-get 'amount fields)