From: Eli Zaretskii <eliz@is.elta.co.il>
Date: Mon, 16 Feb 2004 17:50:32 +0000 (+0000)
Subject: (unload-hook-features-list): New defvar.
X-Git-Tag: ttn-vms-21-2-B4~7589
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dffc4dfc5d0cffee98e8668f1be8b3ae1ed0588e;p=emacs.git

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

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.