emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/async 15f24b1694 3/4: Remove unneeded test in async-byt


From: ELPA Syncer
Subject: [elpa] externals/async 15f24b1694 3/4: Remove unneeded test in async-bytecomp
Date: Fri, 28 Jun 2024 12:57:25 -0400 (EDT)

branch: externals/async
commit 15f24b1694eb805732e05030e0e118a3961c3644
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]