Author: aschnell
Date: Mon May 25 11:55:45 2009
New Revision: 57302
URL: http://svn.opensuse.org/viewcvs/yast?rev=57302&view=rev
Log:
- check support status for filesystems
Modified:
trunk/storage/storage/src/include/ep-settings.ycp
Modified: trunk/storage/storage/src/include/ep-settings.ycp
URL: http://svn.opensuse.org/viewcvs/yast/trunk/storage/storage/src/include/ep-settings.ycp?rev=57302&r1=57301&r2=57302&view=diff
==============================================================================
--- trunk/storage/storage/src/include/ep-settings.ycp (original)
+++ trunk/storage/storage/src/include/ep-settings.ycp Mon May 25 11:55:45 2009
@@ -12,6 +12,7 @@
void DestroySettingsPanel(any user_data);
+
list< map > visible_fields = [
// list entry
$[ `label : _("Label"), `fields : [ `label ] ],
@@ -29,7 +30,7 @@
$[ `label : _("Fibre Channel information"), `fields : toset([ `fc_wwpn, `fc_fcp_lun, `fc_port_id ]) ]
];
- map mount_bys = $[
+ map mount_bys = $[
// combo box entry
`device : _("Device Name"),
// combo box entry
@@ -39,9 +40,10 @@
// combo box entry
`id : _("Device ID"),
// combo box entry
- `path : _("Device Path")
+ `path : _("Device Path")
];
+
void CreateSettingsPanel(any user_data)
{
list <term> PreselectVisibleFields()
@@ -55,10 +57,19 @@
});
}
- list <term> CBItems = maplist( symbol item_id, string label, mount_bys, {
+ list <term> mount_by_items = maplist( symbol item_id, string label, mount_bys, {
return `item(`id(item_id), label);
});
+ list<symbol> filesystems = filter(symbol fs, [ `ext2, `ext3, `ext4, `reiser, `xfs ], {
+ return FileSystems::IsSupported(fs) && !FileSystems::IsUnsupported(fs);
+ });
+
+ list<term> filesystem_items = maplist(symbol fs, filesystems, {
+ return `item(`id(fs), FileSystems::GetName(fs, "Error"));
+ });
+
+
UI::ReplaceWidget(`tree_panel,
Greasemonkey::Transform(
`VBox(
@@ -68,23 +79,12 @@
`Left(`ComboBoxSelected(`id(`default_mountby),`opt(`notify),
// combo box label
_("Default Mount by"),
- CBItems,
+ mount_by_items,
`id(Storage::GetDefaultMountBy()))),
`Left(`ComboBoxSelected(`id(`default_fs),`opt(`notify),
// combo box label
_("Default File System"),
- [
- // combo box entry
- `item(`id(`ext2), "Ext2"),
- // combo box entry
- `item(`id(`ext3), "Ext3"),
- // combo box entry
- `item(`id(`ext4), "Ext4"),
- // combo box entry
- `item(`id(`reiser), "Reiser"),
- // combo box entry
- `item(`id(`xfs), "XFS")
- ],
+ filesystem_items,
`id(Partitions::DefaultFs()))),
`VSpacing(1),
`Left(`ComboBoxSelected(`id(`display_name), `opt(`notify),
--
To unsubscribe, e-mail: yast-commit+unsubscribe@opensuse.org
For additional commands, e-mail: yast-commit+help@opensuse.org