ledger-read-date': Use ledger-minibuffer-history'.

This commit is contained in:
Moritz Ulrich 2014-01-02 18:55:25 +01:00
parent 09ef323a73
commit 8406adce0e

View file

@ -102,7 +102,8 @@
(defun ledger-read-date (prompt)
"Returns user-supplied date after `PROMPT', defaults to today."
(let* ((default (ledger-year-and-month))
(date (read-string prompt default)))
(date (read-string prompt default
'ledger-minibuffer-history)))
(if (or (string= date default)
(string= "" date))
(format-time-string