diff options
Diffstat (limited to 'bin/auto_compile')
-rwxr-xr-x | bin/auto_compile | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/bin/auto_compile b/bin/auto_compile index 245e1863f89..fe85285fb66 100755 --- a/bin/auto_compile +++ b/bin/auto_compile @@ -26,6 +26,7 @@ eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}' # Taken from perlrun man page. use File::Basename; +use FileHandle; require POSIX; # This is the module we will checkout, someday someone could define a @@ -90,6 +91,8 @@ $LOGFILE = $LOGDIR . '/' . POSIX::strftime("%b%d_%Y.log", localtime); open(LOG, '>' . $LOGFILE) || mydie "cannot open log file"; +LOG->autoflush (); + # The following lines are useful when debugging the script or wrapper. # print LOG $CHECKOUT, " ", $BUILD, " ", $LOGDIR, " ", $ADMIN, "\n"; #while (($key,$value) = each %ENV) { |