[Gtk2hs-commit] (main branch): rulerGetRange should be 'IO (Double, Double, Double, Double)'

[Andy S. <And...@co...>]

diffing dir...
Tue Sep  7 03:20:31 EDT 2010  Andy Stewart <laz...@gm...>
  * rulerGetRange should be 'IO (Double, Double, Double, Double)'
  Ignore-this: 6d87203c7ba64b94476d70b6e407ac33
    {
    hunk ./gtk/Graphics/UI/Gtk/Special/Ruler.chs 108
    - -> IO (Maybe (Double, Double, Double, Double))
    + -> IO (Double, Double, Double, Double)
    hunk ./gtk/Graphics/UI/Gtk/Special/Ruler.chs 120
    -  if lowerPtr    == nullPtr ||
    -     upperPtr    == nullPtr ||
    -     positionPtr == nullPtr ||
    -     maxSizePtr  == nullPtr
    -     then return Nothing
    -     else do
    -        lower    <- peek lowerPtr
    -        upper    <- peek upperPtr
    -        position <- peek positionPtr
    -        maxSize  <- peek maxSizePtr
    -        return $ Just (realToFrac lower, realToFrac upper, realToFrac position, realToFrac maxSize)
    +  lower    <- peek lowerPtr
    +  upper    <- peek upperPtr
    +  position <- peek positionPtr
    +  maxSize  <- peek maxSizePtr
    +  return (realToFrac lower, realToFrac upper, realToFrac position, realToFrac maxSize)
    hunk ./gtk/Graphics/UI/Gtk/Special/Ruler.chs 131
    -rulerRange :: RulerClass self => ReadWriteAttr self (Maybe (Double, Double, Double, Double)) (Double, Double, Double, Double)
    +rulerRange :: RulerClass self => Attr self (Double, Double, Double, Double)
    }