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
