X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Fbuffer.el;h=c8292845f71166004069b6e0ab64e77763a3cb44;hp=e7920c0590d732b65180d832d88124e40206534e;hb=ea1ea793fe6e244ef5555ed983423a204101af13;hpb=399b9f4466f37412410de8ec4a08e3dc5504ad10 diff --git a/lisp/buffer.el b/lisp/buffer.el index e7920c0..c829284 100644 --- a/lisp/buffer.el +++ b/lisp/buffer.el @@ -32,9 +32,6 @@ ;;; Code: -(defvar switch-to-buffer-hooks nil - "Hooks to run after a recorded buffer switch.") - (defun switch-to-buffer (bufname &optional norecord) "Select buffer BUFNAME in the current window. BUFNAME may be a buffer or a buffer name and is created if it did not exist. @@ -68,8 +65,6 @@ the window-buffer correspondences." (next-window (minibuffer-window)) (selected-window)) buf) - ;; XEmacs change - (or norecord (run-hook-with-args 'switch-to-buffer-hooks buf)) buf)) (defun pop-to-buffer (bufname &optional not-this-window-p on-frame)