Hi Axel,
http://hackage.haskell.org/trac/gtk2hs/ticket/1124 should close.
Below is source code by reporter
------------------------------> source code start
<------------------------------
import Graphics.UI.Gtk
main = do
unsafeInitGUIForThreadedRTS -- runhaskell
w <- windowNew
w `onDelete` \_ -> mainQuit >> return True
{- Default Glade-3 spin button -}
a <- adjustmentNew 0 0 100 1 10 10
-- a <- adjustmentNew 0 0 100 1 10 0
s <- spinButtonNew a 0.0 0
b <- buttonNewWithLabel "Bug!"
spinButtonSetValue s 50
b `onClicked` spinButtonSetRange s 0 55
box <- hBoxNew False 7
box `containerAdd` s
box `containerAdd` b
w `containerAdd` box
widgetShowAll w
mainGUI
------------------------------> source code end
<------------------------------
When i test it, i got WARNING from GTK+:
(Spin:20655): Gtk-WARNING **: GtkSpinButton: setting an adjustment with
non-zero page size is deprecated
When i change
a <- adjustmentNew 0 0 100 1 10 10
to
a <- adjustmentNew 0 0 100 1 10 0
problem fix.
Looks GTK+ change C code that don't accept non-zero page size of adjustment for
SpinButton
That's explain why value change from 55 to 45 after he did spinButtonSetRange.
If he generate those code by Glade, so it's a problem of Glade, not
gtk2hs.
Cheers,
-- Andy
------------------------------------------------------------------------------
This SF.net email is sponsored by Sprint
What will you do first with EVO, the first 4G phone?
Visit sprint.com/first -- http://p.sf.net/sfu/sprint-com-first
_______________________________________________
Gtk2hs-devel mailing list
Gtk2hs-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gtk2hs-devel
