projects
/
elisp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Update.
[elisp.git]
/
vm
diff --git
a/vm
b/vm
index
57aea1f
..
b9e7233
100644
(file)
--- a/
vm
+++ b/
vm
@@
-327,29
+327,24
@@
attachement from mail."
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Activate the required modes and authorize the commenting
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Activate the required modes and authorize the commenting
+(defun ff/does-not-fill (&optional a b) (interactive) (message "Nope"))
+
(defun ff/prepare-mail-mode ()
(bbdb-define-all-aliases)
(flyspell-mode)
(defun ff/prepare-mail-mode ()
(bbdb-define-all-aliases)
(flyspell-mode)
- (auto-fill-mode)
(mail-abbrevs-setup)
(yas/minor-mode)
(mail-abbrevs-setup)
(yas/minor-mode)
- ;;
(setq fill-paragraph-function 'mail-mode-fill-paragraph)
+ ;;
Let's try the visual-line mode for mails
- ;; Since I set the comment prefix, I have to tell the filling
- ;; functions not to use it
+ (auto-fill-mode)
+ ;; (setq fill-paragraph-function 'ff/does-not-fill)
+ ;; (visual-line-mode)
- ;; ******************* removed Aug 23
- ;; (setq fill-paragraph-handle-comment nil)
- ;; ;; (when message-yank-prefix
(set (make-local-variable 'comment-start) vm-included-text-prefix)
(set (make-local-variable 'comment-start) vm-included-text-prefix)
- ;; (set (make-local-variable 'comment-start-skip)
- ;; (concat "^\\(" (regexp-quote vm-included-text-prefix) "\\)"))
- ;; ;; )
)
(add-hook 'mail-mode-hook 'ff/prepare-mail-mode)
)
(add-hook 'mail-mode-hook 'ff/prepare-mail-mode)
-;; (add-hook 'mail-mode-hook 'orgtbl-mode)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; To have a slightly darker background for headers
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; To have a slightly darker background for headers