import Gtk
import System.Environment


main :: IO ()
main = do
  a <- getArgs
  makeGUI (if null a then "" else head a)