aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2001-11-24 23:57:29 +0000
committerRichard M. Stallman2001-11-24 23:57:29 +0000
commitfa3f40906560f82ba487b752c4d8ecf453306871 (patch)
treec12d8593549f47f92b63b9ae195f7a9611d8271a
parent906bd0efe9cfb93cde4b6423b046971b1fce2390 (diff)
downloademacs-fa3f40906560f82ba487b752c4d8ecf453306871.tar.gz
emacs-fa3f40906560f82ba487b752c4d8ecf453306871.zip
(last-buffer, unbury-buffer): Doc fixes.
-rw-r--r--lisp/bindings.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/bindings.el b/lisp/bindings.el
index 8731e6f5817..495f432b2a0 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -272,15 +272,15 @@ Keymap for what is displayed by `mode-line-mode-name'.")
272(defvar mode-line-mode-menu-keymap nil "\ 272(defvar mode-line-mode-menu-keymap nil "\
273Keymap for mode operations menu in the mode line.") 273Keymap for mode operations menu in the mode line.")
274 274
275(defun last-buffer () " 275(defun last-buffer () "\
276Return the last non-hidden buffer in the buffer list." 276Return the last non-hidden buffer in the buffer list."
277 (let ((list (reverse (buffer-list)))) 277 (let ((list (reverse (buffer-list))))
278 (while (eq (aref (buffer-name (car list)) 0) ? ) 278 (while (eq (aref (buffer-name (car list)) 0) ? )
279 (setq list (cdr list))) 279 (setq list (cdr list)))
280 (car list))) 280 (car list)))
281 281
282(defun unbury-buffer () " 282(defun unbury-buffer () "\
283Switch to the `last-buffer'." 283Switch to the last buffer in the buffer list."
284 (interactive) 284 (interactive)
285 (switch-to-buffer (last-buffer))) 285 (switch-to-buffer (last-buffer)))
286 286