fixed bug

svn: r6984
2007-07-30 12:18:34 +00:00 · 2007-07-30 12:18:34 +00:00 · 7035d6f23b
commit 7035d6f23b
parent 9ee86541b6
1 changed files with 1 additions and 1 deletions
--- a/collects/drscheme/private/drscheme-normal.ss
+++ b/collects/drscheme/private/drscheme-normal.ss
@ -152,7 +152,7 @@
        (with-handlers ([exn:fail? (lambda (x)
                                     (printf "~s\n" (exn-message x))
                                     #f)])
-          (let ([b (icons-bitmap bitmap% "recycle.gif")])
+          (let ([b (icons-bitmap "recycle.gif")])
            (cond
              [(send b ok?)
               (let ([gbdc (make-object bitmap-dc% b)]