(interactive-form): Fix paren typo.

a27b451e · Miles Bader · 96e29ebe · a27b451e · a27b451e
Commit a27b451e authored Mar 30, 2001 by Miles Bader
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 1 deletion

lisp/ChangeLog lisp/ChangeLog +4 -0

lisp/subr.el lisp/subr.el +1 -1

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
+2001-03-30  Miles Bader  <miles@gnu.org>
+
+	* subr.el (interactive-form): Fix paren typo.
+
 2001-03-29  Eli Zaretskii  <eliz@is.elta.co.il>
  
 	* emacs-lisp/profile.el: Say that it's obsolete in the header

--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -1468,7 +1468,7 @@ If function is a command (see `commandp'), value is a list of the form
 	   (when (stringp (car function))
 	     (setq function (cdr function)))
 	   (let ((form (car function)))
-	     (when (eq (car-safe form 'interactive))
+	     (when (eq (car-safe form) 'interactive)
 	       (copy-sequence form)))))))

 (defun assq-delete-all (key alist)