[logback-dev] svn commit: r2154 - logback/trunk

[noreply.ceki at qos.ch]

Author: ceki
Date: Thu Feb 12 11:20:33 2009
New Revision: 2154

Modified:
   logback/trunk/version.pl

Log:
original file is now removed

Modified: logback/trunk/version.pl
==============================================================================
--- logback/trunk/version.pl	(original)
+++ logback/trunk/version.pl	Thu Feb 12 11:20:33 2009
@@ -14,11 +14,11 @@
   if(-s $filename) {
     print "Processing [" . $filename . "]\r\n";
 
-    my $backup = "$filename.original";
+    my $origFile = "$filename.original";
     
-    rename($filename, $backup);
+    rename($filename, $origFile);
     open(OUT, ">$filename");
-    open(IN, "$backup");
+    open(IN, "$origFile");
     
     my $hitCount=0;
     while(<IN>) {
@@ -30,6 +30,7 @@
     }
     close(IN);
     close(OUT);
+    remove($origFile);
   } else {
     print "File [" . $filename . "] does not exist\r\n" 
   }