diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 6047a6639..6a0553c4f 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -7244,8 +7244,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
@@ -7267,8 +7266,8 @@ agenda."
 	     (not (one-window-p))
 	     (delete-window))))
       (if bury
-	  (bury-buffer buf)
-	(kill-buffer buf)
+	  (bury-buffer)
+	(kill-buffer)
 	(setq org-agenda-archives-mode nil
 	      org-agenda-buffer nil)))))