summaryrefslogtreecommitdiff
path: root/lang/ocaml/patches/patch-bj
blob: 383908a7e46c8ee6d77871e15ddac7e2578a8aa5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
$NetBSD: patch-bj,v 1.1 2004/04/22 09:18:44 tron Exp $

--- otherlibs/labltk/support/cltkImg.c.orig	Tue Jul 23 16:11:59 2002
+++ otherlibs/labltk/support/cltkImg.c	Thu Apr 22 10:34:38 2004
@@ -99,7 +99,11 @@
   pib.offset[0] = 0;
   pib.offset[1] = 1;
   pib.offset[2] = 2;
-  Tk_PhotoPutBlock(ph,&pib,Int_val(x),Int_val(y),Int_val(w),Int_val(h)); 
+  Tk_PhotoPutBlock(ph,&pib,Int_val(x),Int_val(y),Int_val(w),Int_val(h)
+#if (TK_MAJOR_VERSION == 8 && TK_MINOR_VERSION >= 4 || TK_MAJOR_VERSION > 8)
+                   , TK_PHOTO_COMPOSITE_SET
+#endif
+    ); 
 }
 
 CAMLprim void camltk_setimgdata_bytecode(argv,argn)