emacs
/
plantuml-mode
mirror of https://github.com/skuro/plantuml-mode.git
1
0
Fork 0
Code Issues Releases Wiki Activity

Some cleanup

This commit is contained in:
Carlo Sciolla 2019-05-26 23:27:16 +02:00
parent d6b0f4d8cd
commit 2e77834b80
No known key found for this signature in database
GPG Key ID: BA5D71E6F3C580C1
1 changed files with 14 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
plantuml-mode.el
View File

@ -165,13 +165,13 @@
(interactive)
(let* ((completion-ignore-case t)
(supported-modes '("jar" "server")))
(setq plantuml-exec-mode (completing-read (format "Exec mode [%s]: " plantuml-exec-mode)
supported-modes
nil
t
nil
nil
plantuml-exec-mode))))
(setq plantuml-exec-mode (intern (completing-read (format "Exec mode [%s]: " plantuml-exec-mode)
supported-modes
nil
t
nil
nil
plantuml-exec-mode)))))
(defun plantuml-enable-debug ()
"Enables debug messages into the *PLANTUML Messages* buffer."
@ -299,13 +299,13 @@
(and (image-type-available-p 'svg) '("svg"))
(and (image-type-available-p 'png) '("png"))
'("txt"))))
(setq plantuml-output-type (completing-read (format "Output type [%s]: " plantuml-output-type)
available-types
nil
t
nil
nil
plantuml-output-type))))
(completing-read (format "Output type [%s]: " plantuml-output-type)
available-types
nil
t
nil
nil
plantuml-output-type)))
(defun plantuml-set-output-type (type)
"Set the desired output type (as TYPE) for the current buffer.