Fixed cleaning script

diff --git a/tools/brush_cds.pl b/tools/brush_cds.pl
index a8ca3862021d746d6388f0c05d028ac585e2832f..49e46c38a7b13eaf91300981c2412d12e4007583 100644 (file)
--- a/tools/brush_cds.pl
+++ b/tools/brush_cds.pl
@@ -16,9 +16,7 @@ sub brush()
 {\r
        processDir( "../cds" ) ;\r
        processDir( "../src" ) ;\r
-       processDir( "../tests/test-hdr" ) ;\r
-       processDir( "../tests/unit" ) ;\r
-       processDir( "../tests/cppunit" ) ;\r
+       processDir( "../test" ) ;\r
 }\r
 \r
 sub processDir( $ )\r
@@ -45,7 +43,7 @@ sub processFile( $ )
        my $file = shift;\r
 \r
        if ( open( my $fh, $file )) {\r
-               binmode $fh     ;\r
+               #binmode $fh    ;\r
                my $str = '';\r
                while (<$fh>) {\r
             if ( /^\/\/\$\$CDS-header\$\$/ ) {\r
@@ -82,7 +80,7 @@ sub processFile( $ )
             }\r
             else {\r
                 $nTabsFound += $_ =~ s/\t/    /g;\r
-                $_ =~ s/\s+$//  ;\r
+                $_ =~ s/\s+$//;\r
                 $_ =~ s/\s+;$/;/;\r
                 $str .= $_      ;\r
                 $str .= "\n"    ;\r
@@ -91,7 +89,7 @@ sub processFile( $ )
                close $fh;\r
                \r
                if ( open( my $fh, ">$file" )) {\r
-                       binmode $fh;\r
+                       #binmode $fh;\r
                        print $fh $str;\r
                        close $fh;\r
                }\r