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."