Author: kmachalkova
Date: Wed Nov 4 15:44:40 2009
New Revision: 59289
URL: http://svn.opensuse.org/viewcvs/yast?rev=59289&view=rev
Log:
Do actual work: delete leftover partitions,
create cloned ones
Modified:
branches/SuSE-Code-11-SP1-Branch/storage/storage/src/include/ep-hd-lib.ycp
Modified: branches/SuSE-Code-11-SP1-Branch/storage/storage/src/include/ep-hd-lib.ycp
URL: http://svn.opensuse.org/viewcvs/yast/branches/SuSE-Code-11-SP1-Branch/storage/storage/src/include/ep-hd-lib.ycp?rev=59289&r1=59288&r2=59289&view=diff
==============================================================================
--- branches/SuSE-Code-11-SP1-Branch/storage/storage/src/include/ep-hd-lib.ycp (original)
+++ branches/SuSE-Code-11-SP1-Branch/storage/storage/src/include/ep-hd-lib.ycp Wed Nov 4 15:44:40 2009
@@ -410,14 +410,12 @@
while(ret != `ok && ret != `cancel) {
ret = UI::UserInput();
any this_disk = UI::QueryWidget(`id(`tdisk), `Value);
- boolean any_disk_selected = this_disk != `none;
+ boolean any_disk_selected = this_disk != `none;
+ boolean has_any_partitions = any_disk_selected ?
+ size(target_map[(string)this_disk, "partitions"]:[]) > 0
+ : false;
if (ret == `tdisk) {
-
- boolean has_any_partitions = any_disk_selected ?
- size(target_map[(string)this_disk, "partitions"]:[]) > 0
- : false;
-
if ( has_any_partitions &&
!Popup::YesNo( sformat(_("There are some partitions on %1. If you
proceed, these partitions will be deleted and
@@ -434,9 +432,31 @@
ret = nil;
continue;
}
+
+ map