mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(rcirc-authenticate): Simplify previous change.

Browse source
This commit is contained in:
Glenn Morris 2009-10-16 16:03:33 +00:00
parent 412707c2e9
commit b61374aba3
2 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -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'.

6
lisp/net/rcirc.el
View file

@ -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