Merge branch pull request #29 into develop

This commit is contained in:
Carlo Sciolla 2016-10-17 16:23:32 +02:00
commit 1ef4fcef2e
1 changed files with 31 additions and 29 deletions

View File

@ -273,6 +273,7 @@ Uses prefix (as PREFIX) to choose where to display it:
(plantuml-preview-region prefix)
(plantuml-preview-buffer prefix)))
(defun plantuml-init-once ()
(unless plantuml-kwdList
(plantuml-init)
(defvar plantuml-types-regexp (concat "^\\s *\\(" (regexp-opt plantuml-types 'words) "\\|\\<\\(note\\s +over\\|note\\s +\\(left\\|right\\|bottom\\|top\\)\\s +\\(of\\)?\\)\\>\\|\\<\\(\\(left\\|center\\|right\\)\\s +\\(header\\|footer\\)\\)\\>\\)"))
@ -304,7 +305,7 @@ Uses prefix (as PREFIX) to choose where to display it:
(setq plantuml-types-regexp nil)
(setq plantuml-keywords-regexp nil)
(setq plantuml-builtins-regexp nil)
(setq plantuml-preprocessors-regexp nil))
(setq plantuml-preprocessors-regexp nil)))
(defun plantuml-complete-symbol ()
"Perform keyword completion on word before cursor."
@ -338,6 +339,7 @@ Uses prefix (as PREFIX) to choose where to display it:
Shortcuts Command Name
\\[plantuml-complete-symbol] `plantuml-complete-symbol'"
(plantuml-init-once)
(make-local-variable 'plantuml-output-type)
(set (make-local-variable 'comment-start-skip) "\\('+\\|/'+\\)\\s *")
(set (make-local-variable 'comment-start) "/'")