From 016b64ff824ab44950b4c120ff2ac07dc7ad345a Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Mon, 6 Jan 2014 19:02:08 -0700 Subject: [PATCH] GC bitmap @2x original commit: 685859b40868b5213492112ecaac2e7f30c5e9c2 --- pkgs/gui-pkgs/gui-lib/framework/private/icon.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pkgs/gui-pkgs/gui-lib/framework/private/icon.rkt b/pkgs/gui-pkgs/gui-lib/framework/private/icon.rkt index 1d5b4fed..828136a5 100644 --- a/pkgs/gui-pkgs/gui-lib/framework/private/icon.rkt +++ b/pkgs/gui-pkgs/gui-lib/framework/private/icon.rkt @@ -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%