fixed the problem with 2 references to the one i_color object after a

call to ICL_set_internal.  at least I think so.

diff --git a/Imager.xs b/Imager.xs
index 87272aed965bed0135ae24aed2eb96c7f11353fd..1cf62b08c40deaddf7a5bf40dc75d7d514253d85 100644 (file)
--- a/Imager.xs
+++ b/Imager.xs
@@ -421,14 +421,16 @@ ICL_DESTROY(cl)
                Imager::Color    cl
 
 
-Imager::Color
+void
 ICL_set_internal(cl,r,g,b,a)
                Imager::Color    cl
                unsigned char     r
                unsigned char     g
                unsigned char     b
                unsigned char     a
-
+          PPCODE:
+              EXTEND(SP, 1);
+              PUSHs(ST(0));
 
 void
 ICL_info(cl)