Changeset 471 in ProjectBuilder for devel/pb-modules
- Timestamp:
- Jun 3, 2008, 2:49:42 AM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
devel/pb-modules/lib/ProjectBuilder/Base.pm
r423 r471 136 136 my $cmd=shift; 137 137 my $cmt=shift || $cmd; 138 my $verbose=shift || undef; 138 139 139 140 pb_log(0,"$cmt... "); 140 141 pb_log(1,"Executing $cmd\n"); 141 system( $cmd);142 system("$cmd 2>&1 > $ENV{'PBTMP'}/system.log"); 142 143 my $res = $?; 143 144 if ($res == -1) { 144 pb_log(0,"failed to execute ($cmd) 145 pb_log(0,"failed to execute ($cmd): $!\n"); 145 146 pb_display_file("$ENV{'PBTMP'}/system.log"); 146 147 } elsif ($res & 127) { … … 149 150 } elsif ($res == 0) { 150 151 pb_log(0,"OK\n"); 152 pb_display_file("$ENV{'PBTMP'}/system.log") if (defined $verbose); 151 153 } else { 152 154 pb_log(0, "child ($cmd) exited with value ".($? >> 8)."\n");
Note:
See TracChangeset
for help on using the changeset viewer.