tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

org-agenda: Refactoring 

* lisp/org-agenda.el(org-agenda--quit): Removed an unnecessary variable.
This commit is contained in:
Marco Wahl 2015-12-12 19:46:34 +01:00
parent 9b1c682425
commit 700b8e70f6
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/org-agenda.el
View File

@ -7232,8 +7232,7 @@ agenda."
(defun org-agenda--quit (&optional bury)
(if org-agenda-columns-active
(org-columns-quit)
(let ((buf (current-buffer))
(wconf org-agenda-pre-window-conf)
(let ((wconf org-agenda-pre-window-conf)
(org-agenda-last-indirect-window
(and (eq org-indirect-buffer-display 'other-window)
org-agenda-last-indirect-buffer
@ -7256,7 +7255,7 @@ agenda."
(delete-window))))
(if bury
(bury-buffer)
(kill-buffer buf)
(kill-buffer)
(setq org-agenda-archives-mode nil
org-agenda-buffer nil)))))