|
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" .
|
|