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-xact.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-xact.el')
| -rw-r--r-- | lisp/ldg-xact.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/ldg-xact.el b/lisp/ldg-xact.el index ecd87127..3e4cec4b 100644 --- a/lisp/ldg-xact.el +++ b/lisp/ldg-xact.el @@ -99,9 +99,10 @@ within the transaction." (ignore (goto-char here)))))) (defun ledger-copy-transaction-at-point (date) - "Ask for a new DATE and copy the transaction under point to that date. Leave point on the first amount."(interactive (list - (read-string "Copy to date: " - (concat ledger-year "/" ledger-month "/")))) + "Ask for a new DATE and copy the transaction under point to that date. Leave point on the first amount." + (interactive (list + (read-string "Copy to date: " + (concat ledger-year "/" ledger-month "/") 'ledger-minibuffer-history))) (let* ((here (point)) (extents (ledger-find-xact-extents (point))) (transaction (buffer-substring (car extents) (cadr extents))) |