hasufell
/
cga
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

GUI: fix widget hiding

This commit is contained in:
hasufell 2014-11-30 00:19:57 +01:00
parent 3e4a148578
commit 968262d935
No known key found for this signature in database
GPG Key ID: 220CD1C5BDEED020
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
GUI/Gtk.hs
View File

@ -205,14 +205,17 @@ onAlgoBoxChange mygui = do
item <- comboBoxGetActive (algoBox mygui)
if item == 4
then do
widgetHide (vbox10 mygui)
widgetShow (vbox7 mygui)
widgetShow (treeWin mygui)
else
if item == 5
then do
widgetHide (vbox7 mygui)
widgetShow (vbox10 mygui)
widgetShow (treeWin mygui)
else do
widgetHide (vbox10 mygui)
widgetHide (vbox7 mygui)
widgetHide (treeWin mygui)