Index: lisp/net/telnet.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/net/telnet.el,v
retrieving revision 1.6
diff -u -r1.6 telnet.el
--- lisp/net/telnet.el	1 Sep 2003 15:45:33 -0000	1.6
+++ lisp/net/telnet.el	9 Feb 2004 08:27:24 -0000
@@ -89,8 +89,8 @@
 rejecting one login and prompting again for a username and password.")
 
 (defun telnet-interrupt-subjob ()
-  (interactive)
   "Interrupt the program running through telnet on the remote host."
+  (interactive)
   (send-string nil telnet-interrupt-string))
 
 (defun telnet-c-z ()
Index: lisp/progmodes/icon.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/progmodes/icon.el,v
retrieving revision 1.27
diff -u -r1.27 icon.el
--- lisp/progmodes/icon.el	1 Sep 2003 15:45:35 -0000	1.27
+++ lisp/progmodes/icon.el	9 Feb 2004 08:27:24 -0000
@@ -243,7 +243,6 @@
       (self-insert-command (prefix-numeric-value arg)))))
 
 (defun icon-indent-command (&optional whole-exp)
-  (interactive "P")
   "Indent current line as Icon code, or in some cases insert a tab character.
 If `icon-tab-always-indent' is non-nil (the default), always indent current
 line.  Otherwise, indent the current line only if point is at the left margin
@@ -253,6 +252,7 @@
 lines of the expression starting after point so that this line becomes
 properly indented.  The relative indentation among the lines of the
 expression are preserved."
+  (interactive "P")
   (if whole-exp
       ;; If arg, always indent this line as Icon
       ;; and shift remaining lines of expression the same amount.
Index: lisp/textmodes/paragraphs.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/textmodes/paragraphs.el,v
retrieving revision 1.68
diff -u -r1.68 paragraphs.el
--- lisp/textmodes/paragraphs.el	27 Jan 2004 07:31:36 -0000	1.68
+++ lisp/textmodes/paragraphs.el	9 Feb 2004 08:27:24 -0000
@@ -430,9 +430,9 @@
     (constrain-to-field nil opoint t)))
 
 (defun repunctuate-sentences ()
-  (interactive)
   "Put two spaces at the end of sentences from point to the end of buffer.
 It works using `query-replace-regexp'."
+  (interactive)
   (query-replace-regexp "\\([]\"')]?\\)\\([.?!]\\)\\([]\"')]?\\) +"
 			"\\1\\2\\3  "))