  )
 
 
+;;;;;;;;;;;;;;;;;;;;
+;; Mutt-alias
+;;;;;;;;;;;;;;;;;;;;
+
+
+(defun use-jpw-mutt-mode ()
+  (interactive)
+  (local-set-key "\C-c\C-a" 'mutt-alias-insert)
+  (local-set-key [?\C-c ?\C-/] 'mutt-alias-lookup)
+  )
+
+(require 'mutt-alias)
+(jpw-custom-set-variables-nonsaved
+ '(mutt-alias-file-list (quote ("~/Mail/mutt/aliases"
+                                "~/Mail/mutt/aliases.prof"
+                                "~/Mail/mutt/aliases.work"
+                                "~/Mail/mutt/aliases.sb")))
+ )
+
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;

;;;;;;;;;;;;;;;;;;;;

(require 'mutt)
(jpw-custom-set-faces-nonsaved
 '(mutt-header-keyword-face 
   ((t (:inherit font-lock-keyword-face :weight bold))))



;;;;;;;;;;;;;;;;;;;;
;; Muttrc
;;;;;;;;;;;;;;;;;;;;

