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

GC bitmap @2x

Browse Source 
original commit: 685859b40868b5213492112ecaac2e7f30c5e9c2
This commit is contained in:
Matthew Flatt 2014-01-06 19:02:08 -07:00
parent ea1f6ecc1b
commit 016b64ff82
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pkgs/gui-pkgs/gui-lib/framework/private/icon.rkt
View File

@ -73,7 +73,7 @@
(make-get-cursor get-left/right-cursor left-right-mask-path left-right-csr-path 'size-e/w)
(define mrf-on-bitmap (delay/sync (make-object bitmap% mrf-bitmap-path)))
(define gc-on-bitmap (delay/sync (make-object bitmap% gc-on-bitmap-path)))
(define gc-on-bitmap (delay/sync (read-bitmap gc-on-bitmap-path #:try-@2x? #t)))
(define (make-off-bitmap onb)
(let* ([bitmap (make-object bitmap%