From 509f4505fcd05069180d9ff3d74245001a1391e3 Mon Sep 17 00:00:00 2001 From: Jesse Alama Date: Sat, 21 Feb 2009 14:43:08 -0800 Subject: Bury the report buffer after quitting. --- lisp/ledger.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'lisp') diff --git a/lisp/ledger.el b/lisp/ledger.el index bf3fcbac..33d77926 100644 --- a/lisp/ledger.el +++ b/lisp/ledger.el @@ -982,10 +982,11 @@ the default." (ledger-do-report ledger-report-cmd)) (defun ledger-report-quit () - "Quit the ledger report buffer." + "Quit the ledger report buffer by burying it." (interactive) (ledger-report-goto) - (set-window-configuration ledger-original-window-cfg)) + (set-window-configuration ledger-original-window-cfg) + (bury-buffer (get-buffer ledger-report-buffer-name))) (defun ledger-report-kill () "Kill the ledger report buffer." -- cgit v1.2.3