[Bio] / FigKernelPackages / SeedUtils.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/SeedUtils.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.39, Wed Jul 21 15:59:36 2010 UTC revision 1.40, Thu Jul 22 12:20:06 2010 UTC
# Line 1715  Line 1715 
1715      return $h;      return $h;
1716  }  }
1717    
1718    sub run {
1719        shift if UNIVERSAL::isa($_[0],__PACKAGE__);
1720        my($cmd) = @_;
1721    
1722        if ($ENV{FIG_VERBOSE}) {
1723            my @tmp = `date`;
1724            chomp @tmp;
1725            print STDERR "$tmp[0]: running $cmd\n";
1726        }
1727        (system($cmd) == 0) || die("FAILED: $cmd");
1728    }
1729    
1730  1;  1;

Legend:
Removed from v.1.39  
changed lines
  Added in v.1.40

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3