From 7537babe99201db038018e2bff61ab81fb003212 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Sun, 6 May 2007 14:20:39 +0000 Subject: [PATCH] patch from Kathy svn: r6159 --- collects/profj/tester.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/profj/tester.scm b/collects/profj/tester.scm index 5c1bd79cab..4b99321991 100644 --- a/collects/profj/tester.scm +++ b/collects/profj/tester.scm @@ -506,8 +506,8 @@ (unless (null? covered) (let* ([editor (get-editor (car covered) #f)] [style-list (editor:get-standard-style-list)] - [uncover-color (send style-list find-named-style "profj:syntax-coloring:scheme:uncovered")] - [cover-color (send style-list find-named-style "profj:syntax-coloring:scheme:covered")]) + [uncover-color (send style-list find-named-style "profj:syntax-colors:scheme:uncovered")] + [cover-color (send style-list find-named-style "profj:syntax-colors:scheme:covered")]) (when editor ;(send cover-color set-delta-foreground "darkmagenta") ;(send uncover-color set-delta-foreground "black")