ryuslash/legacy-dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

.emacs.d/site-lisp/oni.el

Browse source
This commit is contained in:
Tom Willemsen 2012-11-05 21:04:56 +01:00
parent 1c630b0ad7
commit 2490c4a89c
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
.emacs.d/site-lisp/oni.el
View file

@ -293,11 +293,13 @@ If COUNT has been specified indent by that much, otherwise look at
(defun oni:markdown-mode-func () (defun oni:markdown-mode-func ()
"Function for `markdown-mode-hook'." "Function for `markdown-mode-hook'."
(setq-local comment-auto-fill-only-comments nil)
(auto-fill-mode) (auto-fill-mode)
(whitespace-mode)) (whitespace-mode))
(defun oni:message-mode-func () (defun oni:message-mode-func ()
"Function for `message-mode-hook'." "Function for `message-mode-hook'."
(setq-local comment-auto-fill-only-comments nil)
(auto-fill-mode) (auto-fill-mode)
(flyspell-mode) (flyspell-mode)
(ispell-change-dictionary (read-string "New dictionary: "))) (ispell-change-dictionary (read-string "New dictionary: ")))
@ -563,5 +565,11 @@ for easy selection."
"Function for `write-file-hooks'." "Function for `write-file-hooks'."
(time-stamp)) (time-stamp))
(define-skeleton html-tag
"Testing creation of an html tag"
"Tagname:"
"<" str ("Attribute: " " " str "=\"" (skeleton-read "Value: ") "\"") ">\n"
"</" str ">\n")
(provide 'oni) (provide 'oni)
;;; oni.el ends here ;;; oni.el ends here