diff options
Diffstat (limited to 'lisp/url')
| -rw-r--r-- | lisp/url/url-irc.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/url/url-irc.el b/lisp/url/url-irc.el index ece53c90291..3ff6e647478 100644 --- a/lisp/url/url-irc.el +++ b/lisp/url/url-irc.el @@ -48,6 +48,8 @@ PASSWORD - What password to use" ;; External. (declare-function zenirc "ext:zenirc" (&optional prefix)) (declare-function zenirc-send-line "ext:zenirc" ()) +(defvar zenirc-server-alist) +(defvar zenirc-buffer-name) (defun url-irc-zenirc (host port channel user password) (let ((zenirc-buffer-name (if (and user host port) @@ -65,7 +67,7 @@ PASSWORD - What password to use" (defun url-irc-rcirc (host port channel user password) (let ((chan (when channel (concat "#" channel)))) - (rcirc-connect host port user nil nil (when chan (list chan))) + (rcirc-connect host port user nil nil (when chan (list chan)) password) (when chan (switch-to-buffer (concat chan "@" host))))) |