diff options
| author | sakamoto <sakamoto> | 2000-11-27 04:42:48 +0000 |
|---|---|---|
| committer | sakamoto <sakamoto> | 2000-11-27 04:42:48 +0000 |
| commit | 487dfe1623669cd940c7f19810d429ec2aa6c135 (patch) | |
| tree | 3f712e33e453ce7daa3d2abcf4615c803396fb9c /pkgtools | |
| parent | a6c77d856aedc58ed5a4b9bc272723bddc04a1e3 (diff) | |
| download | pkgsrc-487dfe1623669cd940c7f19810d429ec2aa6c135.tar.gz | |
escape RE special chars in package names.
Diffstat (limited to 'pkgtools')
| -rw-r--r-- | pkgtools/pkgdep/files/pkgdep.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/pkgtools/pkgdep/files/pkgdep.pl b/pkgtools/pkgdep/files/pkgdep.pl index 78adf2c1b8f..44ebd2171b0 100644 --- a/pkgtools/pkgdep/files/pkgdep.pl +++ b/pkgtools/pkgdep/files/pkgdep.pl @@ -1,5 +1,5 @@ #!/usr/bin/env perl -# $NetBSD: pkgdep.pl,v 1.1.1.1 1999/09/21 02:26:13 sakamoto Exp $ +# $NetBSD: pkgdep.pl,v 1.2 2000/11/27 04:42:48 sakamoto Exp $ require 'getopts.pl'; use strict; @@ -128,6 +128,7 @@ sub mkreqd { for (keys %deps) { my ($p) = $_; for (split(/ /, $deps{$p})) { + $_ =~ s/(\+)/\\\1/g; if (defined($reqd{$_})) { if (!($reqd{$_} =~ /$_/)) { $reqd{$_} .= " " . $p; |