www

commit 8cb207118a32ecc826b0651e82bb64fee01c326b
parent a2bd880bbbabb16e5e557ebfc562141ab48ab3d4
Author: Ryan Culpepper <ryanc@racket-lang.org>
Date:   Fri, 23 Feb 2007 22:02:40 +0000

Macro stepper: changed apparent binding arrow color to match syncheck

svn: r5679

original commit: 469e6f65ccfa7e753a97ce98568f011903cb6d15

Diffstat:
M
collects/macro-debugger/syntax-browser/widget.ss
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/collects/macro-debugger/syntax-browser/widget.ss b/collects/macro-debugger/syntax-browser/widget.ss
@@ -114,12 +114,12 @@
                                                    (send -text add-arrow
                                                          (car id-r) (cdr id-r)
                                                          (car binder-r) (cdr binder-r)
-                                                         "blue"))
+                                                         "purple"))
                                                  (send range get-ranges id)))
                                      (send range get-ranges binder)))))
                               (send colorer get-identifier-list))))
                 colorer)))
-                    
+          
           (define/public (add-separator)
             (with-unlock -text
               (send* -text