add fields or time selection

[webpoll] / widgets.sh

diff --git a/widgets.sh b/widgets.sh
index 5e7132e169945579f4a3a88154dda4ad6fe99bd7..4d3df23b7a9023257322dfd394282f915e9f46f5 100755 (executable)
--- a/widgets.sh
+++ b/widgets.sh
@@ -94,3 +94,12 @@ w_month() {
   fi
   printf ']]'
 }
+
+dlist_timeofday() {
+  local step="${1:-15}" id="${2:-dlist_timeofday}"
+  printf '[datalist id="%s"\n' $id
+    for h in $(seq 0 23); do for m in $(seq 0 "$step" 59); do
+      printf '[option value="%i:%02i"]\n' $h $m
+    done; done
+  printf ']\n'
+}