mirror of
				https://github.com/larstvei/dot-emacs.git
				synced 2025-11-04 01:20:11 +00:00 
			
		
		
		
	Improve startup time
This commit is contained in:
		
							parent
							
								
									59fd42d8d3
								
							
						
					
					
						commit
						94abdf47df
					
				
							
								
								
									
										15
									
								
								init.org
									
									
									
									
									
								
							
							
						
						
									
										15
									
								
								init.org
									
									
									
									
									
								
							@ -184,10 +184,17 @@
 | 
				
			|||||||
   number, and restore the default value after initialization.
 | 
					   number, and restore the default value after initialization.
 | 
				
			||||||
 | 
					
 | 
				
			||||||
   #+begin_src emacs-lisp :tangle early-init.el
 | 
					   #+begin_src emacs-lisp :tangle early-init.el
 | 
				
			||||||
   (setq gc-cons-threshold most-positive-fixnum)
 | 
					
 | 
				
			||||||
   (add-hook 'after-init-hook
 | 
					   (let ((file-name-handler-alist-old file-name-handler-alist))
 | 
				
			||||||
             (lambda ()
 | 
					     (add-hook 'emacs-startup-hook
 | 
				
			||||||
               (setq gc-cons-threshold (* 1024 1024 20))))
 | 
					               (lambda ()
 | 
				
			||||||
 | 
					                 (setq gc-cons-threshold (* 1024 1024 20))
 | 
				
			||||||
 | 
					                 (setq file-name-handler-alist file-name-handler-alist-old)))
 | 
				
			||||||
 | 
					     (setq gc-cons-threshold most-positive-fixnum)
 | 
				
			||||||
 | 
					     (setq file-name-handler-alist nil))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					   (setq inhibit-default-init t)
 | 
				
			||||||
 | 
					
 | 
				
			||||||
   #+end_src
 | 
					   #+end_src
 | 
				
			||||||
 | 
					
 | 
				
			||||||
* Packages
 | 
					* Packages
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
		Reference in New Issue
	
	Block a user