Suppress warnings about advised functions getting re-defined
This commit is contained in:
parent
1db6dceaf0
commit
5883d67749
4
init.el
4
init.el
@ -53,6 +53,10 @@
|
|||||||
(make-empty-file custom-file t))
|
(make-empty-file custom-file t))
|
||||||
(load custom-file)
|
(load custom-file)
|
||||||
|
|
||||||
|
;; Suppress advice warnings on startup
|
||||||
|
;; https://andrewjamesjohnson.com/suppressing-ad-handle-definition-warnings-in-emacs/
|
||||||
|
(setq ad-redefinition-action 'accept)
|
||||||
|
|
||||||
;; straight.el: the better package manager?
|
;; straight.el: the better package manager?
|
||||||
;; minified bootstrap (split lines if you want) (or not)
|
;; minified bootstrap (split lines if you want) (or not)
|
||||||
;; (defvar bootstrap-version) (let ((bootstrap-file (expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory)) (bootstrap-version 5)) (unless (file-exists-p bootstrap-file) (with-current-buffer (url-retrieve-synchronously "https://raw.githubusercontent.com/radian-software/straight.el/develop/install.el" 'silent 'inhibit-cookies) (goto-char (point-max)) (eval-print-last-sexp))) (load bootstrap-file nil 'nomessage)) (straight-use-package 'use-package) (setq straight-use-package-by-default t)
|
;; (defvar bootstrap-version) (let ((bootstrap-file (expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory)) (bootstrap-version 5)) (unless (file-exists-p bootstrap-file) (with-current-buffer (url-retrieve-synchronously "https://raw.githubusercontent.com/radian-software/straight.el/develop/install.el" 'silent 'inhibit-cookies) (goto-char (point-max)) (eval-print-last-sexp))) (load bootstrap-file nil 'nomessage)) (straight-use-package 'use-package) (setq straight-use-package-by-default t)
|
||||||
|
Loading…
Reference in New Issue
Block a user