branch: elpa/csv2ledger
commit 4f7505922c0daac19411544c1a332d64b184768b
Author: Joost Kremers <joostkrem...@fastmail.fm>
Commit: Joost Kremers <joostkrem...@fastmail.fm>

    Update regex in `c2l-has-header`.
---
 csv2ledger.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/csv2ledger.el b/csv2ledger.el
index b7583574b0..4dae11020b 100644
--- a/csv2ledger.el
+++ b/csv2ledger.el
@@ -287,7 +287,7 @@ like a number."
     (goto-char (point-min))
     (let* ((row (c2l-get-current-row))
            (fields (--remove (eq (car it) '_) (-zip-pair c2l-csv-columns 
row))))
-      (not (string-match-p "[0-9,.-]+" (alist-get 'amount fields))))))
+      (not (string-match-p "[0-9]+[0-9.,]*[.,][0-9]\\{2\\}"  (alist-get 
'amount fields))))))
 
 ;;;###autoload
 (defun c2l-set-base-account ()

Reply via email to