--- CV/CV.xs	2005/07/22 06:14:25	1.20
+++ CV/CV.xs	2005/08/14 02:25:44	1.22
@@ -126,6 +126,19 @@
 
 PROTOTYPES: ENABLE
 
+# missing in Gtk2 perl module
+
+gboolean
+gdk_net_wm_supports (GdkAtom property)
+	CODE:
+#if defined(GDK_WINDOWING_X11) && !defined(GDK_MULTIHEAD_SAFE)
+        RETVAL = gdk_net_wm_supports (property);
+#else
+        RETVAL = 0;
+#endif
+        OUTPUT:
+        RETVAL
+
 GdkPixbuf_noinc *
 transpose (GdkPixbuf *pb)
 	CODE:
@@ -227,8 +240,8 @@
             cinfo.do_fancy_upsampling = FALSE;
 
             while (cinfo.scale_denom < 8
-                   && (cinfo.output_width  >> 1) >= IW
-                   && (cinfo.output_height >> 1) >= IH)
+                   && cinfo.output_width  >= IW*4
+                   && cinfo.output_height >= IH*4)
               {
                 cinfo.scale_denom <<= 1;
                 jpeg_calc_output_dimensions (&cinfo);
@@ -315,6 +328,7 @@
 
 GdkPixbuf_noinc *
 p7_to_pb (int w, int h, guchar *src)
+        PROTOTYPE: @
 	CODE:
 {
 	int x, y;