Author: aschnell Date: Wed Mar 5 15:56:32 2008 New Revision: 45221 URL: http://svn.opensuse.org/viewcvs/yast?rev=45221&view=rev Log: - work on unused devices filter Modified: branches/tmp/aschnell/part-redesign/storage/src/include/ep-all.ycp Modified: branches/tmp/aschnell/part-redesign/storage/src/include/ep-all.ycp URL: http://svn.opensuse.org/viewcvs/yast/branches/tmp/aschnell/part-redesign/storage/src/include/ep-all.ycp?rev=45221&r1=45220&r2=45221&view=diff ============================================================================== --- branches/tmp/aschnell/part-redesign/storage/src/include/ep-all.ycp (original) +++ branches/tmp/aschnell/part-redesign/storage/src/include/ep-all.ycp Wed Mar 5 15:56:32 2008 @@ -12,8 +12,33 @@ any filter_ = `all; + symbol predicate_unused(map disk, map part) + { + symbol disk_type = disk["type"]:`CT_UNKNOWN; + + if (part == nil) + { + return `follow; + } + else + { + if (part["type"]:`primary != `extended && + part["mount"]:"" == "" && + part["used_by_type"]:`UB_NONE == `UB_NONE) + { + return `show; + } + + return `ignore; + } + } + + symbol predicate_all(map disk, map partition) { + if (filter_ == `unused) + return predicate_unused(disk, partition); + if (partition == nil) { if (filter_ == `all) -- To unsubscribe, e-mail: yast-commit+unsubscribe@opensuse.org For additional commands, e-mail: yast-commit+help@opensuse.org