From 045aa8820c9483130b8935f051217ba564ae9125 Mon Sep 17 00:00:00 2001
From: James Shubin <james@shubin.ca>
Date: Sun, 14 Sep 2025 20:52:45 -0400
Subject: [PATCH] engine: resources: Display tick marks for input range

This makes it prettier. We should also add the values, but this is
harder to do nicely.
---
 engine/resources/http_server_ui/main.go | 30 ++++++++++++++++++++++---
 1 file changed, 27 insertions(+), 3 deletions(-)

diff --git a/engine/resources/http_server_ui/main.go b/engine/resources/http_server_ui/main.go
index e0636c11..018bde00 100644
--- a/engine/resources/http_server_ui/main.go
+++ b/engine/resources/http_server_ui/main.go
@@ -36,6 +36,7 @@ import (
 	"net/http"
 	"net/url"
 	"sort"
+	"strconv"
 	"syscall/js"
 	"time"
 
@@ -186,15 +187,38 @@ func (obj *Main) Run() error {
 		el.Set("type", inputType)
 
 		if inputType == common.HTTPServerUIInputTypeRange {
+			min := 0
+			max := 0
+			step := 1
 			if val, exists := x.Type[common.HTTPServerUIInputTypeRangeMin]; exists {
-				el.Set("min", val)
+				if d, err := strconv.Atoi(val); err == nil {
+					min = d
+					el.Set("min", val)
+				}
 			}
 			if val, exists := x.Type[common.HTTPServerUIInputTypeRangeMax]; exists {
-				el.Set("max", val)
+				if d, err := strconv.Atoi(val); err == nil {
+					max = d
+					el.Set("max", val)
+				}
 			}
 			if val, exists := x.Type[common.HTTPServerUIInputTypeRangeStep]; exists {
-				el.Set("step", val)
+				if d, err := strconv.Atoi(val); err == nil {
+					step = d
+					el.Set("step", val)
+				}
 			}
+			// add the tick marks
+			el.Call("setAttribute", "list", id) // Use setAttribute (NOT Set)
+			datalist := obj.document.Call("createElement", "datalist")
+			datalist.Set("id", id) // matches the id of the list field
+			for i := min; i <= max; i += step {
+				fmt.Printf("i: %+v\n", i)
+				option := obj.document.Call("createElement", "option")
+				option.Set("value", i)
+				datalist.Call("appendChild", option)
+			}
+			fieldset.Call("appendChild", datalist)
 		}
 
 		el.Set("value", element.Value) // XXX: here or after change handler?