1.1 --- a/examples/common/default/default.css	Tue Jun 26 07:55:41 2018 +0900
     1.2 +++ b/examples/common/default/default.css	Sat Jun 30 15:46:59 2018 +0900
     1.3 @@ -98,6 +98,8 @@
     1.4      white-space: pre-wrap;
     1.5  }
     1.6  table.bloghead tr.preface td,
     1.7 +table.blog_replies video,
     1.8 +table.blog_replies iframe,
     1.9  table.blog_replies ul, .blog_replies tr ul, .blog_replies td ul {
    1.10      text-align: left; white-space: normal; margin: 1ex 0;
    1.11  }

     2.1 --- a/s4-funcs.sh	Tue Jun 26 07:55:41 2018 +0900
     2.2 +++ b/s4-funcs.sh	Sat Jun 30 15:46:59 2018 +0900
     2.3 @@ -459,6 +459,7 @@
     2.4    # s4 specific notation:
     2.5    #   ^href=URL
     2.6    #   ^iframe=URL
     2.7 +  #   ^video=URL
     2.8    #   [[#NUM]]		- Jump to article ID NUM
     2.9    #   [[#Keyword]	- Jump to keywrod search for "Keyword"
    2.10    # OSM umap Wikistyle Notation:
    2.11 @@ -487,6 +488,7 @@
    2.12        -e "s|{{\($_hrefptn\)}}|<img src=\"\1\">|g"\
    2.13        -e "s|^href=\($_hrefptn\)|<a &>\1</a>|" \
    2.14        -e "s|^iframe=\($_hrefptn\)|<iframe src=\"\1\"></iframe>|" \
    2.15 +      -e "s|^video=\($_hrefptn\)|<video controls><source height=\"320\" src=\"\1\"></video>|" \
    2.16        -e "s,^#### *\(.*\),<h4>\1</h4>," \
    2.17        -e "s,^### *\(.*\),<h3>\1</h3>," \
    2.18        -e "s,^## *\(.*\),<h2>\1</h2>," \