This commit is contained in:
2014-10-02 14:30:08 +02:00
parent 1ca38186e8
commit d39180a723
2 changed files with 3 additions and 3 deletions

2
Gtk.hs
View File

@@ -41,7 +41,7 @@ makeGUI startFile = do
-- callbacks
_ <- onDestroy window mainQuit
_ <- onClicked drawButton $ onClickedDrawButton fileButton
da hscale
da hscale
_ <- onClicked saveButton $ onClickedSaveButton fileButton
_ <- onClicked quitButton mainQuit