summaryrefslogtreecommitdiff
path: root/lisp/net/rcirc.el
diff options
context:
space:
mode:
authorDeniz Dogan <deniz.a.m.dogan@gmail.com>2011-03-09 11:45:19 +0100
committerDeniz Dogan <deniz.a.m.dogan@gmail.com>2011-03-09 11:45:19 +0100
commitc47971d7a31d28dc49a39cccc2523d1e3ed08b10 (patch)
tree92168eb7f45eda41e7da18b95148b16c14ad8e70 /lisp/net/rcirc.el
parent0be6f4f1873153cdbdb84c36f460975a6c95829a (diff)
downloademacs-c47971d7a31d28dc49a39cccc2523d1e3ed08b10.tar.gz
* lisp/net/rcirc.el (rcirc-handler-001): Remove useless
with-rcirc-process-buffer. (rcirc-check-auth-status): Swap arguments to string-match.
Diffstat (limited to 'lisp/net/rcirc.el')
-rw-r--r--lisp/net/rcirc.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index 41e09540631..71aa0dd22bc 100644
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -2449,8 +2449,7 @@ keywords when no KEYWORD is given."
(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 @@ the only argument."
(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))))))