emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/svg-tag-mode 2bcf213527 26/63: Added global mode


From: ELPA Syncer
Subject: [elpa] externals/svg-tag-mode 2bcf213527 26/63: Added global mode
Date: Mon, 27 Dec 2021 15:57:58 -0500 (EST)

branch: externals/svg-tag-mode
commit 2bcf2135276b634b2cac7b66b4addfefc1ee502f
Author: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Commit: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>

    Added global mode
---
 example-2.el    |  2 +-
 svg-tag-mode.el | 12 ++++++++----
 2 files changed, 9 insertions(+), 5 deletions(-)

diff --git a/example-2.el b/example-2.el
index a5f54c978e..9670b35a08 100644
--- a/example-2.el
+++ b/example-2.el
@@ -68,7 +68,7 @@
         ("<[0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\} [A-Za-z]\\{3\\}>"
                                             . svg-tag-make-org-date)))
 
-(svg-tag-mode 1)
+(global-svg-tag-mode)
 
 ;; To do:      TODO  NEXT  HOLD  DONE  
 ;; Tags:       :@MEETING:@NOTE:
diff --git a/svg-tag-mode.el b/svg-tag-mode.el
index 9ade4494c7..07fe80e433 100644
--- a/svg-tag-mode.el
+++ b/svg-tag-mode.el
@@ -198,7 +198,8 @@ INNER-PADDING, OUTER-PADDING and RADIUS controls the visual 
aspect of the box."
     (font-lock-add-keywords nil
                             (mapcar 'svg-tag--build-keywords svg-tag-tags)))
   (setq svg-tag-tags--active (copy-sequence svg-tag-tags))
-  (message "SVG tag mode on"))
+  (message "SVG tag mode on")
+  (font-lock-flush))
 
 (defun svg-tag-mode-off ()
   "Deactivate SVG tag mode."
@@ -206,13 +207,16 @@ INNER-PADDING, OUTER-PADDING and RADIUS controls the 
visual aspect of the box."
     (font-lock-remove-keywords nil
                (mapcar 'svg-tag--build-keywords svg-tag-tags--active)))
   (setq svg-tag-tags--active nil)
-  (message "SVG tag mode off"))
+  (message "SVG tag mode off")
+  (font-lock-flush))
 
 (define-minor-mode svg-tag-mode
   "Minor mode for graphical tag as rounded box."
   :group 'svg-tag
-  (if svg-tag-mode (svg-tag-mode-on) (svg-tag-mode-off))
-  (font-lock-flush))
+  (if svg-tag-mode (svg-tag-mode-on) (svg-tag-mode-off)))
+
+(define-globalized-minor-mode
+   global-svg-tag-mode svg-tag-mode svg-tag-mode-on)
 
 (provide 'svg-tag-mode)
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]