# HG changeset patch # User Andreas Schwab # Date 1276122848 -7200 # Node ID ca556d6b7c7a5d961d9e59f21f5889a8beb64fc1 # Parent d418516def733a1eea068aac951cf54d9a2a3869 Conflict resolution fixup diff -r d418516def73 -r ca556d6b7c7a lisp/ChangeLog --- a/lisp/ChangeLog Thu Jun 10 00:08:50 2010 +0200 +++ b/lisp/ChangeLog Thu Jun 10 00:34:08 2010 +0200 @@ -76,13 +76,6 @@ * emacs-lisp/smie.el (smie-indent-keyword): Remove special case that can be handled with a ((:before "fn") (:prev "=>" parent)) rule. -2010-06-07 Jonathan Rockway - - * net/rcirc.el: Add support for password authentication. - (rcirc-server-alist): Add :password keyword. - (rcirc): Ask for a password, or get it from the server's alist. - (rcirc-connect): Add password argument. Pass it to server. - 2010-06-07 Martin Pohlack * iimage.el: Remove images as soon as the underlying text is modified. diff -r d418516def73 -r ca556d6b7c7a lisp/net/rcirc.el --- a/lisp/net/rcirc.el Thu Jun 10 00:08:50 2010 +0200 +++ b/lisp/net/rcirc.el Thu Jun 10 00:34:08 2010 +0200 @@ -81,11 +81,6 @@ VALUE must be a string. If absent, `rcirc-default-user-name' is used. -`:password' - -VALUE must be a string. If absent, no PASS command will be sent -to the server. - `:full-name' VALUE must be a string. If absent, `rcirc-default-full-name' is @@ -104,7 +99,6 @@ :value-type (plist :options ((:nick string) (:port integer) (:user-name string) - (:password string) (:full-name string) (:pass string) (:channels (repeat string))))) @@ -435,8 +429,7 @@ (pass (plist-get (cdr c) :pass)) (full-name (or (plist-get (cdr c) :full-name) rcirc-default-full-name)) - (channels (plist-get (cdr c) :channels)) - (password (plist-get (cdr c) :password))) + (channels (plist-get (cdr c) :channels))) (when server (let (connected) (dolist (p (rcirc-process-list)) @@ -445,7 +438,7 @@ (if (not connected) (condition-case e (rcirc-connect server port nick user-name pass - full-name channels password) + full-name channels) (quit (message "Quit connecting to %s" server))) (with-current-buffer (process-buffer connected) (setq connected-servers