[mcclim-devel] Drawing xpm-icons to an accepting-values-steram

[Max-Gerd Retzlaff]

Hello,

This:

(defun test (&key (stream *query-io*))
  (accepting-values (stream)
    (clim-listener::draw-icon stream (clim-listener::icon-of #p"/non-existing"))))

does not work. It only draws a black box in the size of the icon. Any ideas?

Regards,
Max

-- 
Max-Gerd Retzlaff <m.retzlaff at gmx.net>

For your amusement:
The perversity of nature is nowhere better demonstrated by the fact that, when
exposed to the same atmosphere, bread becomes hard while crackers become soft.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 189 bytes
Desc: not available
URL: <https://mailman.common-lisp.net/pipermail/mcclim-devel/attachments/20050829/071f32bb/attachment.sig>