Silence deprecation & site-file loading messages in CLI

This commit is contained in:
Henrik Lissner 2020-05-04 16:17:59 -04:00
parent b56caddcac
commit aa64ece46d
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -6,7 +6,7 @@
:; DOOMBASE="$(dirname "$0")/.."
:; [ "$1" = -d ] || [ "$1" = --debug ] && { shift; export DEBUG=1; }
:; [ "$1" = run ] && { cd "$DOOMBASE"; shift; exec $EMACS -q --no-splash -l bin/doom "$@"; exit 0; }
:; exec $EMACS --script "$0" -- "$@"
:; exec $EMACS --no-site-file --script "$0" -- "$@"
:; exit 0
(let* ((load-prefer-newer t)
@ -15,6 +15,13 @@
(user-emacs-directory
(abbreviate-file-name (or emacsdir (expand-file-name "../" loaddir)))))
;; HACK Load `cl' and site files manually so we can stop them from polluting
;; CLI logs with deprecation and file load messages.
(let ((inhibit-message t))
(when (> emacs-major-version 26)
(require 'cl))
(load "site-start" t t))
(push (expand-file-name "core" user-emacs-directory) load-path)
(require 'core)
(require 'core-cli)