suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

more white-on-black colorscheme fixes

Browse Source 
svn: r5906

original commit: 35fa233a939e31ac3b16ac14be9eea1ee87afd98
This commit is contained in:
Robby Findler 2007-04-09 16:26:23 +00:00
parent 1703e06c3d
commit 5eeea7d93e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/framework/gui-utils.ss
View File

@ -138,7 +138,7 @@
(define clickback-delta (make-object style-delta% 'change-underline #t))
(define white-on-black-clickback-delta (make-object style-delta% 'change-underline #t))
(send clickback-delta set-delta-foreground "BLUE")
(send white-on-black-clickback-delta set-delta-foreground "lightblue")
(send white-on-black-clickback-delta set-delta-foreground "deepskyblue")
(define get-clickback-delta
(opt-lambda ([white-on-black? #f])
(if white-on-black?