sfos/ledger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Take care to not delete some random buffer when exiting reconcile

Browse source
This commit is contained in:
Rémi Vanicat 2013-02-09 19:29:04 +01:00
parent f89d6c4419
commit 69efea6c54
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/ldg-reconcile.el
View file

@ -172,14 +172,15 @@
(defun ledger-reconcile-quit ()
(interactive)
(let ((buf ledger-buf))
(let ((buf ledger-buf)
(reconcile-buf (current-buffer)))
(with-current-buffer ledger-buf
(remove-hook 'after-save-hook 'ledger-reconcile-refresh-after-save t))
;Make sure you delete the window before you delete the buffer,
;otherwise, madness ensues
(delete-window (get-buffer-window (current-buffer)))
(kill-buffer (current-buffer))
(delete-window (get-buffer-window reconcile-buf))
(kill-buffer (reconcile-buf))
(if ledger-fold-on-reconcile
(ledger-occur-quit-buffer buf))))