adding a 10 second delay in the hopes that this will cause the automation to work.+
git-svn-id: svn://10.0.0.236/trunk@10587 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
parent
b4607052d2
commit
916de29ee4
@ -44,5 +44,9 @@ SetBuildNumber();
|
||||
|
||||
SetTimeBomb(0, 30);
|
||||
|
||||
# Delay()
|
||||
|
||||
Delay(10);
|
||||
|
||||
# Now build the projects
|
||||
BuildMozilla();
|
||||
|
||||
@ -32,7 +32,7 @@ package Moz;
|
||||
require Exporter;
|
||||
|
||||
@ISA = qw(Exporter);
|
||||
@EXPORT = qw(BuildProject BuildProjectClean OpenErrorLog MakeAlias StopForErrors DontStopForErrors InstallFromManifest SetBuildNumber SetAgentString SetTimeBomb);
|
||||
@EXPORT = qw(BuildProject BuildProjectClean OpenErrorLog MakeAlias StopForErrors DontStopForErrors InstallFromManifest SetBuildNumber SetAgentString SetTimeBomb Delay);
|
||||
@EXPORT_OK = qw(CloseErrorLog UseCodeWarriorLib QUIET);
|
||||
|
||||
use Cwd;
|
||||
@ -416,6 +416,22 @@ sub SetTimeBomb($$)
|
||||
|
||||
}
|
||||
|
||||
sub Delay($)
|
||||
|
||||
{
|
||||
my ($delay_seconds) = @_;
|
||||
|
||||
$now = time;
|
||||
|
||||
$exit_time = $now + $delay_seconds;
|
||||
|
||||
while ($exit_time > $now) {
|
||||
$now = time;
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
|
||||
1;
|
||||
|
||||
=head1 AUTHORS
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user