]> git.donarmstrong.com Git - biopieces.git/blobdiff - bp_bin/remove_mysql_tables
implementing status solution
[biopieces.git] / bp_bin / remove_mysql_tables
index 28751697a5cb66b4b4fa7e48d3cadc3ddba9bf99..64450f41580bffb4ec8b0f5cfac6b0b9aeb3c71b 100755 (executable)
@@ -84,26 +84,22 @@ foreach $table ( sort keys %table_hash )
 
 Maasha::SQL::disconnect( $dbh );
 
+Maasha::Biopieces::close_stream( $in );
+Maasha::Biopieces::close_stream( $out );
+
 
 # >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
 
 
 BEGIN
 {
-    $run_time_beg = Maasha::Biopieces::run_time();
-
-    Maasha::Biopieces::log_biopiece();
+    Maasha::Biopieces::status_set();
 }
 
 
 END
 {
-    Maasha::Biopieces::close_stream( $in );
-    Maasha::Biopieces::close_stream( $out );
-
-    $run_time_end = Maasha::Biopieces::run_time();
-
-    Maasha::Biopieces::run_time_print( $run_time_beg, $run_time_end, $options );
+    Maasha::Biopieces::status_log();
 }
 
 
@@ -111,4 +107,3 @@ END
 
 
 __END__
-