[Emacs-diffs] /srv/bzr/emacs/trunk r111413: * lisp/erc/erc-backend.el (312): Fix typo.

[Glenn Morris]

------------------------------------------------------------
revno: 111413
fixes bug: http://debbugs.gnu.org/13235
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Thu 2013-01-03 17:31:52 -0800
message:
  * lisp/erc/erc-backend.el (312): Fix typo.
modified:
  lisp/erc/ChangeLog
  lisp/erc/erc-backend.el

=== modified file 'lisp/erc/ChangeLog'
--- a/lisp/erc/ChangeLog        2013-01-02 16:13:04 +0000
+++ b/lisp/erc/ChangeLog        2013-01-04 01:31:52 +0000
@@ -1,3 +1,7 @@
+2013-01-04  Glenn Morris  <address@hidden>
+
+       * erc-backend.el (312): Fix typo.  (Bug#13235)
+
 2012-11-30  Glenn Morris  <address@hidden>
 
        * erc.el (erc-accidental-paste-threshold-seconds): Add :version.

=== modified file 'lisp/erc/erc-backend.el'
--- a/lisp/erc/erc-backend.el   2013-01-02 16:13:04 +0000
+++ b/lisp/erc/erc-backend.el   2013-01-04 01:31:52 +0000
@@ -1633,8 +1633,8 @@
 
 (define-erc-response-handler (312)
   "Server name response in WHOIS." nil
-  (pcase-let ((`(,nick ,server-host))
-              (cdr (erc-response.command-args parsed)))
+  (pcase-let ((`(,nick ,server-host)
+              (cdr (erc-response.command-args parsed))))
     (erc-display-message
      parsed 'notice 'active 's312
      ?n nick ?s server-host ?c (erc-response.contents parsed))))