Mercurial > emacs
changeset 79254:27dd3dfdc98d
(unload-feature): Remove erroneous check for the FEATURE-unload-function
variable; check the existence of the function (that's what the docstring
says, and it makes more sense).
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Tue, 30 Oct 2007 00:14:03 +0000 |
parents | 65f2523c9f23 |
children | 3e37b479924d |
files | lisp/loadhist.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/loadhist.el Tue Oct 30 00:01:11 2007 +0000 +++ b/lisp/loadhist.el Tue Oct 30 00:14:03 2007 +0000 @@ -200,7 +200,7 @@ (unload-func (intern-soft (concat name "-unload-function")))) ;; If FEATURE-unload-function is defined and returns non-nil, ;; don't try to do anything more; otherwise proceed normally. - (unless (and (bound-and-true-p unload-func) + (unless (and unload-func (fboundp unload-func) (funcall unload-func)) ;; Try to avoid losing badly when hooks installed in critical ;; places go away. (Some packages install things on