summaryrefslogtreecommitdiff
path: root/chapter-7/propagators.scm
diff options
context:
space:
mode:
Diffstat (limited to 'chapter-7/propagators.scm')
-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)))