bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#2737: marked as done ([PATCH] Emacs CVS: (rcirc): Save call args to


From: Emacs bug Tracking System
Subject: bug#2737: marked as done ([PATCH] Emacs CVS: (rcirc): Save call args to history variables)
Date: Wed, 15 Jul 2009 16:05:17 +0000

Your message dated Wed, 15 Jul 2009 11:08:46 -0400
with message-id <address@hidden>
and subject line Re: [PATCH] Emacs CVS: (rcirc): Save call args to history 
variables
has caused the Emacs bug report #2737,
regarding [PATCH] Emacs CVS: (rcirc): Save call args to history variables
to be marked as done.

This means that you claim that the problem has been dealt with.
If this is not the case it is now your responsibility to reopen the
bug report if necessary, and/or fix the problem forthwith.

(NB: If you are a system administrator and have no idea what this
message is talking about, this may indicate a serious mail system
misconfiguration somewhere. Please contact address@hidden
immediately.)


-- 
2737: http://emacsbugs.donarmstrong.com/cgi-bin/bugreport.cgi?bug=2737
Emacs Bug Tracking System
Contact address@hidden with problems
--- Begin Message --- Subject: [PATCH] Emacs CVS: (rcirc): Save call args to history variables Date: Sat, 21 Mar 2009 18:28:14 +0200
Patch against CVS as of 2009-03-21 16:27 UTC

2009-03-21  Jari Aalto  <address@hidden>

        * net/rcirc.el (rcirc-history-server-name)
        (rcirc-history-server-port)
        (rcirc-history-nick-name): new variables.
        (rcirc): Use history variables.

>From 02c1deb5855e78168aab74b1199a48b72eb9656b Mon Sep 17 00:00:00 2001
From: Jari Aalto <address@hidden>
Date: Sat, 21 Mar 2009 18:25:11 +0200
Subject: [PATCH] lisp/net/rcirc.el: (rcirc): Save call args to history variables

---
 lisp/net/rcirc.el |   18 +++++++++++++++---
 1 files changed, 15 insertions(+), 3 deletions(-)

diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index f63237f..de4bdeb 100644
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -359,6 +359,15 @@ and the cdr part is used for encoding."
 
 (defvar rcirc-startup-channels nil)
 
+(defvar rcirc-history-server-name nil
+  "History variable for \\[rcirc] call.")
+
+(defvar rcirc-history-server-port nil
+  "History variable for \\[rcirc] call.")
+
+(defvar rcirc-history-nick-name nil
+  "History variable for \\[rcirc] call.")
+
 ;;;###autoload
 (defun rcirc (arg)
   "Connect to all servers in `rcirc-server-alist'.
@@ -371,15 +380,18 @@ If ARG is non-nil, instead prompt for connection 
parameters."
       (let* ((server (completing-read "IRC Server: "
                                      rcirc-server-alist
                                      nil nil
-                                     (caar rcirc-server-alist)))
+                                     (caar rcirc-server-alist)
+                                     'rcirc-history-server-name))
             (server-plist (cdr (assoc-string server rcirc-server-alist)))
             (port (read-string "IRC Port: "
                                (number-to-string
                                 (or (plist-get server-plist 'port)
-                                    rcirc-default-port))))
+                                    rcirc-default-port))
+                               'rcirc-history-server-port))
             (nick (read-string "IRC Nick: "
                                (or (plist-get server-plist 'nick)
-                                   rcirc-default-nick)))
+                                   rcirc-default-nick)
+                               'rcirc-history-nick-name))
             (channels (split-string
                        (read-string "IRC Channels: "
                                     (mapconcat 'identity
-- 
1.6.1.3


--- End Message ---
--- Begin Message --- Subject: Re: [PATCH] Emacs CVS: (rcirc): Save call args to history variables Date: Wed, 15 Jul 2009 11:08:46 -0400
I've checked this patch into the trunk.  (I renamed your history
variables from rcirc-history-* to rcirc-*-history, for conformity.)

Thanks.

--- End Message ---

reply via email to

[Prev in Thread] Current Thread [Next in Thread]