Some user interface improvements
Close control on popup, progress bar when recording.
This commit is contained in:
parent
950eec5fed
commit
353e37cff5
4 changed files with 112 additions and 14 deletions
|
|
@ -4,7 +4,7 @@
|
|||
(:require [hiccup.core :refer [html]]
|
||||
[clojure.java.io :refer [input-stream]]
|
||||
[clojure.string :as s])
|
||||
(:import [java.io StringWriter PrintWriter]
|
||||
(:import [java.io StringWriter]
|
||||
[java.util Properties]
|
||||
[org.w3c.tidy Tidy]))
|
||||
|
||||
|
|
@ -192,16 +192,20 @@
|
|||
[:body {:id "body"}
|
||||
[:div {:id "popup"
|
||||
:style "display: none; border: thin solid gray; width: 10%"}
|
||||
[:div {:id "closebox"
|
||||
:onclick "$('#popup').hide();"} "✖"]
|
||||
[:p {:id "character" :style "text-align: center; margin: 0; font-size: 4em;"} "?"]
|
||||
[:table {:id "controls" :summary "Controls for audio playback and recording"}
|
||||
[:tr
|
||||
[:th "Tutor"]
|
||||
[:td [:button {:id "play-tutor"}
|
||||
[:td [:span {:id "play-tutor"}
|
||||
"►"]]]
|
||||
[:tr
|
||||
[:th "You"]
|
||||
[:td [:button {:id "play-student"} "►"]]
|
||||
[:td [:button {:id "record-stop"} "⏺"]]]]]
|
||||
[:td [:span {:id "play-student"} "►"]]
|
||||
[:td [:span {:id "record-stop"} "⏺"]]]
|
||||
[:tr
|
||||
[:td {:colspan 3 :id "progress"}]]]]
|
||||
[:h1 (str title)]
|
||||
[:button {:onclick "var l = document.getElementById('long');
|
||||
var s = document.getElementById('short');
|
||||
|
|
@ -211,7 +215,8 @@
|
|||
} else {
|
||||
l.style.display = 'none';
|
||||
s.style.display = 'block';
|
||||
}"} "Toggle short/long"]
|
||||
}
|
||||
$('#popup').hide();"} "Toggle short/long"]
|
||||
[:div {:id "long"
|
||||
:style "display: block;"}
|
||||
[:h2 "Long forms"]
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue