feat: improve slider aria & keys

Author: mvriu5

src/components/ui/Slider.tsx

@@ -109,6 +109,7 @@ export function Slider({ min, max, step = 1, value, onChange, className, lines,
                 aria-valuemin={min}
                 aria-valuemax={max}
                 aria-valuenow={clampedValue}
+                aria-valuetext={resolvedCenterLabel}
                 aria-label={ariaLabel}
                 tabIndex={0}
                 onPointerDown={(event) => {
@@ -140,6 +141,22 @@ export function Slider({ min, max, step = 1, value, onChange, className, lines,
                         event.preventDefault()
                         onChange(snapValue(clampedValue + step))
                     }
+                    if (event.key === "Home") {
+                        event.preventDefault()
+                        onChange(min)
+                    }
+                    if (event.key === "End") {
+                        event.preventDefault()
+                        onChange(max)
+                    }
+                    if (event.key === "PageDown") {
+                        event.preventDefault()
+                        onChange(snapValue(clampedValue - step * 10))
+                    }
+                    if (event.key === "PageUp") {
+                        event.preventDefault()
+                        onChange(snapValue(clampedValue + step * 10))
+                    }
                 }}
                 onDragStart={(event) => event.preventDefault()}
                 className="relative h-14 cursor-pointer touch-none select-none outline-none active:cursor-grabbing"