From 98d08f9b94840c442d3352be6f1cd3f4c76c33c6 Mon Sep 17 00:00:00 2001 From: Joe Crayne Date: Fri, 26 Apr 2019 12:27:56 -0400 Subject: Renamed MeshMaker to MeshSketch. --- mainObj2.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'mainObj2.hs') diff --git a/mainObj2.hs b/mainObj2.hs index 7695120..909af2c 100644 --- a/mainObj2.hs +++ b/mainObj2.hs @@ -10,18 +10,18 @@ import Data.GI.Base.GType import Foreign.Ptr -import qualified MeshMaker +import qualified MeshSketch main = do _ <- Gtk.init Nothing - let mkChild = MeshMaker.new + let mkChild = MeshSketch.new window <- do w <- windowNew WindowTypeToplevel windowSetDefaultSize w 360 360 - windowSetTitle w "Mesh Maker" + windowSetTitle w "MeshSketch" _ <- on w #deleteEvent $ \_ -> mainQuit >> return True child <- mkChild containerAdd w child -- cgit v1.2.3