[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/subr.el
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/subr.el |
Date: |
Mon, 03 Nov 2003 09:44:50 -0500 |
Index: emacs/lisp/subr.el
diff -c emacs/lisp/subr.el:1.365 emacs/lisp/subr.el:1.366
*** emacs/lisp/subr.el:1.365 Mon Oct 20 19:41:18 2003
--- emacs/lisp/subr.el Mon Nov 3 09:44:48 2003
***************
*** 856,864 ****
(set (make-local-variable hook) (list t)))
;; Detect the case where make-local-variable was used on a hook
;; and do what we used to do.
! (when (and (local-variable-p hook)
! (not (and (consp (symbol-value hook))
! (memq t (symbol-value hook)))))
(setq local t)))
(let ((hook-value (if local (symbol-value hook) (default-value hook))))
;; If the hook value is a single function, turn it into a list.
--- 856,862 ----
(set (make-local-variable hook) (list t)))
;; Detect the case where make-local-variable was used on a hook
;; and do what we used to do.
! (unless (and (consp (symbol-value hook)) (memq t (symbol-value hook)))
(setq local t)))
(let ((hook-value (if local (symbol-value hook) (default-value hook))))
;; If the hook value is a single function, turn it into a list.
- [Emacs-diffs] Changes to emacs/lisp/subr.el,
Stefan Monnier <=
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Thien-Thi Nguyen, 2003/11/14
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Kim F. Storm, 2003/11/22
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Luc Teirlinck, 2003/11/26
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Kim F. Storm, 2003/11/27
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Jonathan Yavner, 2003/11/30