From 9e2bdbdb55b5311308250327f812d15c75ffe50c Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Mon, 2 Mar 2020 15:45:13 +0100
Subject: Emacs: optimise file loading at startup

---
 user/emacs/.emacs.d/init.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'user/emacs')

diff --git a/user/emacs/.emacs.d/init.el b/user/emacs/.emacs.d/init.el
index b511e907..1088e84c 100644
--- a/user/emacs/.emacs.d/init.el
+++ b/user/emacs/.emacs.d/init.el
@@ -7,11 +7,14 @@
       evil-want-keybinding nil
       frame-inhibit-implied-resize t)
 
-(let ((default-gc-cons-threshold (* 16 1024 1024)))
+(let ((default-gc-cons-threshold (* 16 1024 1024))
+      (default-file-name-handler-alist file-name-handler-alist))
   (setq gc-cons-threshold most-positive-fixnum
-        gc-cons-percentage 0.6)
+        gc-cons-percentage 0.6
+        file-name-handler-alist nil)
   (add-hook 'minibuffer-setup-hook (lambda () (setq gc-cons-threshold most-positive-fixnum)))
   (add-hook 'minibuffer-exit-hook (lambda () (setq gc-cons-threshold default-gc-cons-threshold)))
+  (add-hook 'emacs-startup-hook (lambda () (setq file-name-handler-alist default-file-name-handler-alist)))
   (add-hook 'after-init-hook (lambda ()
                                (setq gc-cons-threshold default-gc-cons-threshold
                                      gc-cons-percentage 0.1))))
-- 
cgit 1.4.1