Mercurial > hgrepos > hgweb.cgi > yatex
changeset 611:e87c3271b8fd draft 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 wrap: on
line diff
--- a/yahtml.el Sun Dec 25 14:24:43 2022 +0900 +++ b/yahtml.el Mon Jul 17 17:05:45 2023 +0900 @@ -447,6 +447,7 @@ ;;HTML5 ("video") ("audio") ("figure") ("iframe") ("header") ("footer") ("article") ("section") ("nav") ("main") ("aside") + ("meter") ("progress") )) (if yahtml-html4-strict @@ -1727,6 +1728,26 @@ (defun yahtml::article () (setq yahtml-last-typeface-cmd "h1" yahtml-last-begend "h1")) +(defun yahtml:meter () + (concat + (yahtml-make-optional-argument + "min" (yahtml-read-parameter "min")) + (yahtml-make-optional-argument + "max" (yahtml-read-parameter "max")) + (yahtml-make-optional-argument + "low" (yahtml-read-parameter "low")) + (yahtml-make-optional-argument + "high" (yahtml-read-parameter "high")) + (yahtml-make-optional-argument + "value" (yahtml-read-parameter "value")))) + +(defun yahtml:progress () + (concat + (yahtml-make-optional-argument + "max" (yahtml-read-parameter "max")) + (yahtml-make-optional-argument + "value" (yahtml-read-parameter "value")))) + ;;; ---------- Simple tag ---------- (defun yahtml-insert-tag (region-mode &optional tag) "Insert <TAG> </TAG> and put cursor inside of them."
