Hello, This diff for lablgtk2 fixes the GtkSpinButton "adjustment with non-zero page size" deprecation message, which is very annoying.
ciao, david Index: Makefile =================================================================== RCS file: /cvs/ports/x11/lablgtk2/Makefile,v retrieving revision 1.5 diff -N -u -p Makefile --- Makefile 12 Aug 2009 12:44:13 -0000 1.5 +++ Makefile 21 Oct 2009 14:18:03 -0000 @@ -4,7 +4,7 @@ COMMENT = OCaml interface to GTK+2 V = 2.12.0 DISTNAME = lablgtk-$V -PKGNAME = lablgtk2-$Vp3 +PKGNAME = lablgtk2-$Vp4 CATEGORIES = x11 devel HOMEPAGE = http://wwwfun.kurims.kyoto-u.ac.jp/soft/olabl/lablgtk.html Index: patches/patch-src_gData_ml =================================================================== RCS file: patches/patch-src_gData_ml diff -N -u -p patches/patch-src_gData_ml --- /dev/null 21 Oct 2009 14:18:03 -0000 +++ patches/patch-src_gData_ml 21 Oct 2009 14:18:03 -0000 @@ -0,0 +1,15 @@ +$OpenBSD$ + +fix GtkSpinButton "adjustment with non-zero page size" deprecation message. + +--- src/gData.ml.orig Wed Oct 21 15:13:46 2009 ++++ src/gData.ml Wed Oct 21 15:14:11 2009 +@@ -51,7 +51,7 @@ class adjustment obj = object + end + + let adjustment ?(value=0.) ?(lower=0.) ?(upper=100.) +- ?(step_incr=1.) ?(page_incr=10.) ?(page_size=10.) () = ++ ?(step_incr=1.) ?(page_incr=10.) ?(page_size=0.) () = + let w = + Adjustment.create ~value ~lower ~upper ~step_incr ~page_incr ~page_size in + new adjustment w Index: patches/patch-src_gData_mli =================================================================== RCS file: patches/patch-src_gData_mli diff -N -u -p patches/patch-src_gData_mli --- /dev/null 21 Oct 2009 14:18:03 -0000 +++ patches/patch-src_gData_mli 21 Oct 2009 14:18:03 -0000 @@ -0,0 +1,15 @@ +$OpenBSD$ + +fix GtkSpinButton "adjustment with non-zero page size" deprecation message. + +--- src/gData.mli.orig Wed Oct 21 15:14:19 2009 ++++ src/gData.mli Wed Oct 21 15:15:11 2009 +@@ -62,7 +62,7 @@ class adjustment : Gtk.adjustment obj -> + @param upper default value is [100.] + @param step_incr default value is [1.] + @param page_incr default value is [10.] +- @param page_size default value is [10.] *) ++ @param page_size default value is [0.] *) + val adjustment : + ?value:float -> + ?lower:float ->
