From 3e4a1485787aa29926fa339d68b814dadaf96100 Mon Sep 17 00:00:00 2001 From: hasufell Date: Sun, 30 Nov 2014 00:02:58 +0100 Subject: [PATCH] GUI: fix algo 5 tree visualization, we broke it --- GUI/Gtk.hs | 19 +++++++++---------- 1 file changed, 9 insertions(+), 10 deletions(-) diff --git a/GUI/Gtk.hs b/GUI/Gtk.hs index d867f33..4cc10c5 100644 --- 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 ()