diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2007-10-30 00:14:03 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2007-10-30 00:14:03 +0000 |
| commit | 28d5d98ba5009e4835998bc66a3003253b74554a (patch) | |
| tree | 3e955da73f012fcfcd6234ff1b4b877424fd481f /lisp/loadhist.el | |
| parent | f51aee7c11d3f6b00ea6660d42a1f8e793c50dd0 (diff) | |
| download | emacs-28d5d98ba5009e4835998bc66a3003253b74554a.tar.gz | |
(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).
Diffstat (limited to 'lisp/loadhist.el')
| -rw-r--r-- | lisp/loadhist.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/loadhist.el b/lisp/loadhist.el index cfc3f33168a..5343c3cf34b 100644 --- a/lisp/loadhist.el +++ b/lisp/loadhist.el @@ -200,7 +200,7 @@ something strange, such as redefining an Emacs function." (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 |