aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThomas White <taw@physics.org>2021-09-11 17:26:33 +0200
committerThomas White <taw@physics.org>2021-09-11 17:57:01 +0200
commit4167a41b3a0137651316ccb046a73893e3cf3e63 (patch)
tree0b9734ca7b402b7d93d363dc862bc43e27c770ea
parent700f1027cb33a3d11d6cc9700ac753ef17ae94e5 (diff)
at: Clamp continuous attributes to range
-rw-r--r--guile/starlet/state.scm4
1 files changed, 3 insertions, 1 deletions
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))