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

use log-error to report missing ico conversions

Browse Source 
Merge to v6.2
This commit is contained in:
Matthew Flatt 2015-04-27 17:23:51 -06:00
parent d48840f23b
commit f43d38914b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/collects/file/ico.rkt
View File

@ -247,7 +247,7 @@
(mask->alpha (cvt image) mask)) (mask->alpha (cvt image) mask))
mask mask
#t)))))))))]) #t)))))))))])
(unless ico-ico (printf "no! ~a\n" (ico-desc exe-ico))) (unless ico-ico (log-error "no icon conversion available to ~a" (ico-desc exe-ico)))
(when ico-ico (when ico-ico
(file-position p (car (ico-data exe-ico))) (file-position p (car (ico-data exe-ico)))
(display (cdr (ico-data ico-ico)) p))))) (display (cdr (ico-data ico-ico)) p)))))