Fix artifacts
This commit is contained in:
@@ -115,18 +115,21 @@ When set to non-nil, Emacs will automatically call `package-initialize' and
|
|||||||
|
|
||||||
(unless noninteractive
|
(unless noninteractive
|
||||||
(unless minimal-emacs-debug
|
(unless minimal-emacs-debug
|
||||||
;; Suppress redisplay and redraw during startup to avoid delays and
|
(unless minimal-emacs-debug
|
||||||
;; prevent flashing an unstyled Emacs frame.
|
;; Suppress redisplay and redraw during startup to avoid delays and
|
||||||
(setq-default inhibit-redisplay t
|
;; prevent flashing an unstyled Emacs frame.
|
||||||
inhibit-message t)
|
;; (setq-default inhibit-redisplay t) ; Can cause artifacts
|
||||||
|
(setq-default inhibit-message t)
|
||||||
|
|
||||||
;; Reset the above variables to prevent Emacs from appearing frozen or
|
;; Reset the above variables to prevent Emacs from appearing frozen or
|
||||||
;; visually corrupted after startup or if a startup error occurs.
|
;; visually corrupted after startup or if a startup error occurs.
|
||||||
(defun minimal-emacs--reset-inhibited-vars-h ()
|
(defun minimal-emacs--reset-inhibited-vars-h ()
|
||||||
(setq-default inhibit-redisplay nil
|
;; (setq-default inhibit-redisplay nil) ; Can cause artifacts
|
||||||
inhibit-message nil)
|
(setq-default inhibit-message nil)
|
||||||
(remove-hook 'post-command-hook #'minimal-emacs--reset-inhibited-vars-h))
|
(remove-hook 'post-command-hook #'minimal-emacs--reset-inhibited-vars-h))
|
||||||
(add-hook 'post-command-hook #'minimal-emacs--reset-inhibited-vars-h -100)
|
|
||||||
|
(add-hook 'post-command-hook
|
||||||
|
#'minimal-emacs--reset-inhibited-vars-h -100))
|
||||||
|
|
||||||
(dolist (buf (buffer-list))
|
(dolist (buf (buffer-list))
|
||||||
(with-current-buffer buf
|
(with-current-buffer buf
|
||||||
|
|||||||
Reference in New Issue
Block a user