comparison Lib/Deployment/Batch.pm @ 49:16ada169ca75

migrating to the Eclipse IDE
author wizard@linux-odin.local
date Fri, 26 Feb 2010 10:49:21 +0300
parents 03e58a454b20
children
comparison
equal deleted inserted replaced
48:1c3c3e63a314 49:16ada169ca75
71 shift if $_[0] eq __PACKAGE__; 71 shift if $_[0] eq __PACKAGE__;
72 my ($package,$inline) = @_; 72 my ($package,$inline) = @_;
73 73
74 Log( "The package is required" ) and return 0 if not $package; 74 Log( "The package is required" ) and return 0 if not $package;
75 Log( "Processing $package" ); 75 Log( "Processing $package" );
76 my $t0 = [Time::HiRes::gettimeofday]; 76 my $t0 = [Time::HiRes::gettimeofday()];
77 77
78 if ($inline and $inline eq 'inline') { 78 if ($inline and $inline eq 'inline') {
79 $inline = 1; 79 $inline = 1;
80 } else { 80 } else {
81 $inline = 0; 81 $inline = 0;