mirror of
				https://github.com/larstvei/dot-emacs.git
				synced 2025-11-04 01:20:11 +00:00 
			
		
		
		
	Keep a custom file
This commit is contained in:
		
							parent
							
								
									5b5c4478b8
								
							
						
					
					
						commit
						b121a5f18f
					
				
							
								
								
									
										7
									
								
								init.org
									
									
									
									
									
								
							
							
						
						
									
										7
									
								
								init.org
									
									
									
									
									
								
							@ -133,6 +133,8 @@
 | 
				
			|||||||
      (let ((private-file (concat user-emacs-directory "private.el")))
 | 
					      (let ((private-file (concat user-emacs-directory "private.el")))
 | 
				
			||||||
        (when (file-exists-p private-file)
 | 
					        (when (file-exists-p private-file)
 | 
				
			||||||
          (load-file private-file))
 | 
					          (load-file private-file))
 | 
				
			||||||
 | 
					        (when custom-file
 | 
				
			||||||
 | 
					          (load-file custom-file))
 | 
				
			||||||
        (server-start))))
 | 
					        (server-start))))
 | 
				
			||||||
   #+END_SRC
 | 
					   #+END_SRC
 | 
				
			||||||
 | 
					
 | 
				
			||||||
@ -259,7 +261,6 @@
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
   #+BEGIN_SRC emacs-lisp
 | 
					   #+BEGIN_SRC emacs-lisp
 | 
				
			||||||
   (setq auto-revert-interval 1            ; Refresh buffers fast
 | 
					   (setq auto-revert-interval 1            ; Refresh buffers fast
 | 
				
			||||||
         custom-file (make-temp-file "")   ; Discard customization's
 | 
					 | 
				
			||||||
         default-input-method "TeX"        ; Use TeX when toggling input method
 | 
					         default-input-method "TeX"        ; Use TeX when toggling input method
 | 
				
			||||||
         echo-keystrokes 0.1               ; Show keystrokes asap
 | 
					         echo-keystrokes 0.1               ; Show keystrokes asap
 | 
				
			||||||
         inhibit-startup-screen t          ; No splash screen please
 | 
					         inhibit-startup-screen t          ; No splash screen please
 | 
				
			||||||
@ -267,7 +268,9 @@
 | 
				
			|||||||
         recentf-max-saved-items 100       ; Show more recent files
 | 
					         recentf-max-saved-items 100       ; Show more recent files
 | 
				
			||||||
         ring-bell-function 'ignore        ; Quiet
 | 
					         ring-bell-function 'ignore        ; Quiet
 | 
				
			||||||
         scroll-margin 1                   ; Space between cursor and top/bottom
 | 
					         scroll-margin 1                   ; Space between cursor and top/bottom
 | 
				
			||||||
         sentence-end-double-space nil)    ; No double space
 | 
					         sentence-end-double-space nil     ; No double space
 | 
				
			||||||
 | 
					         custom-file                       ; Customizations in a separate file
 | 
				
			||||||
 | 
					         (concat user-emacs-directory "custom.el"))
 | 
				
			||||||
   ;; Some mac-bindings interfere with Emacs bindings.
 | 
					   ;; Some mac-bindings interfere with Emacs bindings.
 | 
				
			||||||
   (when (boundp 'mac-pass-command-to-system)
 | 
					   (when (boundp 'mac-pass-command-to-system)
 | 
				
			||||||
     (setq mac-pass-command-to-system nil))
 | 
					     (setq mac-pass-command-to-system nil))
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
		Reference in New Issue
	
	Block a user