cage
/
tinmop
mirror of https://codeberg.org/cage/tinmop/
1
0
Fork 0
Code Issues

- fixxed call to 'member'.

This commit is contained in:
cage 2023-12-24 22:34:09 +01:00
parent a71492faa8
commit d5182c2dac
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/gui/client/main-window.lisp
View File

@ -476,7 +476,7 @@
(scale-jpeg main-window file-path)) (scale-jpeg main-window file-path))
((member mime-type ((member mime-type
'("image/x-tga" "image/x-targa") '("image/x-tga" "image/x-targa")
#'string=) :test #'string=)
(scale-targa main-window file-path)) (scale-targa main-window file-path))
((string= mime-type +mime-type-png+) ((string= mime-type +mime-type-png+)
(scale-png main-window file-path)) (scale-png main-window file-path))