GUI: fix algo 5 tree visualization, we broke it

2014-11-30 00:02:58 +01:00
parent 8cf9d93580
commit 3e4a148578
1 changed files with 9 additions and 10 deletions
--- a/GUI/Gtk.hs
+++ b/GUI/Gtk.hs
@@ -207,16 +207,15 @@ onAlgoBoxChange mygui = do
    then do
      widgetShow (vbox7 mygui)
      widgetShow (treeWin mygui)
-    else do
-      widgetHide (vbox7 mygui)
-      widgetHide (treeWin mygui)
-  if item == 5
-    then do
-      widgetShow (vbox10 mygui)
-      widgetShow (treeWin mygui)
-    else do
-      widgetHide (vbox10 mygui)
-      widgetHide (treeWin mygui)
+    else
+      if item == 5
+        then do
+          widgetShow (vbox10 mygui)
+          widgetShow (treeWin mygui)
+      else do
+        widgetHide (vbox7 mygui)
+        widgetHide (treeWin mygui)
+
  return ()