[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
emacs-29 19d00fab9a 1/2: Avoid "already compiled" warning in erc-compat
From: |
F. Jason Park |
Subject: |
emacs-29 19d00fab9a 1/2: Avoid "already compiled" warning in erc-compat |
Date: |
Wed, 28 Dec 2022 09:52:11 -0500 (EST) |
branch: emacs-29
commit 19d00fab9aaf28dae6af5786f6e22b8558b10eea
Author: F. Jason Park <jp@neverwas.me>
Commit: F. Jason Park <jp@neverwas.me>
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.
---
lisp/erc/erc-compat.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/erc/erc-compat.el b/lisp/erc/erc-compat.el
index fdcb146d42..864c5882cf 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)))