[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r104088: * lisp/erc/erc-backend.el (6
From: |
Julien Danjou |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r104088: * lisp/erc/erc-backend.el (671): New response handler. |
Date: |
Tue, 03 May 2011 10:37:51 +0200 |
User-agent: |
Bazaar (2.3.1) |
------------------------------------------------------------
revno: 104088
committer: Julien Danjou <address@hidden>
branch nick: trunk
timestamp: Tue 2011-05-03 10:37:51 +0200
message:
* lisp/erc/erc-backend.el (671): New response handler.
* lisp/erc/erc.el (english): Add 671 to catalog.
modified:
lisp/erc/ChangeLog
lisp/erc/erc-backend.el
lisp/erc/erc.el
=== modified file 'lisp/erc/ChangeLog'
--- a/lisp/erc/ChangeLog 2011-04-29 15:23:59 +0000
+++ b/lisp/erc/ChangeLog 2011-05-03 08:37:51 +0000
@@ -1,3 +1,8 @@
+2011-05-03 Debarshi Ray <address@hidden>
+
+ * erc-backend.el (671): New response handler.
+ * erc.el (english): Add 671 to catalog.
+
2011-04-29 Stefan Monnier <address@hidden>
* erc-pcomplete.el (erc-pcomplete-nick-postfix): Remove the " " in the
=== modified file 'lisp/erc/erc-backend.el'
--- a/lisp/erc/erc-backend.el 2011-01-25 04:08:28 +0000
+++ b/lisp/erc/erc-backend.el 2011-05-03 08:37:51 +0000
@@ -1951,6 +1951,13 @@
(erc-display-message parsed '(error notice) 'active 's482
?c channel ?m message)))
+(define-erc-response-handler (671)
+ "Secure connection response in WHOIS." nil
+ (let ((nick (second (erc-response.command-args parsed)))
+ (securemsg (erc-response.contents parsed)))
+ (erc-display-message parsed 'notice 'active 's671
+ ?n nick ?a securemsg)))
+
(define-erc-response-handler (431 445 446 451 462 463 464 481 483 484 485
491 501 502)
;; 431 - No nickname given
=== modified file 'lisp/erc/erc.el'
--- a/lisp/erc/erc.el 2011-04-26 13:50:09 +0000
+++ b/lisp/erc/erc.el 2011-05-03 08:37:51 +0000
@@ -6351,7 +6351,8 @@
(s485 . "You're not the original channel operator")
(s491 . "No O-lines for your host")
(s501 . "Unknown MODE flag")
- (s502 . "You can't change modes for other users")))
+ (s502 . "You can't change modes for other users")
+ (s671 . "%n %a")))
(defun erc-message-english-PART (&rest args)
"Format a proper PART message.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r104088: * lisp/erc/erc-backend.el (671): New response handler.,
Julien Danjou <=