commsfwtools/preparedefaultcommsdatabase/defaultcommdb/group/createcommdbs.pl
changeset 25 e53adc4c49de
parent 22 592244873960
--- a/commsfwtools/preparedefaultcommsdatabase/defaultcommdb/group/createcommdbs.pl	Fri Apr 16 16:15:03 2010 +0300
+++ b/commsfwtools/preparedefaultcommsdatabase/defaultcommdb/group/createcommdbs.pl	Mon May 03 13:39:24 2010 +0300
@@ -212,13 +212,13 @@
 $zDrive = $release . $cedPlatfrom . '/' . $cedVariant . '/z';
 $zDriveCre = $zDrive . $cccccc00Root . $cccccc00NameCre;
 $CdbEmpty = $zDrive . $cccccc00Root . $cccccc00Nametxt;
+$romCdb = $epocRoot . 'epoc32/' . 'data/z' . $cccccc00Root . $cccccc00NameCre; 
 
 if ($::command eq 'build') 
 {
 	$ced = $release . $cedPlatfrom . '/' . $cedVariant . '/ced.exe';
 	$emulatorstore = $epocRoot . 'epoc32/' . $cedPlatfrom . $cdbIn;
 	$winsCdb = $epocRoot . 'epoc32/' . $cedPlatfrom . '/c' . $cccccc00Root . "persists/" . $cccccc00NameCre;
-	$romCdb = $epocRoot . 'epoc32/' . 'data/z' . $cccccc00Root . $cccccc00NameCre; 
 	
 	if ($platType =~ 'emulator')
 	{
@@ -317,7 +317,10 @@
 		else 
 		{
 			print("$data->{$platType}->{sourceCfg} older than $data->{$platType}->{destinationCdb}\n");
-			print("Construction aborted.\n");
+			print("Construction aborted. Copy-younger of resource CRE only\n");
+			#copy to z drive
+			print("CopyIfYounger $winsCdb to $zDriveCre\n");
+			CopyIfYounger($winsCdb, $zDriveCre);
 		}
 	}
 	else 
@@ -347,6 +350,14 @@
 {
 	print("$data->{$platType}->{destinationCdb}\n");
 	print("$CdbEmpty\n");
+	if($::platform =~ /wins/i)
+	{
+		print("$zDriveCre \n");
+	}
+	else
+	{
+		print("$romCdb\n");
+	}
 }
 
 sub RunCed