# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1193703243 0
# Node ID 27dd3dfdc98dd06b0aeafdfe8d8dd8a25955e59e
# Parent  65f2523c9f2396b1b4daf859c8de8dade908e193
(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).

diff -r 65f2523c9f23 -r 27dd3dfdc98d lisp/loadhist.el
--- 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