summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2013-12-23 16:33:40 -0800
committerJohn Wiegley <johnw@newartisans.com>2013-12-23 16:33:40 -0800
commit8d38060968b897cb6a365b7c0606770f450e1f18 (patch)
tree1b830059caf514abf20b3428bec8b4d2c8762117
parent4e997836c3437f6fe80deb0d2313614cfab7005d (diff)
parentf18833c78bc05e4ee16aa8e835cc5d9760098912 (diff)
downloadfork-ledger-8d38060968b897cb6a365b7c0606770f450e1f18.tar.gz
fork-ledger-8d38060968b897cb6a365b7c0606770f450e1f18.tar.bz2
fork-ledger-8d38060968b897cb6a365b7c0606770f450e1f18.zip
Merge pull request #225 from 4ourbit/patch-1
fix for unexpected point movement
-rw-r--r--lisp/ledger-context.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ledger-context.el b/lisp/ledger-context.el
index aafcc5d8..eb3d4353 100644
--- a/lisp/ledger-context.el
+++ b/lisp/ledger-context.el
@@ -113,7 +113,7 @@ Leave point at the beginning of the thing under point"
(cond ((looking-at "^[0-9/.=-]+\\(\\s-+\\*\\)?\\(\\s-+(.+?)\\)?\\s-+")
(goto-char (match-end 0))
'transaction)
- ((looking-at "^\\s-+\\([*!]\\s-+\\)?[[(]?\\(.\\)")
+ ((looking-at "^\\s-+\\([*!]\\s-+\\)?[[(]?\\([^\\s-]\\)")
(goto-char (match-beginning 2))
'posting)
((looking-at "^\\(sun\\|mon\\|tue\\|wed\\|thu\\|fri\\|sat\\)\\s-+")