sfos/ledger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Regex Cleanup

Browse source
This commit is contained in:
Craig Earls 2013-04-04 12:35:20 -07:00
parent 650361a6d3
commit 2e78e61be7
2 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/ldg-reconcile.el
View file

@ -227,8 +227,7 @@ Return the number of uncleared xacts found."
(set-buffer-modified-p nil) (set-buffer-modified-p nil)
(ledger-display-balance) (ledger-display-balance)
(goto-char curpoint) (goto-char curpoint)
;; (ledger-reconcile-visit t) (ledger-reconcile-visit t))))
)))
(defun ledger-reconcile-finish () (defun ledger-reconcile-finish ()
"Mark all pending posting or transactions as cleared. "Mark all pending posting or transactions as cleared.

2
lisp/ldg-regex.el
View file

@ -54,7 +54,7 @@
"^--.+?\\($\\|[ ]\\)") "^--.+?\\($\\|[ ]\\)")
(defconst ledger-account-any-status-regex (defconst ledger-account-any-status-regex
"^[ \t]+\\([*!]\\s-+\\)?[[(]?\\(.+?\\)\\(\t\\|\n\\| [ \t]\\)") "^[ \t]+\\([*!]\\s-+\\)?\\([[(]?.+?\\)\\(\t\\|\n\\| [ \t]\\)")
(defconst ledger-account-pending-regex (defconst ledger-account-pending-regex
"\\(^[ \t]+\\)\\(!.+?\\)\\( \\|$\\)") "\\(^[ \t]+\\)\\(!.+?\\)\\( \\|$\\)")