summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorthdox <thdox@free.fr>2015-02-26 18:14:15 +0100
committerthdox <thdox@free.fr>2015-03-23 23:47:42 +0100
commitd3344243c94fb591c0f78131f63beb3a423b5138 (patch)
treef1df555b22405399fcb63e4508cdb3f147648eca /lisp
parentc7fa772310bacf57a185e47efb1c07c83b902a59 (diff)
downloadfork-ledger-d3344243c94fb591c0f78131f63beb3a423b5138.tar.gz
fork-ledger-d3344243c94fb591c0f78131f63beb3a423b5138.tar.bz2
fork-ledger-d3344243c94fb591c0f78131f63beb3a423b5138.zip
[emacs] Fix bug 1108, enabling correct account context.
The old way of working was keeping spaces before and after the account. Now the space before is associated to the "status" and "separator" is enlarged to not be maxed to 2 chars [ci skip]
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ledger-context.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/ledger-context.el b/lisp/ledger-context.el
index 0dfa4645..643ebdd3 100644
--- a/lisp/ledger-context.el
+++ b/lisp/ledger-context.el
@@ -32,9 +32,9 @@
;; `ledger-single-line-config' macro to form the regex and list of
;; elements
(defconst ledger-indent-string "\\(^[ \t]+\\)")
-(defconst ledger-status-string "\\([*! ]?\\)")
+(defconst ledger-status-string "\\(* \\|! \\)?")
(defconst ledger-account-string "[\\[(]?\\(.*?\\)[])]?")
-(defconst ledger-separator-string "\\s-\\s-")
+(defconst ledger-separator-string "\\s-\\s-+")
(defconst ledger-amount-string "\\(-?[0-9]+[\\.,][0-9]*\\)")
(defconst ledger-comment-string "[ \t]*;[ \t]*\\(.*?\\)")
(defconst ledger-nil-string "\\([ \t]\\)")