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

add missing icon resizing in replace-icons

Browse Source 
When replacing icons in an exe file, if the icon is smaller than the target
size and it has an alpha mask it is not resized which lead to an error.
This commit is contained in:
Philippe Mechai 2012-11-07 19:17:09 +01:00 committed by Matthew Flatt
parent 0a5f1a21a6
commit 3fdd834c6c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/file/ico.rkt
View File

@ -243,7 +243,7 @@
(let ([mask (cvt mask)])
(build-ico exe-ico
(if has-alpha?
image
(cvt image)
(mask->alpha (cvt image) mask))
mask
#t)))))))))])