mirror of
				https://github.com/larstvei/dot-emacs.git
				synced 2025-11-04 01:20:11 +00:00 
			
		
		
		
	Switch from let to defvar in Mail section.
This commit is contained in:
		
							parent
							
								
									0df4413d48
								
							
						
					
					
						commit
						28da2d329f
					
				
							
								
								
									
										7
									
								
								init.el
									
									
									
									
									
								
							
							
						
						
									
										7
									
								
								init.el
									
									
									
									
									
								
							@ -181,8 +181,9 @@ PACKAGE is installed and the current version is deleted."
 | 
			
		||||
      calendar-longitude 10.7
 | 
			
		||||
      calendar-location-name "Oslo, Norway")
 | 
			
		||||
 | 
			
		||||
(let ((load-mail-setup nil))
 | 
			
		||||
  (when load-mail-setup
 | 
			
		||||
(defvar load-mail-setup nil)
 | 
			
		||||
 | 
			
		||||
(when load-mail-setup
 | 
			
		||||
  ;; Dependent on both mu4e and smtpmail (for sending only).
 | 
			
		||||
  (require 'mu4e)
 | 
			
		||||
  (require 'smtpmail)
 | 
			
		||||
@ -224,7 +225,7 @@ PACKAGE is installed and the current version is deleted."
 | 
			
		||||
    (delete-other-windows))
 | 
			
		||||
 | 
			
		||||
  ;; Overwrite the native 'compose-mail' binding to 'show-mu4e'.
 | 
			
		||||
    (global-set-key (kbd "C-x m") 'show-mu4e)))
 | 
			
		||||
  (global-set-key (kbd "C-x m") 'show-mu4e))
 | 
			
		||||
 | 
			
		||||
(add-hook 'text-mode-hook 'turn-on-flyspell)
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
							
								
								
									
										5
									
								
								init.org
									
									
									
									
									
								
							
							
						
						
									
										5
									
								
								init.org
									
									
									
									
									
								
							@ -370,7 +370,8 @@
 | 
			
		||||
   a =non-nil= value mail is setup.
 | 
			
		||||
 | 
			
		||||
   #+BEGIN_SRC emacs-lisp :tangle yes
 | 
			
		||||
     (let ((load-mail-setup nil))
 | 
			
		||||
     (defvar load-mail-setup nil)
 | 
			
		||||
     
 | 
			
		||||
     (when load-mail-setup
 | 
			
		||||
       ;; Dependent on both mu4e and smtpmail (for sending only).
 | 
			
		||||
       (require 'mu4e)
 | 
			
		||||
@ -413,7 +414,7 @@
 | 
			
		||||
         (delete-other-windows))
 | 
			
		||||
     
 | 
			
		||||
       ;; Overwrite the native 'compose-mail' binding to 'show-mu4e'.
 | 
			
		||||
         (global-set-key (kbd "C-x m") 'show-mu4e)))
 | 
			
		||||
       (global-set-key (kbd "C-x m") 'show-mu4e))
 | 
			
		||||
   #+END_SRC
 | 
			
		||||
 | 
			
		||||
** Flyspell
 | 
			
		||||
 | 
			
		||||
		Loading…
	
		Reference in New Issue
	
	Block a user