summaryrefslogtreecommitdiff
path: root/lisp/erc
diff options
context:
space:
mode:
authorF. Jason Park <jp@neverwas.me>2022-12-28 06:18:01 -0800
committerF. Jason Park <jp@neverwas.me>2022-12-28 06:51:38 -0800
commit19d00fab9aaf28dae6af5786f6e22b8558b10eea (patch)
tree19fb5e52da9f8c5fdda6ffb67dade30cd29a8ce2 /lisp/erc
parent2d8f7b66bcc5fa745ccf581253f59645e5e32490 (diff)
downloademacs-19d00fab9aaf28dae6af5786f6e22b8558b10eea.tar.gz
emacs-19d00fab9aaf28dae6af5786f6e22b8558b10eea.tar.bz2
emacs-19d00fab9aaf28dae6af5786f6e22b8558b10eea.zip
Avoid "already compiled" warning in erc-compat
* lisp/erc/erc-compat.el (erc-compat--29-auth-source-pass-search): Don't `byte-compile' sub-29 secrets wrapper. This was especially noisy in tests. Ditch closed-over vars via HOF instead of suppressing because compiling emits "unused lexical" warning on Emacs 27.
Diffstat (limited to 'lisp/erc')
-rw-r--r--lisp/erc/erc-compat.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/erc/erc-compat.el b/lisp/erc/erc-compat.el
index fdcb146d42a..864c5882cf2 100644
--- a/lisp/erc/erc-compat.el
+++ b/lisp/erc/erc-compat.el
@@ -261,7 +261,7 @@ If START or END is negative, it counts from the end."
(when-let* ((s (plist-get e :secret))
(v (auth-source--obfuscate s)))
(setf (plist-get e :secret)
- (byte-compile (lambda () (auth-source--deobfuscate v)))))
+ (apply-partially #'auth-source--deobfuscate v)))
(push e out)))
rv)))