[Fencommits] fenfire-hs: remove deprecations now that we depend on gtk2hs
Tuukka Hastrup
Tuukka.Hastrup at iki.fi
Sat Mar 10 12:50:03 EET 2007
Sat Mar 10 12:50:43 EET 2007 Tuukka Hastrup <Tuukka.Hastrup at iki.fi>
* remove deprecations now that we depend on gtk2hs
diff -rN -u old-fenfire-hs/fenfire.cabal new-fenfire-hs/fenfire.cabal
--- old-fenfire-hs/fenfire.cabal 2007-03-10 12:50:01.000000000 +0200
+++ new-fenfire-hs/fenfire.cabal 2007-03-10 12:50:02.000000000 +0200
@@ -11,8 +11,8 @@
Category: User Interfaces
Stability: alpha
Homepage: http://fenfire.org/
-Build-Depends: base, HaXml, gtk, mtl, unix, cairo, harp, template-haskell,
- glib, network
+Build-Depends: base, HaXml, gtk > 0.9.10, mtl, unix, cairo, harp,
+ template-haskell, glib, network
Data-Files: data/logo.svg data/icon16.png
Executable: fenfire
@@ -21,7 +21,7 @@
GtkFixes, VanishingView, Main
GHC-Options: -fglasgow-exts -hide-package haskell98 -Wall
-fno-warn-unused-imports -fno-warn-missing-signatures
- -fno-warn-orphans -fno-warn-deprecations -main-is Main.main
+ -fno-warn-orphans -main-is Main.main
Extra-Libraries: raptor
Executable: functortest
@@ -29,43 +29,40 @@
Other-Modules: FunctorTest, FunctorSugar
GHC-Options: -fglasgow-exts -hide-package haskell98 -Wall
-fno-warn-unused-imports -fno-warn-missing-signatures
- -fno-warn-orphans -fno-warn-deprecations
- -main-is FunctorTest.main
+ -fno-warn-orphans -main-is FunctorTest.main
Executable: vobtest
Main-Is: VobTest.hs
Other-Modules: VobTest, Vobs, Cairo, Utils, FunctorSugar
GHC-Options: -fglasgow-exts -hide-package haskell98 -Wall
-fno-warn-unused-imports -fno-warn-missing-signatures
- -fno-warn-orphans -fno-warn-deprecations -main-is VobTest.main
+ -fno-warn-orphans -main-is VobTest.main
Executable: frptest
Main-Is: FRP.hs
Other-Modules: FRP, Utils, FunctorSugar
GHC-Options: -fglasgow-exts -hide-package haskell98 -Wall
-fno-warn-unused-imports -fno-warn-missing-signatures
- -fno-warn-orphans -fno-warn-deprecations -main-is FRP.main
+ -fno-warn-orphans -main-is FRP.main
Executable: darcs2rdf
Main-Is: Darcs2RDF.hs
Other-Modules: Darcs2RDF, FunctorSugar
GHC-Options: -fglasgow-exts -hide-package haskell98 -Wall
-fno-warn-unused-imports -fno-warn-missing-signatures
- -fno-warn-orphans -fno-warn-deprecations
- -main-is Darcs2RDF.main
+ -fno-warn-orphans -main-is Darcs2RDF.main
Executable: irc2rdf
Main-Is: Irc2RDF.hs
Other-Modules: Irc2RDF
GHC-Options: -fglasgow-exts -hide-package haskell98 -Wall
-fno-warn-unused-imports -fno-warn-missing-signatures
- -fno-warn-orphans -fno-warn-deprecations
- -main-is Irc2RDF.main
+ -fno-warn-orphans -main-is Irc2RDF.main
Executable: latex2png
Main-Is: Latex2Png.hs
Other-Modules: Latex2Png
GHC-Options: -fglasgow-exts -hide-package haskell98 -Wall
-fno-warn-unused-imports -fno-warn-missing-signatures
- -fno-warn-orphans -fno-warn-deprecations
- -main-is Latex2Png.main
+ -fno-warn-orphans -main-is Latex2Png.main
+
diff -rN -u old-fenfire-hs/FRP.fhs new-fenfire-hs/FRP.fhs
--- old-fenfire-hs/FRP.fhs 2007-03-10 12:50:01.000000000 +0200
+++ new-fenfire-hs/FRP.fhs 2007-03-10 12:50:02.000000000 +0200
@@ -74,7 +74,7 @@
let (ren, sf') = runSF sf (time' - time) (Input x y)
writeIORef ref (time', sf')
- drawable <- drawingAreaGetDrawWindow canvas
+ drawable <- widgetGetDrawWindow canvas
renderWithDrawable drawable ren
widgetQueueDraw canvas
diff -rN -u old-fenfire-hs/Vobs.fhs new-fenfire-hs/Vobs.fhs
--- old-fenfire-hs/Vobs.fhs 2007-03-10 12:50:01.000000000 +0200
+++ new-fenfire-hs/Vobs.fhs 2007-03-10 12:50:02.000000000 +0200
@@ -374,7 +374,7 @@
animRef <- newIORef (mempty, Map.empty, noAnim Map.empty)
- let getWH = do (cw, ch) <- drawingAreaGetSize canvas
+ let getWH = do (cw, ch) <- widgetGetSize canvas
return (fromIntegral cw, fromIntegral ch)
getVob = do state <- readIORef stateRef
@@ -442,7 +442,7 @@
return True
onExpose canvas $ \(Expose {}) -> do
- drawable <- drawingAreaGetDrawWindow canvas
+ drawable <- widgetGetDrawWindow canvas
(vob, _, anim) <- readIORef animRef; time <- getTime
let (scene, rerender) = anim time
More information about the Fencommits
mailing list