From af61f1b98e6745bb712b4dd8a1c46d1f9fb35d21 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Sun, 3 Feb 2013 09:23:38 -0600 Subject: [PATCH] change the default test coverage colors After some consultation with my class this quarter, it seems clear that the previous defaults and nearby variations are completely hopeless for colorblind people (there are at least 3 in this class). So go with the defaults used in the HtDP languages, which have been vetted by saidsame 3 people. --- collects/drracket/private/main.rkt | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/collects/drracket/private/main.rkt b/collects/drracket/private/main.rkt index 79128187d3..124b4a21bc 100644 --- a/collects/drracket/private/main.rkt +++ b/collects/drracket/private/main.rkt @@ -628,10 +628,13 @@ (color-prefs:register-color-preference test-coverage-on-style-pref drracket:debug:test-coverage-on-style-name - (send the-color-database find-color "forest green")) + (send the-color-database find-color "black") + (send the-color-database find-color "white")) (color-prefs:register-color-preference test-coverage-off-style-pref drracket:debug:test-coverage-off-style-name - (send the-color-database find-color "maroon")) + (send the-color-database find-color "orange") + (send the-color-database find-color "indianred") + #:background (send the-color-database find-color "black")) (color-prefs:add-to-preferences-panel "Module Language" (λ (parent)