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-12-04 17:45:20 +01:00
parent 272c8f7238
commit ac510449fc
1 changed files with 5 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -58,11 +58,9 @@ DOT are intentionally being skipped."
"A mailbox map for use with `tmm-prompt'.") "A mailbox map for use with `tmm-prompt'.")
(defvar oni:required-packages (defvar oni:required-packages
'(graphviz-dot-mode htmlize magit rainbow-delimiters '(graphviz-dot-mode htmlize magit rainbow-delimiters rainbow-mode
rainbow-mode yasnippet markdown-mode flymake yasnippet markdown-mode flymake flymake-cursor sauron expand-region
flymake-cursor pony-mode sauron dispass fill-column-indicator git-auto-commit-mode idomenu magit smex)
expand-region fill-column-indicator
git-auto-commit-mode idomenu magit smex)
"List of all the packages I have (want) installed.") "List of all the packages I have (want) installed.")
(defun oni:after-save-func () (defun oni:after-save-func ()
@ -71,7 +69,8 @@ DOT are intentionally being skipped."
(executable-make-buffer-file-executable-if-script-p) (executable-make-buffer-file-executable-if-script-p)
(let ((dom-dir (locate-dominating-file (buffer-file-name) "Makefile"))) (let ((dom-dir (locate-dominating-file (buffer-file-name) "Makefile")))
(when dom-dir (when dom-dir
(shell-command (concat "make -C " dom-dir " TAGS >/dev/null 2>&1"))))) (shell-command
(concat "make -C " dom-dir " TAGS >/dev/null 2>&1")))))
(defun oni:before-save-func () (defun oni:before-save-func ()
"Function for `before-save-hook'." "Function for `before-save-hook'."