Escape period and $.
This commit is contained in:
parent
64e0013900
commit
928e5b911f
Notes:
svn2git
2020-12-08 03:00:23 +00:00
svn path=/www/; revision=8256
1 changed files with 3 additions and 3 deletions
|
@ -7,7 +7,7 @@
|
|||
# usage: prehtml [-revcheck <localtop> <relative to localtop>] <SGML filename>
|
||||
# (ex. % prehtml -revcheck ../.. news/1996 index.sgml)
|
||||
#
|
||||
# $FreeBSD: www/ja/prehtml,v 1.1 2000/10/02 09:16:04 kuriyama Exp $
|
||||
# $FreeBSD: www/ja/prehtml,v 1.2 2000/10/03 11:10:47 hrs Exp $
|
||||
|
||||
my $revcheck;
|
||||
my $topdir;
|
||||
|
@ -48,7 +48,7 @@ while(defined($_ = $ARGV[0])) {
|
|||
} elsif ($opt_state eq sARG) {
|
||||
$file{target} = $_;
|
||||
if($revcheck) {
|
||||
s/.sgml$//;
|
||||
s/\.sgml$//;
|
||||
my $basename = $_;
|
||||
$file{cvsweb} = "www/en/${reldir}${basename}.sgml";
|
||||
$file{orgbase} = "${topdir}/../en/${reldir}${basename}";
|
||||
|
@ -67,7 +67,7 @@ my $pos_date;
|
|||
while(defined($_ = <TARGET>)) {
|
||||
if(/<!ENTITY\s+date/) {
|
||||
$pos_date = tell(TARGET);
|
||||
if(m/\"\$Free[B]SD: [^\s]+ [.0-9]+ ([\/0-9]+)[^\$]*\$\"/) {
|
||||
if(m/\"\x24FreeBSD: [^\s]+ [.0-9]+ ([\/0-9]+)[^\$]*\$\"/) {
|
||||
$date = "<!ENTITY date \"Last modified: $1\">";
|
||||
} else {
|
||||
$date = "<!ENTITY date \"Last modified: UNKNOWN\">";
|
||||
|
|
Loading…
Reference in a new issue