Commit 221ddf68 authored by Tassilo Horn's avatar Tassilo Horn
Browse files

* net/rcirc.el (rcirc-handler-001): Only authenticate, if there's

an entry for that server in rcirc-authinfo. (Bug#8385)
parent e040639f
2011-03-31 Tassilo Horn <tassilo@member.fsf.org>
* net/rcirc.el (rcirc-handler-001): Only authenticate, if there's
an entry for that server in rcirc-authinfo. (Bug#8385)
2011-03-31 Glenn Morris <rgm@gnu.org>
 
* progmodes/f90.el (f90-find-tag-default): Handle multiple `%'.
......
......@@ -2454,7 +2454,15 @@ keywords when no KEYWORD is given."
(setq rcirc-nick (car args))
(rcirc-update-prompt)
(if rcirc-auto-authenticate-flag
(if rcirc-authenticate-before-join
(if (and rcirc-authenticate-before-join
;; We have to ensure that there's an authentication
;; entry for that server. Else,
;; rcirc-authenticated-hook won't be triggered, and
;; autojoin won't happen at all.
(let (auth-required)
(dolist (s rcirc-authinfo auth-required)
(when (string-match (car s) rcirc-server-name)
(setq auth-required t)))))
(progn
(add-hook 'rcirc-authenticated-hook 'rcirc-join-channels-post-auth t t)
(rcirc-authenticate))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment