Some cleanup
This commit is contained in:
parent
d6b0f4d8cd
commit
2e77834b80
|
@ -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)
|
||||
(setq plantuml-exec-mode (intern (completing-read (format "Exec mode [%s]: " plantuml-exec-mode)
|
||||
supported-modes
|
||||
nil
|
||||
t
|
||||
nil
|
||||
nil
|
||||
plantuml-exec-mode))))
|
||||
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)
|
||||
(completing-read (format "Output type [%s]: " plantuml-output-type)
|
||||
available-types
|
||||
nil
|
||||
t
|
||||
nil
|
||||
nil
|
||||
plantuml-output-type))))
|
||||
plantuml-output-type)))
|
||||
|
||||
(defun plantuml-set-output-type (type)
|
||||
"Set the desired output type (as TYPE) for the current buffer.
|
||||
|
|
Loading…
Reference in New Issue