forked from mirrors/org-mode
org-irc: Fix port handling
* lisp/org-irc.el (org-irc-visit-erc): Fix "stringp, nil". Reported-by: "numbchild@gmail.com" <numbchild@gmail.com> <http://lists.gnu.org/archive/html/emacs-orgmode/2017-06/msg00541.html>
This commit is contained in:
parent
cbcd714b23
commit
1385dea0b9
|
@ -205,7 +205,8 @@ default."
|
||||||
(require 'erc)
|
(require 'erc)
|
||||||
(require 'erc-log)
|
(require 'erc-log)
|
||||||
(let* ((server (car (car link)))
|
(let* ((server (car (car link)))
|
||||||
(port (or (string-to-number (cadr (pop link))) erc-default-port))
|
(port (let ((p (cadr (pop link))))
|
||||||
|
(if p (string-to-number p) erc-default-port)))
|
||||||
(server-buffer)
|
(server-buffer)
|
||||||
(buffer-list
|
(buffer-list
|
||||||
(erc-buffer-filter
|
(erc-buffer-filter
|
||||||
|
|
Loading…
Reference in a new issue