diff options
Diffstat (limited to 'lisp/net/rcirc.el')
-rw-r--r-- | lisp/net/rcirc.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el index bf4faba5197..70190867e89 100644 --- a/lisp/net/rcirc.el +++ b/lisp/net/rcirc.el @@ -594,10 +594,10 @@ SERVER-PLIST is the property list for the server." (let ((msg "Encryption (default %s): ") (choices '("plain" "tls")) (default (or (plist-get server-plist :encryption) - "plain"))) + 'plain))) (intern (completing-read (format msg default) - choices nil t "" nil default)))) + choices nil t nil nil (symbol-name default))))) (defun rcirc-keepalive () "Send keep alive pings to active rcirc processes. |