diff options
| -rw-r--r-- | lisp/emacs-lisp/package.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 67d78987a4f..3cf94ec0255 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el | |||
| @@ -923,11 +923,12 @@ untar into a directory named DIR; otherwise, signal an error." | |||
| 923 | ;;;; Compilation | 923 | ;;;; Compilation |
| 924 | (defvar warning-minimum-level) | 924 | (defvar warning-minimum-level) |
| 925 | (defun package--compile (pkg-desc) | 925 | (defun package--compile (pkg-desc) |
| 926 | "Byte-compile installed package PKG-DESC." | 926 | "Byte-compile installed package PKG-DESC. |
| 927 | This assumes that `pkg-desc' has already been activated with | ||
| 928 | `package-activate-1'." | ||
| 927 | (let ((warning-minimum-level :error) | 929 | (let ((warning-minimum-level :error) |
| 928 | (save-silently inhibit-message) | 930 | (save-silently inhibit-message) |
| 929 | (load-path load-path)) | 931 | (load-path load-path)) |
| 930 | (package--activate-autoloads-and-load-path pkg-desc) | ||
| 931 | (byte-recompile-directory (package-desc-dir pkg-desc) 0 t))) | 932 | (byte-recompile-directory (package-desc-dir pkg-desc) 0 t))) |
| 932 | 933 | ||
| 933 | ;;;; Inferring package from current buffer | 934 | ;;;; Inferring package from current buffer |