Check-in Number:
|
465 | |
Date: |
2001-May-12 09:24:16 (local)
2001-May-12 07:24:16 (UTC) |
User: | rse |
Branch: | |
Comment: |
More quotemeta required |
Tickets: |
|
Inspections: |
|
Files: |
|
ossp-pkg/shiela/shiela.pl 1.7 -> 1.8
--- shiela.pl 2001/05/11 19:53:45 1.7
+++ shiela.pl 2001/05/12 07:24:16 1.8
@@ -1672,8 +1672,9 @@
$d .= scalar $cvs->result;
$cvs->close;
}
+ my $Is_quoted = quotemeta($Is);
$d =~ s|^Index:.+?\ndiff\s+.*?\n||s;
- $d =~ s|^(---\s+)$Is(\s+)|$1$cvsdir/$Is$2|m;
+ $d =~ s|^(---\s+)${Is_quoted}(\s+)|$1$cvsdir/$Is$2|m;
$d =~ s|^(\+\+\+\s+)$Is(\s+)|$1$cvsdir/$Is$2|m;
$cvsdiff .=
"<Diff $cvsdir/$Is>\n" .
|
|