sbolint: rename -a log file if it already exists.

1 files changed, 4 insertions, 1 deletions

diff --git a/sbolint b/sbolint
index 55e5681..7d8de57 100755
--- a/sbolint
+++ b/sbolint
@@ -404,7 +404,10 @@ if($stdin) {
 if($recursive_git) {
 	if(-t STDOUT) {
 		chomp (my $outfile = "$SELF.log." . `date +%Y%m%d`);
-		warn "$SELF: stdout is a terminal, redirecting to $outfile";
+		warn "$SELF: stdout is a terminal, redirecting to $outfile\n";
+		if(rename $outfile, $outfile . ".old") {
+			warn "$SELF: renamed old $outfile to $outfile.old\n";
+		}
 		open my $f, ">$outfile" or die $!;
 		*STDOUT = $f;
 	}