#+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

** Org Babel
#+BEGIN_SRC emacs-lisp
  (use-package graphviz-dot-mode
    :after (uno-lang-graphviz org)
    :config
    (org-babel-do-load-languages
     'org-babel-load-languages
     '((dot . t))))
#+END_SRC