Subversion Repositories DevTools

Rev

Rev 6923 | Rev 7383 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6923 Rev 7361
Line 96... Line 96...
96 
#
 96 
#
97 
#   Sanity Test
 97 
#   Sanity Test
98 
#
 98 
#
99 
Error("Not running on a Unix System") unless ($ENV{GBE_UNIX});
 99 
Error("Not running on a Unix System") unless ($ENV{GBE_UNIX});
100 
Error("Sudo Utils not found: $sudoUtilsDir") unless ( -d $sudoUtilsDir);
 100 
Error("Sudo Utils not found: $sudoUtilsDir") unless ( -d $sudoUtilsDir);
101 
Warning("Not running as a sutable user" ) unless ($ENV{USER} eq 'buildadm' || $ENV{USER} eq 'releasem');
 101 
Warning("Not running as a suitable user" ) unless ($ENV{USER} eq 'buildadm' || $ENV{USER} eq 'releasem' || $ENV{USER} eq 'pkgadm');
102 
EnvImport ('GBE_PERL');
 102 
EnvImport ('GBE_PERL');
103 
 
 103 
 
104 
#
 104 
#
105 
#   Ensure only one instance is running
 105 
#   Ensure only one instance is running
106 
#   PerlMonks say to use $0 as the lock file, but that did not work.
 106 
#   PerlMonks say to use $0 as the lock file, but that did not work.