[elpa] externals/svg-tag-mode 1c58c97f1a 10/12: Fix default value and custom type of svg-tag-tags

[ELPA Syncer]

branch: externals/svg-tag-mode
commit 1c58c97f1a4edfb97a7b2886a0465f4f35d3510b
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    Fix default value and custom type of svg-tag-tags
    
    Also change matched text to match the examples.
---
 svg-tag-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/svg-tag-mode.el b/svg-tag-mode.el
index ea30dd92e9..05a24cea39 100644
--- a/svg-tag-mode.el
+++ b/svg-tag-mode.el
@@ -138,14 +138,14 @@ This is in contrast to merely setting it to 0."
     p))
 
 (defcustom svg-tag-tags
-  `(("^TODO" . ((svg-tag-make "TODO") nil nil)))
+  `((":TODO:" (lambda (_) (svg-tag-make "TODO")) nil nil))
   "An alist mapping keywords to tags used to display them.
 
 Each entry has the form (keyword . tag).  Keyword is used as part
 of a regular expression and tag is  a function that takes a
 string as argument and returns a SVG tag."
   :type '(repeat (cons (string :tag "Keyword")
-                       (list (sexp     :tag "Tag")
+                       (list (function :tag "Tag")
                              (sexp     :tag "Command")
                              (sexp     :tag "Help")))))