diff options
| author | Andrea Corallo | 2021-04-25 20:56:32 +0200 |
|---|---|---|
| committer | Andrea Corallo | 2021-04-25 20:58:37 +0200 |
| commit | 83a915d3dfafd5f3d737afe1e13b75e4dd3aef96 (patch) | |
| tree | b78f7e4786112ffa7b3dcb402d5d4211660446be | |
| parent | 6bfe589078d346df6b19fa2b6662aa9934a9ac44 (diff) | |
| download | emacs-83a915d3dfafd5f3d737afe1e13b75e4dd3aef96.tar.gz emacs-83a915d3dfafd5f3d737afe1e13b75e4dd3aef96.zip | |
* lisp/startup.el (comp-eln-load-path): Silence a warning.
| -rw-r--r-- | lisp/startup.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index 89d4c8ae31d..a21372a0463 100644 --- a/lisp/startup.el +++ b/lisp/startup.el | |||
| @@ -519,6 +519,7 @@ DIRS are relative." | |||
| 519 | xdg-dir) | 519 | xdg-dir) |
| 520 | (t emacs-d-dir)))) | 520 | (t emacs-d-dir)))) |
| 521 | 521 | ||
| 522 | (defvar comp-eln-load-path) | ||
| 522 | (defun normal-top-level () | 523 | (defun normal-top-level () |
| 523 | "Emacs calls this function when it first starts up. | 524 | "Emacs calls this function when it first starts up. |
| 524 | It sets `command-line-processed', processes the command-line, | 525 | It sets `command-line-processed', processes the command-line, |
| @@ -538,7 +539,6 @@ It is the default value of the variable `top-level'." | |||
| 538 | 539 | ||
| 539 | (when (featurep 'nativecomp) | 540 | (when (featurep 'nativecomp) |
| 540 | ;; Form `comp-eln-load-path'. | 541 | ;; Form `comp-eln-load-path'. |
| 541 | (defvar comp-eln-load-path) | ||
| 542 | (let ((path-env (getenv "EMACSNATIVELOADPATH"))) | 542 | (let ((path-env (getenv "EMACSNATIVELOADPATH"))) |
| 543 | (when path-env | 543 | (when path-env |
| 544 | (dolist (path (split-string path-env path-separator)) | 544 | (dolist (path (split-string path-env path-separator)) |