(twittering-icon-mode): add an argument "P" to 'interactive'.

(twittering-scroll-mode): likewise.
(twittering-jojo-mode): likewise.
(twittering-toggle-reverse-mode): likewise.

ChangeLog

@@ -3,6 +3,12 @@
 	* twittering-mode.el (twittering-extract-timeline-spec): Check STR
 	is non-nil first for avoiding an error caused by `string-match'.
 
+	* twittering-mode.el (twittering-icon-mode): Add an argument "P"
+	to `interactive'.
+	(twittering-scroll-mode): Likewise.
+	(twittering-jojo-mode): Likewise.
+	(twittering-toggle-reverse-mode): Likewise.
+
 2010-02-16  Tadashi MATSUO  <tad@mymail.twin.jp>
 
 	* twittering-mode.el (twittering-get-first-status-head): return

twittering-mode.el

@@ -335,7 +335,7 @@ You should change through function `twittering-icon-mode'.")
   "Toggle display of icon images on timelines.
 With a numeric argument, if the argument is positive, turn on
 icon mode; otherwise, turn off icon mode."
-  (interactive)
+  (interactive "P")
   (setq twittering-icon-mode
 	(if (null arg)
 	    (not twittering-icon-mode)
@@ -2804,23 +2804,23 @@ variable `twittering-status-format'."
     (setq twittering-timer nil)))
 
 (defun twittering-scroll-mode (&optional arg)
-  (interactive)
+  (interactive "P")
   (setq twittering-scroll-mode
 	(if (null arg)
 	    (not twittering-scroll-mode)
 	  (< 0 (prefix-numeric-value arg))))
   (twittering-update-mode-line))
 
 (defun twittering-jojo-mode (&optional arg)
-  (interactive)
+  (interactive "P")
   (setq twittering-jojo-mode
 	(if (null arg)
 	    (not twittering-jojo-mode)
 	  (< 0 (prefix-numeric-value arg))))
   (twittering-update-mode-line))
 
 (defun twittering-toggle-reverse-mode (&optional arg)
-  (interactive)
+  (interactive "P")
   (setq twittering-reverse-mode
 	(if (null arg)
 	    (not twittering-reverse-mode)