aboutsummaryrefslogtreecommitdiffstats
path: root/community/unison/fix-for-lablgtk-2.18.6.patch
blob: 888649a2395a847e2f4ef9adf281d3843519723d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Patch-Source: http://svnweb.mageia.org/packages/cauldron/unison/current/SOURCES/unison-2.51.2-fix-for-lablgtk-2.18.6.patch?view=markup&pathrev=1205069
Upstream-Issue: https://github.com/bcpierce00/unison/issues/153

--- a/uigtk2.ml
+++ b/uigtk2.ml
@@ -89,12 +89,12 @@
 (* This does not work with the current version of Lablgtk, due to a bug
 let icon =
   GdkPixbuf.from_data ~width:48 ~height:48 ~has_alpha:true
-    (Gpointer.region_of_string Pixmaps.icon_data)
+    (Gpointer.region_of_bytes Pixmaps.icon_data)
 *)
 let icon =
   let p = GdkPixbuf.create ~width:48 ~height:48 ~has_alpha:true () in
   Gpointer.blit
-    (Gpointer.region_of_string Pixmaps.icon_data) (GdkPixbuf.get_pixels p);
+    (Gpointer.region_of_bytes Pixmaps.icon_data) (GdkPixbuf.get_pixels p);
   p
 
 let leftPtrWatch =