try advising make-obsolete. did not work
This commit is contained in:
parent
2540108cce
commit
5318c3ce3b
@ -20,6 +20,18 @@
|
||||
;; (run-with-idle-timer 5 t #'garbage-collect)
|
||||
;(setq garbage-collection-messages t)
|
||||
|
||||
;; doesn't quite work
|
||||
(defun mir/dont-make-obsolete (orig &rest args)
|
||||
"only run ORIG when its not linum."
|
||||
;; (message "obsoleting: %s" args)
|
||||
(if (or (member 'global-linum-mode args)
|
||||
(member 'linum-mode args))
|
||||
(message "linum is deprecated but i dont care")
|
||||
;; (let ((inhibit-message t))
|
||||
;; (apply orig args))
|
||||
(apply orig args)))
|
||||
(advice-add #'make-obsolete :around #'mir/dont-make-obsolete)
|
||||
|
||||
(defun display-startup-echo-area-message ()
|
||||
"A re-definition of the function.
|
||||
Tell the Emacs startup time and number of garbage-collections
|
||||
|
Loading…
Reference in New Issue
Block a user