Better docs for the C-u prefix magic numbers

This commit is contained in:
Carlo Sciolla 2016-03-24 23:25:51 +01:00
parent 56cd3f393d
commit 463aa0d54b
1 changed files with 4 additions and 3 deletions

View File

@ -191,7 +191,10 @@ default output type for new buffers."
(concat "-t" puml-output-type)) (concat "-t" puml-output-type))
(defun puml-preview (prefix) (defun puml-preview (prefix)
"Preview diagram." "Preview diagram, using prefix (as PREFIX) to choose where to display it:
- 4 (when prefixing the command with C-u) -> new window
- 16 (when prefixing the command with C-u C-u) -> new frame.
- else -> new buffer"
(interactive "p") (interactive "p")
(let ((b (get-buffer puml-preview-buffer))) (let ((b (get-buffer puml-preview-buffer)))
(when b (when b
@ -239,8 +242,6 @@ default output type for new buffers."
;; note: order matters ;; note: order matters
)) ))
(setq puml-plantuml-kwdList (make-hash-table :test 'equal)) (setq puml-plantuml-kwdList (make-hash-table :test 'equal))
(mapc (lambda (x) (puthash x t puml-plantuml-kwdList)) puml-plantuml-types) (mapc (lambda (x) (puthash x t puml-plantuml-kwdList)) puml-plantuml-types)
(mapc (lambda (x) (puthash x t puml-plantuml-kwdList)) puml-plantuml-keywords) (mapc (lambda (x) (puthash x t puml-plantuml-kwdList)) puml-plantuml-keywords)