openAction added to helper functions. Changes made to gui.hs