diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-10-13 05:02:43 +0200 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-10-13 05:50:21 +0200 |
commit | 8c4e99a69f085cf511c09173f56964797a69f54d (patch) | |
tree | 6c9206200c55a1a5c8aba3bcc472d4dcc03fa9ef | |
parent | eb8f6e900feccc2b7667289135f821438717ec8c (diff) | |
download | urpmi-8c4e99a69f085cf511c09173f56964797a69f54d.tar urpmi-8c4e99a69f085cf511c09173f56964797a69f54d.tar.gz urpmi-8c4e99a69f085cf511c09173f56964797a69f54d.tar.bz2 urpmi-8c4e99a69f085cf511c09173f56964797a69f54d.tar.xz urpmi-8c4e99a69f085cf511c09173f56964797a69f54d.zip |
fix installing libexec scripts
issue is that urpmi matches urpmi.* too (hence urpmi.update too) in first regexp
=> reverse regexpes order
-rwxr-xr-x | Makefile.PL | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Makefile.PL b/Makefile.PL index ed39b155..129d1a1a 100755 --- a/Makefile.PL +++ b/Makefile.PL @@ -45,10 +45,10 @@ sub top_targets { sub installbin { my $self = shift; my $inherited = $self->SUPER::installbin(@_); - my $s = join '|', map quotemeta, @sbin_scripts; - $inherited =~ s{\$\(INST_SCRIPT\)/($s)}{\$(INST_SBIN)/$1}g; - $s = join '|', map quotemeta, @libexec_scripts; + my $s = join '|', map quotemeta, @libexec_scripts; $inherited =~ s{\$\(INST_SCRIPT\)/($s)}{\$(INST_LIBEXEC)/$1}g; + $s = join '|', map { quotemeta($_) . '\s' } @sbin_scripts; + $inherited =~ s{\$\(INST_SCRIPT\)/($s)}{\$(INST_SBIN)/$1}g; # how to create needed directories under blib $inherited .= $self->dir_target("\$(INST_$_)") for qw(SBIN LIBEXEC MAN5DIR MAN8DIR); $inherited; |