浏览代码

org-agenda-Quit: Remove unnecessary function calls

* lisp/org-agenda.el (org-agenda-Quit): Remove unnecessary function calls.

- org-agenda-Quit turns off column view if it is active, instead of
  killing the agenda buffer, so there is no need to call
  org-columns-remove-overlays when killing the buffer.
- org-agenda-reset-markers is already called when the kill-buffer-hook
  is run.
Kyle Meyer 10 年之前
父节点
当前提交
b4b6584eea
共有 1 个文件被更改,包括 0 次插入4 次删除
  1. 0 4
      lisp/org-agenda.el

+ 0 - 4
lisp/org-agenda.el

@@ -7182,17 +7182,13 @@ Like `org-agenda-quit', but kill the buffer even when
     (let ((buf (current-buffer)))
       (if (eq org-agenda-window-setup 'other-frame)
 	  (progn
-	    (org-agenda-reset-markers)
 	    (kill-buffer buf)
-	    (org-columns-remove-overlays)
 	    (setq org-agenda-archives-mode nil)
 	    (delete-frame))
 	(and (not (eq org-agenda-window-setup 'current-window))
 	     (not (one-window-p))
 	     (delete-window))
-	(org-agenda-reset-markers)
 	(kill-buffer buf)
-	(org-columns-remove-overlays)
 	(setq org-agenda-archives-mode nil)))
     (setq org-agenda-buffer nil)
     ;; Maybe restore the pre-agenda window configuration.