branch: externals/async
commit 15f24b1694eb805732e05030e0e118a3961c3644
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>
Remove unneeded test in async-bytecomp
The two tests (eq cur-package 'async) and
(string= cur-package "async") are doing the same thing, the later was
unuseful and confusing as we expect a string but cur-package is always
a symbol.
---
async-bytecomp.el | 9 +++------
1 file changed, 3 insertions(+), 6 deletions(-)
diff --git a/async-bytecomp.el b/async-bytecomp.el
index 503653d6bc..12b4ca638b 100644
--- a/async-bytecomp.el
+++ b/async-bytecomp.el
@@ -140,13 +140,10 @@ All *.elc files are systematically deleted before
proceeding."
(memq cur-package (async-bytecomp--get-package-deps
async-bytecomp-allowed-packages)))
(progn
- ;; FIXME: Why do we use (eq cur-package 'async) once
- ;; and (string= cur-package "async") afterwards?
(when (eq cur-package 'async)
- (fmakunbound 'async-byte-recompile-directory))
- ;; Add to `load-path' the latest version of async and
- ;; reload it when reinstalling async.
- (when (string= cur-package "async")
+ (fmakunbound 'async-byte-recompile-directory)
+ ;; Add to `load-path' the latest version of async and
+ ;; reload it when reinstalling async.
(cl-pushnew pkg-dir load-path)
(load "async-bytecomp"))
;; `async-byte-recompile-directory' will add directory
