diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2021-12-18 15:37:44 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-12-18 15:37:44 -0700 |
commit | 069ff9bcef544f9d00dbddf4a545203f76fb6acf (patch) | |
tree | 91bf433e37ae643a46f87b5b855e8a1f617fa32b | |
parent | 98e854c6867cadcf166c8bd377bd8ad10391d600 (diff) | |
download | emacs-069ff9bcef544f9d00dbddf4a545203f76fb6acf.tar.gz |
skip loading 00debian.el when it's not readable
-rw-r--r-- | lisp/startup.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index 2928e815124..c54ab89b337 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -1375,7 +1375,11 @@ please check its value") ;; should check init-file-user instead, since that is already set. ;; See cus-edit.el for an example. (when site-run-file - (load "/etc/emacs/site-start.d/00debian.el") + (let ((file "/etc/emacs/site-start.d/00debian.el")) + ;; When the Emacs build invokes Emacs, such as in the + ;; Makefile rule for ${unidir}/emoji-labels.el, 00debian.el + ;; might not exist. Should be fine to just skip the load. + (when (file-readable-p file) (load file))) ;; Sites should not disable the startup screen. ;; Only individuals should disable the startup screen. (let ((inhibit-startup-screen inhibit-startup-screen)) |