(unload-hook-features-list): New defvar.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c09e54747bee46d176db42f49cdcb5d919cbc5a2..be15fffb6e526a5bdcc6553af161d419e890e395 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2004-02-16  Eli Zaretskii  <eliz@elta.co.il>
+
+       * loadhist.el (unload-hook-features-list): New defvar.
+
 2004-02-16  Dave Love  <fx@gnu.org>
 
        * loadhist.el (unload-feature): Doc fix.  Rename flist to

diff --git a/lisp/loadhist.el b/lisp/loadhist.el
index 80a59463d796dd872f72603a88e252fe1f3dfbb0..8cbe1d80cd39864fb87a75f91473327530c03580 100644 (file)
--- a/lisp/loadhist.el
+++ b/lisp/loadhist.el
@@ -116,6 +116,12 @@ These are symbols with hook-type values whose names don't end in
 `-hook' or `-hooks', from which `unload-feature' tries to remove
 pertinent symbols.")
 
+(defvar unload-hook-features-list nil
+  "List of features of the package being unloaded.
+
+This is meant to be used by FEATURE-unload-hook hooks, see the
+documentation of `unload-feature' for details.")
+
 ;;;###autoload
 (defun unload-feature (feature &optional force)
   "Unload the library that provided FEATURE, restoring all its autoloads.