diff options
| author | F. Jason Park | 2022-11-24 21:03:03 -0800 |
|---|---|---|
| committer | F. Jason Park | 2022-11-25 05:37:01 -0800 |
| commit | 3d02c8aabfde88219dd8b6053a59de261308bc2f (patch) | |
| tree | 7720ff6524d15f2231319bbacc3f6bf9362b0e52 /lisp/erc | |
| parent | 94a8a8c4fef074f445d316000070c95f0452586e (diff) | |
| download | emacs-3d02c8aabfde88219dd8b6053a59de261308bc2f.tar.gz emacs-3d02c8aabfde88219dd8b6053a59de261308bc2f.zip | |
Disable auth-source-pass-extra-query-keywords by default
* doc/misc/auth.texi: Mention subdomain matching in
`auth-source-pass-extra-query-keywords' section.
* etc/NEWS: Mention the loss of traditional auth-source-pass features
when `auth-source-pass-extra-query-keywords' is enabled.
* lisp/auth-source-pass (auth-source-pass-extra-query-keywords): Set
default to nil. Mention domain matching in doc string.
(auth-source-pass--match-regexp): Allow username to contain "@".
* lisp/erc/erc-compat.el:
(erc-compat--29-auth-source-pass--retrieve-parsed): Adjust regexp.
* test/lisp/auth-source-pass-tests.el
(auth-source-pass-extra-query-keywords--suffixed-user): make plain
username more email-like.
(Bug#58985.)
Diffstat (limited to 'lisp/erc')
| -rw-r--r-- | lisp/erc/erc-compat.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/erc/erc-compat.el b/lisp/erc/erc-compat.el index 66a9a615e32..abbaafcd936 100644 --- a/lisp/erc/erc-compat.el +++ b/lisp/erc/erc-compat.el | |||
| @@ -176,7 +176,7 @@ If START or END is negative, it counts from the end." | |||
| 176 | ;; This hard codes `auth-source-pass-port-separator' to ":" | 176 | ;; This hard codes `auth-source-pass-port-separator' to ":" |
| 177 | (defun erc-compat--29-auth-source-pass--retrieve-parsed (seen e port-number-p) | 177 | (defun erc-compat--29-auth-source-pass--retrieve-parsed (seen e port-number-p) |
| 178 | (when (string-match (rx (or bot "/") | 178 | (when (string-match (rx (or bot "/") |
| 179 | (or (: (? (group-n 20 (+ (not (in " /@")))) "@") | 179 | (or (: (? (group-n 20 (+ (not (in " /:")))) "@") |
| 180 | (group-n 10 (+ (not (in " /:@")))) | 180 | (group-n 10 (+ (not (in " /:@")))) |
| 181 | (? ":" (group-n 30 (+ (not (in " /:")))))) | 181 | (? ":" (group-n 30 (+ (not (in " /:")))))) |
| 182 | (: (group-n 11 (+ (not (in " /:@")))) | 182 | (: (group-n 11 (+ (not (in " /:@")))) |