(rcirc-authenticate): Simplify previous change.
This commit is contained in:
@@ -1,3 +1,7 @@
|
||||
2009-10-16 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* net/rcirc.el (rcirc-authenticate): Simplify previous change.
|
||||
|
||||
2009-10-16 Toru TSUNEYOSHI <t_tuneyosi@hotmail.com>
|
||||
|
||||
* net/ange-ftp.el (ange-ftp-send-cmd): Handle `size' like `mdtm'.
|
||||
|
||||
@@ -2561,12 +2561,10 @@ Passwords are stored in `rcirc-authinfo' (which see)."
|
||||
(when (and (string-match server rcirc-server)
|
||||
(string-match nick rcirc-nick))
|
||||
(cond ((equal method 'nickserv)
|
||||
(let ((password (car args))
|
||||
(nickserv-nick (or (cadr args) "nickserv")))
|
||||
(rcirc-send-string
|
||||
process
|
||||
(concat "PRIVMSG " nickserv-nick " :identify "
|
||||
password))))
|
||||
(concat "PRIVMSG " (or (cadr args) "nickserv")
|
||||
" :identify " (car args))))
|
||||
((equal method 'chanserv)
|
||||
(rcirc-send-string
|
||||
process
|
||||
|
||||
Reference in New Issue
Block a user