Fix cleanup and diff.
[nethome.git] / bin / kernel / kernelkkfix
index 5972abc..1bf168a 100755 (executable)
@@ -6,20 +6,24 @@
 # Required for proper diffing of CVSed Linux kernel sourcetrees.
 
 
-find -type f|grep -v /CVS/|xargs perl -i -p -e '
-       s/\$(
-               Author
-               |Date
-               |CVSHeader
-               |Header
-               |Id
-               |Locker
-               |Log
-               |Name
-               |RCSfile
-               |Revision
-               |Source
-               |State
-               )(?::[^\$]*)?\$
-               /\$$1\$/gx;
+find -type f|grep -v /CVS/|xargs perl -i -e '
+       use bytes;
+       while (<>) {
+               s/\$(
+                       Author
+                       |Date
+                       |CVSHeader
+                       |Header
+                       |Id
+                       |Locker
+                       |Log
+                       |Name
+                       |RCSfile
+                       |Revision
+                       |Source
+                       |State
+                       )(?::[^\$]*)?\$
+                       /\$$1\$/gx;
+               print;
+       }
        '