On Wed, 21 Oct 2009, David Coppa wrote: > > Hello, > > This diff for lablgtk2 fixes the GtkSpinButton > "adjustment with non-zero page size" deprecation message, > which is very annoying.
This is just a warning. I think this should go upstream instead. Cheers! > 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 -> > > -- Antoine
