--- src/ndutils/wrappers.c      2006-10-27 00:54:58.000000000 +0200
+++ src/ndutils/wrappers.c      2008-01-29 11:24:55.000000000 +0100
@@ -166,7 +166,7 @@
       buf[(j * 2 + 1) * 3 + v * 432 * 3 + 2] = blue;
     }
   }
-  Tk_PhotoPutBlock(pp, &blk, 0, 0, 432, 20, TK_PHOTO_COMPOSITE_OVERLAY);
+  Tk_PhotoPutBlock(interp, pp, &blk, 0, 0, 432, 20, TK_PHOTO_COMPOSITE_OVERLAY);
   return TCL_OK;
 }