diff options
-rw-r--r-- | lisp/ldg-commodities.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/ldg-commodities.el b/lisp/ldg-commodities.el index 7dc0a900..e7014604 100644 --- a/lisp/ldg-commodities.el +++ b/lisp/ldg-commodities.el @@ -39,8 +39,8 @@ (insert str) (goto-char (point-min)) (if (assoc "decimal-comma" ledger-environment-alist) - (setq number-regex "-?[1-9][0-9.]*[,][0-9]*") - (setq number-regex "-?[1-9][0-9,]*[.][0-9]*")) + (setq number-regex "-?[1-9][0-9.]*[,]?[0-9]*") + (setq number-regex "-?[1-9][0-9,]*[.]?[0-9]*")) (cond ((re-search-forward number-regex nil t) ;; found a decimal number (setq val |