From 9c509f879dd16bce7d8b49853dc6fc5e375a60af Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Matthias=20M=C3=BCller?= Date: Wed, 26 Oct 2016 01:03:37 +0200 Subject: [PATCH 1/3] Add plantuml-preview-current-block Add a function that allows to preview the current block. The current block is defined to be the region beginning at previous "@startuml" and ending at "@enduml". The prefix argument is handled according to the existing prview functions. --- plantuml-mode.el | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/plantuml-mode.el b/plantuml-mode.el index 6947bcd..c803e9c 100644 --- a/plantuml-mode.el +++ b/plantuml-mode.el @@ -278,6 +278,18 @@ Uses prefix (as PREFIX) to choose where to display it: (region-beginning) (region-end)) "\n@enduml"))) +(defun plantuml-preview-current-block (prefix) + "Preview diagram from the PlantUML sources from the previous @startuml to the next @enduml. +Uses 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") + (save-restriction + (narrow-to-region + (search-backward "@startuml") (search-forward "@enduml")) + (plantuml-preview-buffer prefix))) + (defun plantuml-preview (prefix) "Preview diagram from the PlantUML sources. Uses the current region if one is active, or the entire buffer otherwise. From 5629fe1ce7d16b6c4dead16587865c1f009d40b4 Mon Sep 17 00:00:00 2001 From: Your Name Date: Sat, 22 Oct 2016 09:13:52 -0500 Subject: [PATCH 2/3] Fixed regexp match pattern to truely match suffixes .plantuml .pum .plu. --- plantuml-mode.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/plantuml-mode.el b/plantuml-mode.el index c803e9c..45c3350 100644 --- a/plantuml-mode.el +++ b/plantuml-mode.el @@ -361,7 +361,7 @@ Uses prefix (as PREFIX) to choose where to display it: (message "Making completion list...%s" "done"))))) ;;;###autoload -(add-to-list 'auto-mode-alist '("\\.(plantuml\\|pum\\|plantuml\\|plu)\\'" . plantuml-mode)) +(add-to-list 'auto-mode-alist '("\\.\\(plantuml\\|pum\\|plu\\)\\'" . plantuml-mode)) ;;;###autoload (define-derived-mode plantuml-mode prog-mode "plantuml" From f43e67b091acb8c8c389b60960ade0d2a417b8dd Mon Sep 17 00:00:00 2001 From: Andrew Lyu Date: Fri, 28 Oct 2016 12:13:24 +0800 Subject: [PATCH 3/3] Remove duplicate rows --- README.md | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/README.md b/README.md index 207e7f2..efbd62c 100644 --- a/README.md +++ b/README.md @@ -33,11 +33,10 @@ Also, to enable preview you need to tell `plantuml-mode` where to locate the Pla # Enable the major mode -You can automatically enable `plantuml-mode` for files with extension `.plantuml` or `plantuml` by adding the following to your `.emacsrc`: +You can automatically enable `plantuml-mode` for files with extension `.plantuml` by adding the following to your `.emacsrc`: ;; Enable plantuml-mode for PlantUML files (add-to-list 'auto-mode-alist '("\\.plantuml\\'" . plantuml-mode)) - (add-to-list 'auto-mode-alist '("\\.plantuml\\'" . plantuml-mode)) Of course, you can always enable manually the major mode by typing `M-x plantuml-mode` once in the desired PlantUML file buffer.