[plt-scheme] 2htdp/image Images in Slideshow

How can one embed images generated using 2htdp/image into a slideshow? Is there an easy tweak to make something like this work:

(require (prefix-in im: 2htdp/image))
(slide
 (hbl-append (code (rectangle 15 25 "solid" "blue")) (t "=>")  (im:rectangle 15 25 "solid" "blue")) 
 )

--- nadeem