| @ -0,0 +1,35 @@ | |||||
| #+TITLE: Language - Graphviz | |||||
| #+AUTHOR: Juan Placencia | |||||
| * Package | |||||
| Define Graphviz language package. | |||||
| #+BEGIN_SRC emacs-lisp | |||||
| (use-package emacs | |||||
| :after uno-lang | |||||
| :config | |||||
| (provide 'uno-lang-graphviz)) | |||||
| #+END_SRC | |||||
| * Graphviz | |||||
| #+BEGIN_SRC emacs-lisp | |||||
| (use-package graphviz-dot-mode | |||||
| :after uno-lang-graphviz | |||||
| :general | |||||
| (uno-mode-leader-define | |||||
| :keymaps 'graphviz-dot-mode-map | |||||
| "c" '(compile :which-key "Compile") | |||||
| uno-mode-leader-key '(graphviz-dot-preview :which-key "Preview") | |||||
| "t" '(uno/lang/graphviz/live-preview :which-key "Toggle live preview")) | |||||
| :init | |||||
| (defun uno/lang/graphviz/live-preview () | |||||
| "Toggle graphviz live preview." | |||||
| (interactive) | |||||
| (if graphviz-dot-auto-preview-on-save | |||||
| (graphviz-turn-off-live-preview) | |||||
| (progn | |||||
| (graphviz-turn-on-live-preview) | |||||
| (graphviz-dot-preview))))) | |||||
| #+END_SRC | |||||