You are viewing a plain text version of this content. The canonical link for it is here.
Posted to cvs@httpd.apache.org by ta...@apache.org on 2012/01/09 15:58:56 UTC
svn commit: r1229181 - /httpd/docs-build/trunk/lib/metafile.pl
Author: takashi
Date: Mon Jan 9 14:58:56 2012
New Revision: 1229181
URL: http://svn.apache.org/viewvc?rev=1229181&view=rev
Log:
Loosen "English Revision" format
Modified:
httpd/docs-build/trunk/lib/metafile.pl
Modified: httpd/docs-build/trunk/lib/metafile.pl
URL: http://svn.apache.org/viewvc/httpd/docs-build/trunk/lib/metafile.pl?rev=1229181&r1=1229180&r2=1229181&view=diff
==============================================================================
--- httpd/docs-build/trunk/lib/metafile.pl (original)
+++ httpd/docs-build/trunk/lib/metafile.pl Mon Jan 9 14:58:56 2012
@@ -219,10 +219,10 @@ sub outofdate($$$) {
local $_;
while (<FILE>) {
$rev = $1, $orev=$2, last
- if /<!--\s*English\s+Revision:\s*([^\s:]+)
+ if /<!--\s*English\s+Revision\s*:\s*([^\s:]+)
(?::(\S+)\s+\(outdated\))?\s+-->/xi
or
- /<!--\s*English\s+Revision:\s*(\S+)\s+
+ /<!--\s*English\s+Revision\s*:\s*(\S+)\s+
(?:\(outdated:\s*(\S+)\s*\)\s+)?-->/xi;
}
}
@@ -244,11 +244,11 @@ sub outofdate($$$) {
or die "could not close file '$curpath' ($!), stopped";
unless (
- $cont =~ s{<!--\s*English\s+Revision:\s*([^\s:]+)
+ $cont =~ s{<!--\s*English\s+Revision\s*:\s*([^\s:]+)
(?::\S+\s+\(outdated\))?\s+-->}
{<!-- English Revision: $1:$reven (outdated) -->}ix
) {
- $cont =~ s{<!--\s*English\s+Revision:\s*(\S+)\s+
+ $cont =~ s{<!--\s*English\s+Revision\s*:\s*(\S+)\s+
(?:\(outdated[^)]*\)\s+)?-->}
{<!-- English Revision: $1:$reven (outdated) -->}ix
}