From da72ac4b264359400c3c7c2d2f05855347783031 Mon Sep 17 00:00:00 2001 From: short <> Date: Thu, 12 May 2005 10:21:26 +0000 Subject: [PATCH] Disable UTF-8 parsing ("use bytes;"). --- bin/kernel/kernelLogfix | 14 +++++++++----- bin/kernel/kernelkkfix | 36 ++++++++++++++++++++---------------- 2 files changed, 29 insertions(+), 21 deletions(-) diff --git a/bin/kernel/kernelLogfix b/bin/kernel/kernelLogfix index e81dba6..c4c2301 100755 --- a/bin/kernel/kernelLogfix +++ b/bin/kernel/kernelLogfix @@ -6,9 +6,13 @@ # Required for proper diffing of CVSed Linux kernel sourcetrees. -find -type f|grep -v /CVS/|xargs perl -i -p -e ' - s/\$( - Log - )(?::[^\$]*)?\$ - /\%$1\%/gx; +find -type f|grep -v /CVS/|xargs perl -i -e ' + use bytes; + while (<>) { + s/\$( + Log + )(?::[^\$]*)?\$ + /\%$1\%/gx; + print; + } ' diff --git a/bin/kernel/kernelkkfix b/bin/kernel/kernelkkfix index 5972abc..1bf168a 100755 --- a/bin/kernel/kernelkkfix +++ b/bin/kernel/kernelkkfix @@ -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; + } ' -- 1.8.3.1