changeset 29241:a243b2d9c015

(unload-feature): Fix interactive spec [from lijnzaad@ebi.ac.uk].
author Dave Love <fx@gnu.org>
date Fri, 26 May 2000 11:03:01 +0000
parents 23b17ca41590
children 7dbdb696fd23
files lisp/loadhist.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/loadhist.el	Fri May 26 10:35:38 2000 +0000
+++ b/lisp/loadhist.el	Fri May 26 11:03:01 2000 +0000
@@ -116,9 +116,9 @@
 ;;;###autoload
 (defun unload-feature (feature &optional force)
   "Unload the library that provided FEATURE, restoring all its autoloads.
-If the feature is required by any other loaded code, and optional FORCE
+If the feature is required by any other loaded code, and prefix arg FORCE
 is nil, raise an error."
-  (interactive (list (read-feature "Feature: ")))
+  (interactive (list (read-feature "Feature: ") current-prefix-arg))
   (if (not (featurep feature))
       (error "%s is not a currently loaded feature" (symbol-name feature)))
   (if (not force)