forked from colonelpanic/dotfiles
[Emacs] Add linux support for puml-mode
This commit is contained in:
parent
a34afd17e8
commit
60a96fdc82
@ -2949,14 +2949,18 @@ This mode seems to be better maintained than plantuml-mode
|
|||||||
:mode ("\\.puml\\'" "\\.plantuml\\'")
|
:mode ("\\.puml\\'" "\\.plantuml\\'")
|
||||||
:preface
|
:preface
|
||||||
(progn
|
(progn
|
||||||
(if (equal system-type 'darwin)
|
(cond ((equal system-type 'darwin)
|
||||||
(let* ((plantuml-dir
|
(let* ((plantuml-dir
|
||||||
(s-trim (shell-command-to-string "brew --prefix plantuml")))
|
(s-trim (shell-command-to-string "brew --prefix plantuml")))
|
||||||
(filename
|
(filename
|
||||||
(--first (s-ends-with? ".jar" it) (directory-files plantuml-dir)))
|
(--first (s-ends-with? ".jar" it) (directory-files plantuml-dir)))
|
||||||
(filepath (imalison:join-paths plantuml-dir filename)))
|
(filepath (imalison:join-paths plantuml-dir filename)))
|
||||||
(setq puml-plantuml-jar-path filepath
|
(setq puml-plantuml-jar-path filepath
|
||||||
org-plantuml-jar-path filepath)))
|
org-plantuml-jar-path filepath)))
|
||||||
|
((equal system-type 'gnu/linux)
|
||||||
|
(let ((filepath "/opt/plantuml/plantuml.jar"))
|
||||||
|
(setq puml-plantuml-jar-path filepath
|
||||||
|
org-plantuml-jar-path filepath))))
|
||||||
(add-to-list
|
(add-to-list
|
||||||
'org-src-lang-modes '("plantuml" . puml))))
|
'org-src-lang-modes '("plantuml" . puml))))
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
|
Loading…
Reference in New Issue
Block a user