From: Stefan Monnier Date: Wed, 16 Aug 2000 20:51:48 +0000 (+0000) Subject: (unload-feature): Typo. X-Git-Tag: emacs-pretest-21.0.90~2233 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=057ab2946f2ae14fe092c93e3babc1bf1874137a;p=emacs.git (unload-feature): Typo. --- diff --git a/lisp/loadhist.el b/lisp/loadhist.el index 95208bc7908..402a3ce35b9 100644 --- a/lisp/loadhist.el +++ b/lisp/loadhist.el @@ -150,7 +150,7 @@ is nil, raise an error." (if (or (and (boundp x) ; Random hooks. (consp (symbol-value x)) (string-match "-hooks?\\'" (symbol-name x))) - (and (fboundp x) ; Known abnormal hooks etc. + (and (boundp x) ; Known abnormal hooks etc. (memq x loadhist-hook-functions))) (dolist (y (cdr flist)) (remove-hook x y))))))