Merge pull request #57 from plathrop/bug/emacs-reconcile-visit

Fix ledger-reconcile-visit.
This commit is contained in:
John Wiegley 2012-03-11 18:50:00 -07:00
commit ed71421c8a

View file

@ -545,7 +545,7 @@ dropped."
(defun ledger-reconcile-visit ()
(interactive)
(let ((where (get-text-property (point) 'where)))
(when (or (equal (car where) "<stdin>") (equal (car where) "/dev/stdin"))
(when (markerp (cdr where))
(switch-to-buffer-other-window ledger-buf)
(goto-char (cdr where)))))