From 9f7db1e88b102c1bfd696096fcc6452ffc124573 Mon Sep 17 00:00:00 2001 From: Amin Bandali Date: Tue, 14 May 2019 20:35:06 -0400 Subject: emacs: fix nil file-name-handler-alist after reloading init This problem would cause emacs to not treat files like *.gpg or *.el.gz especially before displaying them, as it normally does. So now, I update a/file-name-handler-alist with the latest contents of file-name-handler-alist before loading the init file, and afterwards I restore things back to normal (done in a/post-init). --- .emacs.d/init.el | 15 ++++++++------- 1 file changed, 8 insertions(+), 7 deletions(-) diff --git a/.emacs.d/init.el b/.emacs.d/init.el index b7a433d..b09f080 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -56,12 +56,11 @@ esup-child-profile-require-level 0) ;; set them back to their defaults once we're done initializing -(add-hook - 'after-init-hook - (lambda () - (setq gc-cons-threshold a/gc-cons-threshold - gc-cons-percentage a/gc-cons-percentage - file-name-handler-alist a/file-name-handler-alist))) +(defun a/post-init () + (setq gc-cons-threshold a/gc-cons-threshold + gc-cons-percentage a/gc-cons-percentage + file-name-handler-alist a/file-name-handler-alist)) +(add-hook 'after-init-hook #'a/post-init) ;; increase number of lines kept in *Messages* log (setq message-log-max 20000) @@ -148,7 +147,9 @@ (interactive) (straight-transaction (straight-mark-transaction-as-init) - (load user-init-file))) + (setq a/file-name-handler-alist file-name-handler-alist) + (load user-init-file) + (a/post-init))) ;; use-package (straight-use-package 'use-package) -- cgit v1.2.3-60-g2f50