[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
emacs-29 452b5ed1030 2/2: ; Fix wrong error name in erc-server-908 doc s
From: |
F. Jason Park |
Subject: |
emacs-29 452b5ed1030 2/2: ; Fix wrong error name in erc-server-908 doc string. |
Date: |
Fri, 3 Mar 2023 08:34:23 -0500 (EST) |
branch: emacs-29
commit 452b5ed1030f9ddb10744db76f23e83d434965e8
Author: F. Jason Park <jp@neverwas.me>
Commit: F. Jason Park <jp@neverwas.me>
; Fix wrong error name in erc-server-908 doc string.
* lisp/erc/erc-sasl.el (erc-server-908): Correct well-known name for
908 numeric in doc string.
(erc--register-connection): Fold overlong line.
---
lisp/erc/erc-sasl.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/lisp/erc/erc-sasl.el b/lisp/erc/erc-sasl.el
index ed91f412255..9265691c2d7 100644
--- a/lisp/erc/erc-sasl.el
+++ b/lisp/erc/erc-sasl.el
@@ -405,7 +405,7 @@ This doesn't solicit or validate a suite of supported
mechanisms."
(erc-sasl--destroy proc))
(define-erc-response-handler (908)
- "Handle a RPL_SASLALREADY response." nil
+ "Handle a RPL_SASLMECHS response." nil
(erc-display-message parsed '(notice error) 'active 's908
?m (alist-get 'mechanism erc-sasl--options)
?s (string-join (cdr (erc-response.command-args parsed))
@@ -426,7 +426,8 @@ Otherwise, expect it to disappear in subsequent versions.")
(erc-server-send (if erc-sasl--send-cap-ls "CAP LS" "CAP REQ :sasl"))
(let ((erc-session-password
(and erc-session-password
- (not (eq :password (alist-get 'password
erc-sasl--options)))
+ (not (eq :password
+ (alist-get 'password erc-sasl--options)))
erc-session-password))
(erc-session-username
;; The username may contain a colon or a space