summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--chapter-7/propagators.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/chapter-7/propagators.scm b/chapter-7/propagators.scm
index 1835d9c..c3d0cc4 100644
--- a/chapter-7/propagators.scm
+++ b/chapter-7/propagators.scm
@@ -611,7 +611,7 @@
(define (build)
(r:rgb->hsv rgb hsv)
(r:hsv->rgb hsv rgb))
- (constraint-propagator 'r:components<->hsv (list rgb hsv) build))
+ (constraint-propagator 'r:rgb<->hsv (list rgb hsv) build))
(define (render exp)
(append-child! (document-body) (sxml->dom exp)))