diff options
| author |   espie <espie@openbsd.org> | 2001-05-08 19:56:44 +0000 |
|---|---|---|
| committer | espie <espie@openbsd.org> | 2001-05-08 19:56:44 +0000 |
| commit | d0b44fb85db8403f87a35d7b72a0bb806059270a (patch) | |
| tree | 4caf24648ed44a1829f82b20483d62e1ad2901c5 | |
| parent | more class/subclass/caps ids; from netbsd (diff) | |
| download | wireguard-openbsd-d0b44fb85db8403f87a35d7b72a0bb806059270a.tar.xz wireguard-openbsd-d0b44fb85db8403f87a35d7b72a0bb806059270a.zip | |
Insure detection of prefixes is limited to whole words. This avoids
recognizing /usr/libdata as /usr/lib.
Ok millert@
| -rw-r--r-- | gnu/usr.bin/perl/lib/ExtUtils/MM_Unix.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gnu/usr.bin/perl/lib/ExtUtils/MM_Unix.pm b/gnu/usr.bin/perl/lib/ExtUtils/MM_Unix.pm index 57e72dedc11..fc13461cf82 100644 --- a/gnu/usr.bin/perl/lib/ExtUtils/MM_Unix.pm +++ b/gnu/usr.bin/perl/lib/ExtUtils/MM_Unix.pm @@ -8,8 +8,8 @@ use strict; use vars qw($VERSION $Is_Mac $Is_OS2 $Is_VMS $Is_Win32 $Is_Dos $Is_PERL_OBJECT $Verbose %pm %static $Xsubpp_Version); -$VERSION = substr q$Revision: 1.7 $, 10; -# $Id: MM_Unix.pm,v 1.7 2000/04/06 17:06:28 millert Exp $ +$VERSION = substr q$Revision: 1.8 $, 10; +# $Id: MM_Unix.pm,v 1.8 2001/05/08 19:56:44 espie Exp $ Exporter::import('ExtUtils::MakeMaker', qw($Verbose &neatvalue)); @@ -3093,7 +3093,7 @@ sub prefixify { my($self,$var,$sprefix,$rprefix) = @_; $self->{uc $var} ||= $Config{lc $var}; $self->{uc $var} = VMS::Filespec::unixpath($self->{uc $var}) if $Is_VMS; - $self->{uc $var} =~ s/\Q$sprefix\E/$rprefix/s; + $self->{uc $var} =~ s/\w\Q$sprefix\E\w/$rprefix/s; } =item processPL (o) |