Author: kmachalkova
Date: Wed Jul 16 15:05:02 2008
New Revision: 49174
URL: http://svn.opensuse.org/viewcvs/yast?rev=49174&view=rev
Log:
some improvements
Modified:
branches/tmp/aschnell/part-redesign/storage/src/include/ep-settings.ycp
Modified: branches/tmp/aschnell/part-redesign/storage/src/include/ep-settings.ycp
URL: http://svn.opensuse.org/viewcvs/yast/branches/tmp/aschnell/part-redesign/storage/src/include/ep-settings.ycp?rev=49174&r1=49173&r2=49174&view=diff
==============================================================================
--- branches/tmp/aschnell/part-redesign/storage/src/include/ep-settings.ycp (original)
+++ branches/tmp/aschnell/part-redesign/storage/src/include/ep-settings.ycp Wed Jul 16 15:05:02 2008
@@ -9,28 +9,25 @@
import "Map";
- void CreateSettingsPanel(any user_data)
- {
- map visible_fields = $[
+ map visible_fields = $[
`cyl : _("Cylinder information"),
`mount_by : _("Mount by"),
`used_by : _("Used by"),
`uuid : _("UUID"),
`label : _("Label"),
`bios_id : _("BIOS ID"),
- ];
+ ];
- void PreselectVisibleFields() {
+ void CreateSettingsPanel(any user_data)
+ {
+ list <term> PreselectVisibleFields() {
list <symbol> hidden_fields = StorageSettings::GetHiddenFields();
list <term> msb_items = maplist ( symbol s, ( list <symbol> ) Map::Keys( visible_fields ), {
- if( contains (hidden_fields, s))
- return toterm( `item, [ `id(s), visible_fields[s]:"", false ]);
- else
- return toterm( `item, [ `id(s), visible_fields[s]:"", true ]);
+ return toterm( `item, [ `id(s), visible_fields[s]:"", !contains (hidden_fields, s)]);
} );
- UI::ChangeWidget(`id(`visible_fields), `Items, msb_items);
+ return msb_items;
}
@@ -64,7 +61,8 @@
//to make MultiSelection widget smaller, yet still readable
`Left( `HBox (
`MultiSelectionBox(`id(`visible_fields), `opt(`shrinkable),
- _("Visible Information On Storage Devices")),
+ _("Visible Information On Storage Devices"),
+ PreselectVisibleFields() ),
`HStretch()
)
),
@@ -72,7 +70,6 @@
)));
Wizard::RestoreHelp("TODO");
- PreselectVisibleFields();
}
@@ -87,6 +84,7 @@
void DestroySettingsPanel(any user_data)
{
+
Storage::SetDefaultMountBy((symbol) UI::QueryWidget(`id(`default_mountby), `Value));
Partitions::SetDefaultFs((symbol) UI::QueryWidget(`id(`default_fs), `Value));
}
--
To unsubscribe, e-mail: yast-commit+unsubscribe@opensuse.org
For additional commands, e-mail: yast-commit+help@opensuse.org