diff -p -up InsightToolkit-3.12.0/Wrapping/CSwig/IO/itkTkImageViewer2D.cxx.orig InsightToolkit-3.12.0/Wrapping/CSwig/IO/itkTkImageViewer2D.cxx
--- InsightToolkit-3.12.0/Wrapping/CSwig/IO/itkTkImageViewer2D.cxx.orig	2009-03-20 13:50:16.000000000 -0300
+++ InsightToolkit-3.12.0/Wrapping/CSwig/IO/itkTkImageViewer2D.cxx	2009-03-20 13:59:07.000000000 -0300
@@ -114,7 +114,7 @@ void TkImageViewer2D::Draw()
   // Setup the size 
   Tk_PhotoHandle photo =
     Tk_FindPhoto(m_Interpreter, const_cast<char*>(m_ImageName.c_str()));
-  Tk_PhotoSetSize(photo, width, height);
+  Tk_PhotoSetSize(m_Interpreter, photo, width, height);
   
   OStringStream command;
   command << m_CanvasName.c_str() << " configure -scrollregion \"1 1 "
@@ -142,7 +142,7 @@ void TkImageViewer2D::Draw()
 #if (TK_MAJOR_VERSION == 8) && (TK_MINOR_VERSION < 4)
   Tk_PhotoPutBlock(photo, &block, 0, 0, size[0], size[1]);
 #else
-  Tk_PhotoPutBlock(photo, &block, 0, 0, size[0], size[1],
+  Tk_PhotoPutBlock(m_Interpreter, photo, &block, 0, 0, size[0], size[1],
                    TK_PHOTO_COMPOSITE_SET);
 #endif
 }