hasufell
/
cga
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Rename startGUI to makeGUI

This commit is contained in:
hasufell 2014-10-02 13:14:16 +02:00
parent 80b5286095
commit 3bfb84e1c7
No known key found for this signature in database
GPG Key ID: 220CD1C5BDEED020
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Gtk.hs
View File

@ -12,8 +12,8 @@ import Util
-- |Handle the whole GTK gui.
startGUI :: FilePath -> IO ()
startGUI startFile = do
makeGUI :: FilePath -> IO ()
makeGUI startFile = do
homedir <- getHomeDirectory
-- init gui

4
Main.hs
View File

@ -6,5 +6,5 @@ main :: IO ()
main = do
a <- getArgs
case null a of
False -> startGUI (head a)
True -> startGUI ""
False -> makeGUI (head a)
True -> makeGUI ""