[emacs] Fix bug 1104 handle no ledger-reconcile-buffer-header

This commit is contained in:
Craig Earls 2015-01-19 19:23:25 -07:00
parent 6547448676
commit a65033b66c

View file

@ -387,7 +387,8 @@ Return a count of the uncleared transactions."
(fmt (ledger-reconcile-compile-format-string ledger-reconcile-buffer-line-format)))
(if (and ledger-success (> (length xacts) 0))
(progn
(insert (format ledger-reconcile-buffer-header account))
(if ledger-reconcile-buffer-header
(insert (format ledger-reconcile-buffer-header account)))
(dolist (xact xacts)
(ledger-reconcile-format-xact xact fmt))
(goto-char (point-max))