added flock to biostat

git-svn-id: http://biopieces.googlecode.com/svn/trunk@1960 74ccb610-7750-0410-82ae-013aeee3265d

diff --git a/bp_bin/biostat b/bp_bin/biostat
index d409d28bde803fff27b7c4e5b4fde5e0b11237ad..175d6fd5c1d9b75e6dedab1cffed0969ebfba0ff 100755 (executable)
--- a/bp_bin/biostat
+++ b/bp_bin/biostat
@@ -164,6 +164,7 @@ sub get_status_info
     my ( $fh, $line, $time, $args, $tmp_dir, $du );
 
     $fh = Maasha::Filesys::file_read_open( $file );
+    flock($fh, 1);
     $line = <$fh>;
     close $fh;