From a64cee087fb9c79c85653cab7f532027c832929d Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Mon, 23 May 2022 09:18:42 -0700 Subject: set warning-suppress-types using customisation --- .emacs.d/init.el | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to '.emacs.d/init.el') diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 89ca0641..34370b6a 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -328,6 +328,7 @@ windows side-by-side in the frame." '(uniquify-buffer-name-style 'post-forward nil (uniquify)) '(use-short-answers t) '(vc-follow-symlinks t) + '(warning-suppress-types '((comp))) '(which-func-modes '(lisp-mode emacs-lisp-mode c-mode)) '(which-function-mode t) '(window-combination-resize t) @@ -1230,10 +1231,6 @@ don't consider windows satisfying the predicate EXCLUDE." (setq shell-file-name "bash") (setenv "BASH_ENV" (expand-file-name "~/.bash_defns"))) -(unless (boundp 'warning-suppress-types) - (setq warning-suppress-types nil)) -(cl-pushnew '(comp) warning-suppress-types :test #'cl-tree-equal) - ;; Invert meaning of C-u for M-= except when the region is active (though, ;; M-i M-= is easier to type than C-u M-=). (defun spw/count-words () -- cgit v1.2.3