Fix compiled-bitmap and compiled-bitmap-list on 2x bitmaps, lossy compression

This fixes the docs for `compiled-bitmap-list`. Icons in DrRacket were immune,
because they're stored in modules as PNG bytes.

Please merge to v6.1
(cherry picked from commit 1f7b452920)
This commit is contained in:
Neil Toronto 2014-07-23 07:48:37 -04:00 committed by Ryan Culpepper
parent 6a44b8aaf8
commit e9580ad006

View File

@ -34,7 +34,7 @@
(define alpha-p (open-output-bytes))
(send alpha-bm save-file alpha-p 'jpeg quality)
(send bm get-argb-pixels 0 0 w h bs #f)
(send bm get-argb-pixels 0 0 w h bs #f #:unscaled? #t)
(define rgb-bm (make-bitmap w h #f))
(send rgb-bm set-argb-pixels 0 0 w h bs #f)
(define rgb-p (open-output-bytes))