[Gtk2hs-commit] gtk2hs/gtk/Graphics/UI/Gtk/Display Image.chs.pp,1.2,1.3

[Duncan C. <dun...@us...>]

Update of /cvsroot/gtk2hs/gtk2hs/gtk/Graphics/UI/Gtk/Display
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3854/gtk/Graphics/UI/Gtk/Display

Modified Files:
	Image.chs.pp 
Log Message:
Fix an #if test so that it works correctly and is consistent with the other
similar ones.


Index: Image.chs.pp
===================================================================
RCS file: /cvsroot/gtk2hs/gtk2hs/gtk/Graphics/UI/Gtk/Display/Image.chs.pp,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- Image.chs.pp	12 Feb 2005 17:19:22 -0000	1.2
+++ Image.chs.pp	15 Feb 2005 17:54:57 -0000	1.3
@@ -76,7 +76,7 @@
 --
 imageNewFromFile :: FilePath -> IO Image
 imageNewFromFile path = makeNewObject mkImage $ liftM castPtr $ 
-#ifdef WIN32 && GTK_VERSION(2,6,0)
+#if defined (WIN32) && GTK_CHECK_VERSION(2,6,0)
   withUTFString path {#call unsafe image_new_from_file_utf8#}
 #else
   withUTFString path {#call unsafe image_new_from_file#}