[Emacs-diffs] /srv/bzr/emacs/trunk r105596: * lisp/net/rcirc.el (rcirc-insert-prev-input)

[Deniz Dogan]

------------------------------------------------------------
revno: 105596
committer: Deniz Dogan <address@hidden>
branch nick: emacs-trunk
timestamp: Sun 2011-08-28 08:07:14 +0200
message:
  * lisp/net/rcirc.el (rcirc-insert-prev-input)
  (rcirc-insert-next-input): Remove unused argument.
modified:
  lisp/ChangeLog
  lisp/net/rcirc.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-08-28 05:15:17 +0000
+++ b/lisp/ChangeLog    2011-08-28 06:07:14 +0000
@@ -1,3 +1,8 @@
+2011-08-28  Deniz Dogan  <address@hidden>
+
+       * net/rcirc.el (rcirc-insert-prev-input)
+       (rcirc-insert-next-input): Remove unused argument.
+
 2011-08-28  Stefan Monnier  <address@hidden>
 
        * shell.el (shell-parse-pcomplete-arguments): Unquote args (bug#9160).

=== modified file 'lisp/net/rcirc.el'
--- a/lisp/net/rcirc.el 2011-08-27 08:28:46 +0000
+++ b/lisp/net/rcirc.el 2011-08-28 06:07:14 +0000
@@ -815,18 +815,19 @@
 
 (defvar rcirc-input-ring nil)
 (defvar rcirc-input-ring-index 0)
+
 (defun rcirc-prev-input-string (arg)
   (ring-ref rcirc-input-ring (+ rcirc-input-ring-index arg)))
 
-(defun rcirc-insert-prev-input (arg)
-  (interactive "p")
+(defun rcirc-insert-prev-input ()
+  (interactive)
   (when (<= rcirc-prompt-end-marker (point))
     (delete-region rcirc-prompt-end-marker (point-max))
     (insert (rcirc-prev-input-string 0))
     (setq rcirc-input-ring-index (1+ rcirc-input-ring-index))))
 
-(defun rcirc-insert-next-input (arg)
-  (interactive "p")
+(defun rcirc-insert-next-input ()
+  (interactive)
   (when (<= rcirc-prompt-end-marker (point))
     (delete-region rcirc-prompt-end-marker (point-max))
     (setq rcirc-input-ring-index (1- rcirc-input-ring-index))