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

2 files changed, 10 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c09e54747be..be15fffb6e5 100644
--- 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 80a59463d79..8cbe1d80cd3 100644
--- 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.