Author: kmachalkova Date: Mon Jun 18 16:32:21 2007 New Revision: 38508 URL: http://svn.opensuse.org/viewcvs/yast?rev=38508&view=rev Log: Use CWMTab to display advanced configuration dialog (general vs. security settings) Modified: trunk/ntp-client/src/dialogs.ycp Modified: trunk/ntp-client/src/dialogs.ycp URL: http://svn.opensuse.org/viewcvs/yast/trunk/ntp-client/src/dialogs.ycp?rev=38508&r1=38507&r2=38508&view=diff ============================================================================== --- trunk/ntp-client/src/dialogs.ycp (original) +++ trunk/ntp-client/src/dialogs.ycp Mon Jun 18 16:32:21 2007 @@ -12,6 +12,7 @@ textdomain "ntp-client"; import "CWM"; +import "CWMTab"; import "Label"; import "NtpClient"; import "Popup"; @@ -20,6 +21,7 @@ import "Report"; import "Confirm"; + include "ntp-client/misc.ycp"; include "ntp-client/widgets.ycp"; @@ -134,16 +136,27 @@ */ define symbol MainDialog () ``{ NtpClient::simple_dialog = false; - list > w = CWM::CreateWidgets (["start", "run_chroot", "config_dhcp", "firewall", "overview"], - GetWidgets ()); - term contents = `HBox (`HSpacing (1), `VBox ( + + term tab1 = `HBox (`HSpacing (1), `VBox ( `VSpacing (1), `HBox ( `VBox ( "start", `VSpacing(), - `Left ("run_chroot"), `Left ("config_dhcp"), + `VSpacing() + ) + ), + `VSpacing (1), + "overview", + `VSpacing(1) + ), `HSpacing (1)); + + term tab2 = `HBox (`HSpacing (1), `VBox ( + `VSpacing (1), + `HBox ( + `VBox ( + `Left ("run_chroot"), `VSpacing(), `Frame ( // TRANSLATORS: UI frame label @@ -152,11 +165,35 @@ ) ) ), - `VSpacing (1), - "overview", - `VSpacing (1) + `VStretch() ), `HSpacing (1)); + map tabs = $[ + "general" : $[ + "header" : _("General Settings"), + "contents" : tab1, + "widget_names" : ["start", "config_dhcp", "overview"], + ], + "security" : $[ + "header" : _("Security Settings"), + "contents" :tab2, + "widget_names" : [ "run_chroot", "firewall"] + ] + ]; + + map wd = $[ + "tab" : CWMTab::CreateWidget ($[ + "tab_order" : ["general", "security"], + "tabs" : tabs, + "widget_descr" : GetWidgets(), + "initial_tab" : "general", + "tab_help" : "" + ]) + ]; + + term contents = `VBox("tab"); + list