[Emacs-diffs] /srv/bzr/emacs/trunk r108228: Fix a regression in erc-dcc

[Julien Danjou]

------------------------------------------------------------
revno: 108228
committer: Julien Danjou <address@hidden>
branch nick: trunk
timestamp: Mon 2012-05-14 17:42:23 +0200
message:
  Fix a regression in erc-dcc
  
  * erc-dcc.el (erc-dcc-handle-ctcp-send): Fix a regression
  introduced on 2011-11-28 when fixing quoted filenames matching,
  the regex group was not corrected.
modified:
  lisp/erc/ChangeLog
  lisp/erc/erc-dcc.el

=== modified file 'lisp/erc/ChangeLog'
--- a/lisp/erc/ChangeLog        2012-05-13 18:51:14 +0000
+++ b/lisp/erc/ChangeLog        2012-05-14 15:42:23 +0000
@@ -1,3 +1,9 @@
+2012-05-14  Mike Kazantsev  <address@hidden>  (tiny change)
+
+       * erc-dcc.el (erc-dcc-handle-ctcp-send): Fix a regression
+       introduced on 2011-11-28 when fixing quoted filenames matching,
+       the regex group was not corrected.
+
 2012-05-13  Teemu Likonen  <address@hidden>
 
        * erc-backend.el (erc-server-timestamp-format): New variable to

=== modified file 'lisp/erc/erc-dcc.el'
--- a/lisp/erc/erc-dcc.el       2012-04-09 13:05:48 +0000
+++ b/lisp/erc/erc-dcc.el       2012-05-14 15:42:23 +0000
@@ -674,7 +674,7 @@
        ?r "SEND" ?n nick ?u login ?h host))
      ((string-match erc-dcc-ctcp-query-send-regexp query)
       (let ((filename
-             (or (match-string 3 query)
+             (or (match-string 5 query)
                  (erc-dcc-unquote-filename (match-string 2 query))))
             (ip       (erc-decimal-to-ip (match-string 6 query)))
             (port     (match-string 7 query))