From: Deniz Dogan <deniz@dogan.se>
Date: Sun, 28 Aug 2011 06:07:14 +0000 (+0200)
Subject: * lisp/net/rcirc.el (rcirc-insert-prev-input)
X-Git-Tag: emacs-pretest-24.0.90~104^2~152^2~51
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=27de4e2048fbf2b3df2328faa5594f00f587ac01;p=emacs.git

* lisp/net/rcirc.el (rcirc-insert-prev-input)
(rcirc-insert-next-input): Remove unused argument.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 552c3f5c088..3840e299cb1 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-08-28  Deniz Dogan  <deniz@dogan.se>
+
+	* net/rcirc.el (rcirc-insert-prev-input)
+	(rcirc-insert-next-input): Remove unused argument.
+
 2011-08-28  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* shell.el (shell-parse-pcomplete-arguments): Unquote args (bug#9160).
diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index de2c3adba95..71b3fe0c4a1 100644
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -815,18 +815,19 @@ If SILENT is non-nil, do not print the message in any irc buffer."
 
 (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))