diff options
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" |