mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-22 07:09:54 +00:00
Code Issues Releases Activity

(unload-feature): Remove erroneous check for the FEATURE-unload-function

Browse Source 
variable; check the existence of the function (that's what the docstring
says, and it makes more sense).
This commit is contained in:
Juanma Barranquero 2007-10-30 00:14:03 +00:00
parent f51aee7c11
commit 28d5d98ba5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/loadhist.el
View File

@ -200,7 +200,7 @@ something strange, such as redefining an Emacs function."
(unload-func (intern-soft (concat name "-unload-function")))) (unload-func (intern-soft (concat name "-unload-function"))))
;; If FEATURE-unload-function is defined and returns non-nil, ;; If FEATURE-unload-function is defined and returns non-nil,
;; don't try to do anything more; otherwise proceed normally. ;; 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)) (funcall unload-func))
;; Try to avoid losing badly when hooks installed in critical ;; Try to avoid losing badly when hooks installed in critical
;; places go away. (Some packages install things on ;; places go away. (Some packages install things on