yatex

changeset 611:e87c3271b8fd dev tip

Add "meter" and "progress" completions
author HIROSE Yuuji <yuuji@gentei.org>
date Mon, 17 Jul 2023 17:05:45 +0900
parents dd4ed4c255c7
children
files yahtml.el
diffstat 1 files changed, 21 insertions(+), 0 deletions(-) [+]
line diff
     1.1 --- a/yahtml.el	Sun Dec 25 14:24:43 2022 +0900
     1.2 +++ b/yahtml.el	Mon Jul 17 17:05:45 2023 +0900
     1.3 @@ -447,6 +447,7 @@
     1.4      ;;HTML5
     1.5      ("video") ("audio") ("figure") ("iframe")
     1.6      ("header") ("footer") ("article") ("section") ("nav") ("main") ("aside")
     1.7 +    ("meter") ("progress")
     1.8      ))
     1.9  
    1.10  (if yahtml-html4-strict
    1.11 @@ -1727,6 +1728,26 @@
    1.12  (defun yahtml::article ()
    1.13    (setq yahtml-last-typeface-cmd "h1" yahtml-last-begend "h1"))
    1.14  
    1.15 +(defun yahtml:meter ()
    1.16 +  (concat
    1.17 +   (yahtml-make-optional-argument
    1.18 +    "min" (yahtml-read-parameter "min"))
    1.19 +   (yahtml-make-optional-argument
    1.20 +    "max" (yahtml-read-parameter "max"))
    1.21 +   (yahtml-make-optional-argument
    1.22 +    "low" (yahtml-read-parameter "low"))
    1.23 +   (yahtml-make-optional-argument
    1.24 +    "high" (yahtml-read-parameter "high"))
    1.25 +   (yahtml-make-optional-argument
    1.26 +    "value" (yahtml-read-parameter "value"))))
    1.27 +
    1.28 +(defun yahtml:progress ()
    1.29 +  (concat
    1.30 +   (yahtml-make-optional-argument
    1.31 +    "max" (yahtml-read-parameter "max"))
    1.32 +   (yahtml-make-optional-argument
    1.33 +    "value" (yahtml-read-parameter "value"))))
    1.34 +
    1.35  ;;; ---------- Simple tag ----------
    1.36  (defun yahtml-insert-tag (region-mode &optional tag)
    1.37    "Insert <TAG> </TAG> and put cursor inside of them."