[elpa] master 348600d 138/187: Unbound async-byte-recompile-directory when reinstalling async.

[Michael Albinus]

branch: master
commit 348600db3908ebc934071bba2c2fc7cfaecaec1a
Author: Thierry Volpiatto <address@hidden>
Commit: Thierry Volpiatto <address@hidden>

    Unbound async-byte-recompile-directory when reinstalling async.
    
    * async-bytecomp.el (package--compile): do it.
---
 async-bytecomp.el |    9 +++------
 1 files changed, 3 insertions(+), 6 deletions(-)

diff --git a/async-bytecomp.el b/async-bytecomp.el
index f7d582d..7e682f6 100644
--- a/async-bytecomp.el
+++ b/async-bytecomp.el
@@ -95,13 +95,10 @@ All *.elc files are systematically deleted before 
proceeding."
     (message "Started compiling asynchronously directory %s" directory)))
 
 (defadvice package--compile (around byte-compile-async activate)
-  ;; FIXME this seems redundant and unneeded, the only thing it
-  ;; does is loading the autoload file to update load-path but
-  ;; async-byte-recompile-directory is already doing this.
-  ;; for the rest (i.e installing info) it is done anyway after
-  ;; compilation in package-activate (force arg).
+  (when (eq (package-desc-name pkg-desc) 'async)
+    (fmakunbound 'async-byte-recompile-directory))
   (package-activate-1 pkg-desc)
-  (load "async-bytecomp")
+  (load "async-bytecomp") ; emacs-24.3 don't reload new files.
   (async-byte-recompile-directory (package-desc-dir pkg-desc) t))
 
 (provide 'async-bytecomp)