# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 959338981 0
# Node ID a243b2d9c015d2fb2bf787a28a423e8bd5d3f366
# Parent  23b17ca41590f5e61f3e39a90a464870cb433896
(unload-feature): Fix interactive spec [from
lijnzaad@ebi.ac.uk].

diff -r 23b17ca41590 -r a243b2d9c015 lisp/loadhist.el
--- 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)