Stop trying to create TAGS after save

This commit is contained in:
Tom Willemse 2015-12-16 22:38:30 +01:00
parent 3f90dcdd7d
commit 7888c07c0a

View file

@ -137,16 +137,6 @@ MODE1 is enabled and vice-versa."
;;;; Functions ;;;; Functions
(defun oni:after-save-func ()
"Function for `after-save-hook'."
(executable-make-buffer-file-executable-if-script-p)
(let* ((dom-dir (locate-dominating-file (buffer-file-name) "Makefile"))
(TAGSp (not (string= "" (shell-command-to-string
(concat "grep \"^TAGS:\" " dom-dir "Makefile"))))))
(when (and dom-dir TAGSp)
(shell-command
(concat "make -C " dom-dir " TAGS >/dev/null 2>&1")))))
(defun oni:augment-sql-prompt () (defun oni:augment-sql-prompt ()
"Add the MariaDB prompt to the `sql-prompt-regexp'." "Add the MariaDB prompt to the `sql-prompt-regexp'."
(if (eq sql-product 'mysql) (if (eq sql-product 'mysql)
@ -1100,7 +1090,11 @@ If no direction is given, don't split."
;;;; Hooks ;;;; Hooks
(add-hook 'eshell-first-time-mode-hook 'oni-eshell-set-prompt) (add-hook 'eshell-first-time-mode-hook 'oni-eshell-set-prompt)
(add-hook 'after-save-hook 'oni:after-save-func t)
;; Automatically make shell scripts executable after saving.
(add-hook 'after-save-hook
'executable-make-buffer-file-executable-if-script-p :append)
(add-hook 'before-save-hook 'oni:before-save-func) (add-hook 'before-save-hook 'oni:before-save-func)
(add-hook 'css-mode-hook #'rainbow-mode) (add-hook 'css-mode-hook #'rainbow-mode)
(add-hook 'diary-display-hook 'oni:diary-display-func) (add-hook 'diary-display-hook 'oni:diary-display-func)