Escape forward slashes in search pattern.
This commit is contained in:
parent
401c60e578
commit
9e6692f546
Notes:
svn2git
2020-12-08 03:00:23 +00:00
svn path=/www/; revision=6267
1 changed files with 2 additions and 2 deletions
|
@ -4,7 +4,7 @@
|
||||||
#
|
#
|
||||||
# usage: revcheck <build topdir> <relative to localtop> <SGML filename>
|
# usage: revcheck <build topdir> <relative to localtop> <SGML filename>
|
||||||
#
|
#
|
||||||
# $FreeBSD$
|
# $FreeBSD: www/ja/revcheck,v 1.1 1999/12/23 01:14:38 kuriyama Exp $
|
||||||
|
|
||||||
my $buildtop = $ARGV[0];
|
my $buildtop = $ARGV[0];
|
||||||
my $reldir = $ARGV[1];
|
my $reldir = $ARGV[1];
|
||||||
|
@ -26,7 +26,7 @@ die "Cannot read English file: $!\n"
|
||||||
### Open English file.
|
### Open English file.
|
||||||
open EN, $name_en or die "Cannot open English file: $!\n";
|
open EN, $name_en or die "Cannot open English file: $!\n";
|
||||||
while (<EN>) {
|
while (<EN>) {
|
||||||
if (/\$FreeBSD: .* (.*) .* .* .* .* \$/) {
|
if (/\$FreeBSD: www\/ja\/revcheck,v 1.1 1999\/12\/23 01:14:38 kuriyama Exp $/) {
|
||||||
$rev_en = $1;
|
$rev_en = $1;
|
||||||
last;
|
last;
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in a new issue