[Emacs-diffs] /srv/bzr/emacs/trunk r103599: * lisp/net/rcirc.el (rcirc-handler-001): Remove useless

[Deniz Dogan]

------------------------------------------------------------
revno: 103599
committer: Deniz Dogan <address@hidden>
branch nick: emacs-trunk
timestamp: Wed 2011-03-09 11:45:19 +0100
message:
  * lisp/net/rcirc.el (rcirc-handler-001): Remove useless
  with-rcirc-process-buffer.
  (rcirc-check-auth-status): Swap arguments to string-match.
modified:
  lisp/ChangeLog
  lisp/net/rcirc.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-03-09 09:01:14 +0000
+++ b/lisp/ChangeLog    2011-03-09 10:45:19 +0000
@@ -1,3 +1,9 @@
+2011-03-09  Deniz Dogan  <address@hidden>
+
+       * net/rcirc.el (rcirc-handler-001): Remove useless
+       with-rcirc-process-buffer.
+       (rcirc-check-auth-status): Swap arguments to string-match.
+
 2011-03-09  Glenn Morris  <address@hidden>
 
        * shell.el (shell-mode):

=== modified file 'lisp/net/rcirc.el'
--- a/lisp/net/rcirc.el 2011-03-07 12:03:22 +0000
+++ b/lisp/net/rcirc.el 2011-03-09 10:45:19 +0000
@@ -2449,8 +2449,7 @@
     (if rcirc-auto-authenticate-flag
         (if rcirc-authenticate-before-join
             (progn
-              (with-rcirc-process-buffer process
-                (add-hook 'rcirc-authenticated-hook 
'rcirc-join-channels-post-auth t t))
+             (add-hook 'rcirc-authenticated-hook 
'rcirc-join-channels-post-auth t t)
               (rcirc-authenticate))
           (rcirc-authenticate)
           (rcirc-join-channels process rcirc-startup-channels))
@@ -2515,7 +2514,7 @@
                (and ;; quakenet
                 (string= sender "Q")
                 (string= target rcirc-nick)
-                (string-match message "\\`You are now logged in as .+\\.\\'")))
+                (string-match "\\`You are now logged in as .+\\.\\'" message)))
           (setq rcirc-user-authenticated t)
           (run-hook-with-args 'rcirc-authenticated-hook process)
           (remove-hook 'rcirc-authenticated-hook 
'rcirc-join-channels-post-auth t))))))