spacemacs/contrib/auctex/packages.el
2015-04-07 12:15:31 -04:00

69 lines
2.1 KiB
EmacsLisp

(defvar auctex-packages
'(
auctex
evil-matchit
company-auctex
))
(defun auctex/init-auctex ()
(use-package tex
:defer t
:config
(progn
(when (configuration-layer/layer-usedp 'auto-completion)
(company-auctex-init))
(defun auctex/build-view ()
(interactive)
(if (buffer-modified-p)
(progn
(let ((TeX-save-query nil))
(TeX-save-document (TeX-master-file)))
(setq build-proc (TeX-command "LaTeX" 'TeX-master-file -1))
(set-process-sentinel build-proc 'auctex/build-sentinel))
(TeX-view)))
(defun auctex/build-sentinel (process event)
(if (string= event "finished\n")
(TeX-view)
(message "Errors! Check with C-`")))
(add-hook 'LaTeX-mode-hook '(lambda () (local-set-key (kbd "H-r") 'auctex/build-view)))
(add-hook 'LaTeX-mode-hook 'flyspell-mode)
(add-hook 'LaTeX-mode-hook 'company-mode)
(add-hook 'LaTeX-mode-hook 'LaTeX-math-mode)
(add-hook 'LaTeX-mode-hook 'spacemacs/load-yasnippet)
(setq spacemacs/key-binding-prefixes '(("mp" . "LaTeX Preview")))
(evil-leader/set-key-for-mode 'latex-mode
"mb" 'auctex/build-view
"me" 'LaTeX-environment
"mc" 'LaTeX-close-environment
"mi" 'LaTeX-insert-item
"mf" 'TeX-font ;; Find a way to rebind tex-fonts
"mC" 'TeX-command-master
"mpr" 'preview-region
"mpb" 'preview-buffer
"mpd" 'preview-document
"mpe" 'preview-environment
"mps" 'preview-section
"mpp" 'preview-at-point
"mpf" 'preview-cache-preamble
"mpc" 'preview-clearout
"mhd" 'TeX-doc ;; TeX-doc is a very slow function
)
(setq-default TeX-auto-save t)
(setq-default TeX-parse-self t)
(setq-default TeX-PDF-mode t))))
(defun auctex/init-company-auctex ()
(use-package company-auctex :defer t
:if (configuration-layer/layer-usedp 'auto-completion)))
(defun auctex/post-init-evil-matchit ()
(add-hook 'web-mode-hook 'evil-matchit-mode))