From 4167a41b3a0137651316ccb046a73893e3cf3e63 Mon Sep 17 00:00:00 2001 From: Thomas White Date: Sat, 11 Sep 2021 17:26:33 +0200 Subject: at: Clamp continuous attributes to range --- guile/starlet/state.scm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/guile/starlet/state.scm b/guile/starlet/state.scm index 78209cb..6abd3c1 100644 --- a/guile/starlet/state.scm +++ b/guile/starlet/state.scm @@ -360,7 +360,9 @@ pre-existing contents." (set-in-state! (current-state) fix (car attr-name) - (car value))) + (clamp-to-attr-range fix + (car attr-name) + (car value)))) fixtures)) -- cgit v1.2.3