Rename startGUI to makeGUI

2014-10-02 13:14:16 +02:00 · 2014-10-02 13:14:16 +02:00 · 3bfb84e1c7
commit 3bfb84e1c7
parent 80b5286095
2 changed files with 4 additions and 4 deletions
--- a/Gtk.hs
+++ b/Gtk.hs
@ -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
--- a/Main.hs
+++ b/Main.hs
@ -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 ""