108 lines
2.6 KiB
EmacsLisp
108 lines
2.6 KiB
EmacsLisp
(defvar trishume-packages
|
|
'(
|
|
auctex
|
|
smooth-scrolling
|
|
idris-mode
|
|
arduino-mode
|
|
scad-mode
|
|
qml-mode
|
|
julia-mode
|
|
helm-ag
|
|
lua-mode
|
|
racket-mode
|
|
go-mode
|
|
yaml-mode
|
|
ag
|
|
))
|
|
|
|
(defun trishume/init-auctex ()
|
|
(defun load-auctex-on-demand ()
|
|
(interactive)
|
|
(use-package tex
|
|
:config
|
|
(progn
|
|
(use-package smartparens
|
|
:config (require 'smartparens-latex))
|
|
|
|
(defun 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 'build-sentinel))
|
|
(TeX-view)))
|
|
|
|
(defun 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") 'build-view)))
|
|
(add-hook 'LaTeX-mode-hook 'flyspell-mode)
|
|
(add-hook 'LaTeX-mode-hook 'LaTeX-math-mode)
|
|
|
|
(evil-leader/set-key
|
|
"oe" 'LaTeX-environment
|
|
"oc" 'LaTeX-close-environment)
|
|
|
|
(setq-default TeX-auto-save t)
|
|
(setq-default TeX-parse-self t)
|
|
(setq-default TeX-master nil)
|
|
(setq-default TeX-PDF-mode t))))
|
|
(evil-leader/set-key
|
|
"el" 'load-auctex-on-demand))
|
|
|
|
(defun trishume/init-smooth-scrolling ()
|
|
(use-package smooth-scrolling
|
|
:init
|
|
(setq scroll-margin 5
|
|
scroll-conservatively 9999
|
|
scroll-step 1)))
|
|
|
|
(defun trishume/init-arduino-mode ()
|
|
(use-package arduino-mode :defer t))
|
|
|
|
(defun trishume/init-idris-mode ()
|
|
(use-package idris-mode :defer t))
|
|
|
|
(defun trishume/init-scad-mode ()
|
|
(use-package scad-mode :defer t))
|
|
|
|
(defun trishume/init-qml-mode ()
|
|
(use-package qml-mode :defer t))
|
|
|
|
(defun trishume/init-julia-mode ()
|
|
(use-package julia-mode :defer t))
|
|
|
|
(defun trishume/init-helm-ag ()
|
|
(use-package helm-ag
|
|
:init
|
|
(progn
|
|
(defun trishume-helm-ag ()
|
|
(interactive)
|
|
(helm-ag (projectile-project-root)))
|
|
(evil-leader/set-key
|
|
"oa" 'trishume-helm-ag))))
|
|
|
|
(defun trishume/init-lua-mode ()
|
|
(use-package lua-mode
|
|
:defer t))
|
|
|
|
(defun trishume/init-go-mode ()
|
|
(use-package go-mode
|
|
:defer t))
|
|
|
|
(defun trishume/init-yaml-mode ()
|
|
(use-package yaml-mode
|
|
:defer t))
|
|
|
|
(defun trishume/init-racket-mode ()
|
|
(use-package racket-mode
|
|
:defer t
|
|
:config
|
|
(add-hook 'racket-mode-hook
|
|
'(lambda ()
|
|
(define-key racket-mode-map (kbd "H-r") 'racket-run)))))
|