Author: aschnell Date: Mon Apr 21 16:30:13 2008 New Revision: 46925 URL: http://svn.opensuse.org/viewcvs/yast?rev=46925&view=rev Log: - consistency Modified: branches/tmp/aschnell/part-redesign/storage/src/modules/StorageFields.ycp Modified: branches/tmp/aschnell/part-redesign/storage/src/modules/StorageFields.ycp URL: http://svn.opensuse.org/viewcvs/yast/branches/tmp/aschnell/part-redesign/storage/src/modules/StorageFields.ycp?rev=46925&r1=46924&r2=46925&view=diff ============================================================================== --- branches/tmp/aschnell/part-redesign/storage/src/modules/StorageFields.ycp (original) +++ branches/tmp/aschnell/part-redesign/storage/src/modules/StorageFields.ycp Mon Apr 21 16:30:13 2008 @@ -629,7 +629,7 @@ global term Table(list<symbol> fields, map target_map, - symbol(map, map) predicate) + symbol(map, map) predicate) { term header = TableHeader(fields); list<term> content = TableContents(fields, target_map, predicate); @@ -638,7 +638,7 @@ } - global term Overview(list<symbol> fields, map target_map, string device) + global string OverviewContent(list<symbol> fields, map target_map, string device) { map disk = Storage::GetDisk(target_map, device); map part = Storage::GetPartition(target_map, device); @@ -646,13 +646,21 @@ if (part == $[]) part = nil; - string text = mergestring(maplist(symbol field, fields, { + string content = mergestring(maplist(symbol field, fields, { if (field == `newline) return "\n"; else return MakeSubInfo(disk, part, field, `overview); }), ""); - return `RichText(`opt(`plainText, `hstretch, `vstretch), text); + return content; + } + + + global term Overview(list<symbol> fields, map target_map, string device) + { + string content = OverviewContent(fields, target_map, device); + + return `RichText(`opt(`plainText, `hstretch, `vstretch), content); } } -- To unsubscribe, e-mail: yast-commit+unsubscribe@opensuse.org For additional commands, e-mail: yast-commit+help@opensuse.org