diff --git a/yahtml.el b/yahtml.el index f7f763c..ae6f69a 100644 --- a/yahtml.el +++ b/yahtml.el @@ -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 and put cursor inside of them."