.emacs-my
changeset 938 d063544b9199
parent 937 8f8987262795
child 939 efac9eeab57c
equal deleted inserted replaced
937:8f8987262795 938:d063544b9199
  1269 
  1269 
  1270 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1270 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1271 (message "mail, message")
  1271 (message "mail, message")
  1272 
  1272 
  1273 (setq mail-user-agent 'message-user-agent)
  1273 (setq mail-user-agent 'message-user-agent)
       
  1274 
       
  1275 (defun my-compose-mail ()
       
  1276   (interactive)
       
  1277   (compose-mail nil nil `(("Organization" . ,(getenv "ORGANIZATION")))))
       
  1278 (global-set-key (kbd "C-x m") #'my-compose-mail)
  1274 
  1279 
  1275 (setq message-citation-line-format "On %Y-%m-%d, %N wrote:
  1280 (setq message-citation-line-format "On %Y-%m-%d, %N wrote:
  1276 ")
  1281 ")
  1277 (setq message-citation-line-function 'message-insert-formatted-citation-line)
  1282 (setq message-citation-line-function 'message-insert-formatted-citation-line)
  1278 
  1283