GTK: remove redundant bracket

2015-12-25 23:26:47 +01:00 · 2015-12-25 23:26:47 +01:00 · 5455ba1066
commit 5455ba1066
parent 61b2313320
1 changed files with 1 additions and 1 deletions
--- a/src/GUI/Gtk/Callbacks.hs
+++ b/src/GUI/Gtk/Callbacks.hs
@ -88,7 +88,7 @@ setCallbacks mygui myview = do
    cdir <- liftIO $ getCurrentDir myview
    liftIO $ modifyTVarIO (settings mygui)
                          (\x -> x { showHidden = not . showHidden $ x})
-             >> (refreshTreeView' mygui myview cdir)
+             >> refreshTreeView' mygui myview cdir
  _ <- treeView mygui `on` keyPressEvent $ tryEvent $ do
    [Alt] <- eventModifier
    "Up"  <- fmap glibToString eventKeyName