From 95a18d80949e309bd351cab335e02100d253b704 Mon Sep 17 00:00:00 2001 From: sakamoto Date: Mon, 27 Nov 2000 04:42:48 +0000 Subject: escape RE special chars in package names. --- pkgtools/pkgdep/files/pkgdep.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'pkgtools/pkgdep') 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; -- cgit v1.2.3