From: khizmax Date: Wed, 7 Sep 2016 20:52:03 +0000 (+0300) Subject: Fixed cleaning script X-Git-Tag: v2.2.0~134 X-Git-Url: http://demsky.eecs.uci.edu/git/?a=commitdiff_plain;h=8901688890b73cbfb49467c607dc4275a08e4fbd;p=libcds.git Fixed cleaning script --- diff --git a/tools/brush_cds.pl b/tools/brush_cds.pl index a8ca3862..49e46c38 100644 --- a/tools/brush_cds.pl +++ b/tools/brush_cds.pl @@ -16,9 +16,7 @@ sub brush() { processDir( "../cds" ) ; processDir( "../src" ) ; - processDir( "../tests/test-hdr" ) ; - processDir( "../tests/unit" ) ; - processDir( "../tests/cppunit" ) ; + processDir( "../test" ) ; } sub processDir( $ ) @@ -45,7 +43,7 @@ sub processFile( $ ) my $file = shift; if ( open( my $fh, $file )) { - binmode $fh ; + #binmode $fh ; my $str = ''; while (<$fh>) { if ( /^\/\/\$\$CDS-header\$\$/ ) { @@ -82,7 +80,7 @@ sub processFile( $ ) } else { $nTabsFound += $_ =~ s/\t/ /g; - $_ =~ s/\s+$// ; + $_ =~ s/\s+$//; $_ =~ s/\s+;$/;/; $str .= $_ ; $str .= "\n" ; @@ -91,7 +89,7 @@ sub processFile( $ ) close $fh; if ( open( my $fh, ">$file" )) { - binmode $fh; + #binmode $fh; print $fh $str; close $fh; }