diff options
author | Craig Earls <enderw88@gmail.com> | 2013-03-18 11:46:45 -0700 |
---|---|---|
committer | Craig Earls <enderw88@gmail.com> | 2013-03-18 11:46:45 -0700 |
commit | 5324afbd9b247cb6e6c4e079fb4ab9c02a66f2fd (patch) | |
tree | 4c0737037aaebf3cb55cec8374f4668d3357a946 /lisp/ldg-occur.el | |
parent | 43ef1df6ab4e9f3c718cb6093c8acc517a888351 (diff) | |
parent | 8d73979abf87e3910bd040fb4b549b7d4c98a8c2 (diff) | |
download | fork-ledger-5324afbd9b247cb6e6c4e079fb4ab9c02a66f2fd.tar.gz fork-ledger-5324afbd9b247cb6e6c4e079fb4ab9c02a66f2fd.tar.bz2 fork-ledger-5324afbd9b247cb6e6c4e079fb4ab9c02a66f2fd.zip |
Merge branch 'next' into ledger-mode-automatic-transactions
Diffstat (limited to 'lisp/ldg-occur.el')
-rw-r--r-- | lisp/ldg-occur.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/ldg-occur.el b/lisp/ldg-occur.el index 8b56d12c..35ca7f3d 100644 --- a/lisp/ldg-occur.el +++ b/lisp/ldg-occur.el @@ -49,7 +49,7 @@ (defvar ledger-occur-history nil "History of previously searched expressions for the prompt.") -(make-variable-buffer-local 'ledger-occur-history) +;;(make-variable-buffer-local 'ledger-occur-history) (defvar ledger-occur-last-match nil "Last match found.") @@ -95,8 +95,7 @@ When REGEX is nil, unhide everything, and remove higlight" (if ledger-occur-mode (list nil) (list (read-string (concat "Regexp<" (ledger-occur-prompt) - ">: ") "" 'ledger-occur-history )))) - (if (string-equal "" regex) (setq regex (ledger-occur-prompt))) + ">: ") nil 'ledger-occur-history (ledger-occur-prompt))))) (ledger-occur-mode regex (current-buffer))) (defun ledger-occur-prompt () |