diff options
| author | ckonstanski <carlos.konstanski@olo.com> | 2024-05-27 15:31:30 -0600 |
|---|---|---|
| committer | ckonstanski <carlos.konstanski@olo.com> | 2024-05-27 15:31:30 -0600 |
| commit | a6ae53fe3fce9643f96418b1d48c03c9e6b87a68 (patch) | |
| tree | be3faa05c04b08dc30f5f1bff5943f2bc7b903ca /lisp | |
| parent | 2269a053265860b124050dd91868a625ec81673a (diff) | |
html5 video
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/webapps/woodriverlessons/clojurescript/woodriverlessons/src/core.cljs | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/webapps/woodriverlessons/clojurescript/woodriverlessons/src/core.cljs b/lisp/webapps/woodriverlessons/clojurescript/woodriverlessons/src/core.cljs index 611744a..437d08b 100644 --- a/lisp/webapps/woodriverlessons/clojurescript/woodriverlessons/src/core.cljs +++ b/lisp/webapps/woodriverlessons/clojurescript/woodriverlessons/src/core.cljs @@ -624,9 +624,10 @@ [:img {:height "400" :src (str "/gallery/file/view?id=" (get rec "id"))}] (str/includes? (get rec "mime_type") "video/") - [:embed {:src (str "/gallery/file/view?id=" (get rec "id")) - :type (get rec "mime_type") - :height "400"}])] + [:video {:height "400" + :cotrols "controls"} + [:source {:src (str "/gallery/file/view?id=" (get rec "id")) + :type (get rec "mime_type")}]])] (when (get jsonobj "adminP") [:td {:style "text-align: right;"} [:img {:src "/static/images/delete.png" |