diff --git a/lib/modules/Protocols.pmod/X.pmod/XImage.pmod b/lib/modules/Protocols.pmod/X.pmod/XImage.pmod
index b7915a117d6f87f4afd29e483c01463474f62ed1..d292d3393eb755b675912d0a3b4896bc83a5ea01 100644
--- a/lib/modules/Protocols.pmod/X.pmod/XImage.pmod
+++ b/lib/modules/Protocols.pmod/X.pmod/XImage.pmod
@@ -1,6 +1,6 @@
 /* XImage.pmod
  *
- * $Id: XImage.pmod,v 1.10 1998/04/19 00:31:04 grubba Exp $
+ * $Id: XImage.pmod,v 1.11 1998/04/19 00:34:11 mirar Exp $
  */
 
 /*
@@ -404,7 +404,7 @@ void ShapedWindowImage(object in, object color, object|void alpha,
   object bgpm = in->CreatePixmap(width, height, in->depth);
   PixmapImage( bgpm )->set_image( color );
   in->ChangeAttributes( (["BackPixmap":bgpm ]) );
-  if(shape)
+  if(alpha)
   {
     mapping f;
     object shape = in->CreatePixmap(alpha->xsize(),alpha->ysize(),1);