.emacs-my
changeset 779 df488c333452
parent 778 5caafff0b291
child 780 afc4ee8b5dea
--- a/.emacs-my	Tue Nov 08 00:56:22 2011 +0200
+++ b/.emacs-my	Tue Nov 08 00:59:39 2011 +0200
@@ -1160,6 +1160,28 @@
 (setq fortune-file "~/XXX")
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "mail, message")
+
+(setq mail-signature t)
+(setq mail-signature-file "~/.signature")
+;; (add-hook 'mail-setup-hook 'fortune-to-signature)
+
+;; (setq mail-from-style 'angles)
+
+(setq mail-personal-alias-file "~/.mailrc")
+;; Initialize from your mail aliases file...
+(setq mail-aliases t)
+
+(eval-after-load 'message
+  '(progn
+     (require 'mailabbrev)
+     (define-key message-mode-map "\e\t" 'mail-abbrev-complete-alias)
+     ))
+
+;; Kill message buffer after mail send. You always can use C-c C-s to preserve it.
+(setq message-kill-buffer-on-exit t)
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "smtp, smtpmail")
 
 (when (boundp 'smtpmail-smtp-server)
@@ -1180,26 +1202,7 @@
 (add-hook 'message-mode-hook 'my-message-mode-hook)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-(message "mail, gnus, mh-e")
-
-(setq mail-signature t)
-(setq mail-signature-file "~/.signature")
-;; (add-hook 'mail-setup-hook 'fortune-to-signature)
-
-;; (setq mail-from-style 'angles)
-
-(setq mail-personal-alias-file "~/.mailrc")
-;; Initialize from your mail aliases file...
-(setq mail-aliases t)
-
-(eval-after-load 'message
-  '(progn
-     (require 'mailabbrev)
-     (define-key message-mode-map "\e\t" 'mail-abbrev-complete-alias)
-     ))
-
-;; Kill message buffer after mail send. You always can use C-c C-s to preserve it.
-(setq message-kill-buffer-on-exit t)
+(message "gnus, mh-e")
 
 (setq gnus-site-init-file "~/.gnus.el")