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

svn: r3213

Browse Source
This commit is contained in:
Eli Barzilay 2006-06-04 07:42:02 +00:00
parent 6aa4f2965c
commit 953e3e8d1a
1 changed files with 1 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
collects/mred/private/path-dialog.ss
View File

@ -12,11 +12,6 @@
(send d set-delta-foreground "BLUE") (send d set-delta-foreground "BLUE")
(send d set-delta 'change-underline #t) (send d set-delta 'change-underline #t)
d)) d))
(define path-up-delta*
(let ([d (make-object wx:style-delta%)])
(send d set-delta-foreground "BLUE")
(send d set-delta 'change-underline #t)
d))
;; os-dependent stuff ;; os-dependent stuff
(define win? (eq? 'windows (system-type))) (define win? (eq? 'windows (system-type)))