diff options
-rw-r--r-- | chickadee/render/tiled.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/chickadee/render/tiled.scm b/chickadee/render/tiled.scm index e51e3c0..7ce8c53 100644 --- a/chickadee/render/tiled.scm +++ b/chickadee/render/tiled.scm @@ -231,8 +231,10 @@ (parse-color-channel value 1))) (_ (error "unsupported property type" type)))))) (define (parse-image node) - (let ((source (attr node 'source))) - (load-image (scope source)))) + (let ((source (attr node 'source)) + (trans (attr node 'trans))) + (load-image (scope source) + #:transparent-color (and trans (string->color trans))))) (define (parse-frame node) (let ((tile-id (attr node 'tileid string->number)) (duration (attr node 'duration string->number))) |