diff options
| author | Stefan Kangas <stefan@marxist.se> | 2020-11-04 07:40:16 +0100 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2020-11-04 07:40:16 +0100 |
| commit | f7ea667b54380a7b7c60490cef30728b5f444ae1 (patch) | |
| tree | f405cb223b76129051a42ffff7c81c9077b83770 /lisp/url/url-irc.el | |
| parent | 197a53f7b83dc95384fb98080de89e059cafadb5 (diff) | |
| download | emacs-f7ea667b54380a7b7c60490cef30728b5f444ae1.tar.gz emacs-f7ea667b54380a7b7c60490cef30728b5f444ae1.tar.bz2 emacs-f7ea667b54380a7b7c60490cef30728b5f444ae1.zip | |
Fix warnings in url-irc.el
* lisp/url/url-irc.el (zenirc-server-alist, zenirc-buffer-name):
Declare to fix warnings.
(url-irc-rcirc): Silence warning by adding missing password argument
to rcirc-connect.
Diffstat (limited to 'lisp/url/url-irc.el')
| -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))))) |