diff options
author | Perl 5 Porters <perl5-porters.nicoh.com> | 1996-01-03 01:33:57 +0000 |
---|---|---|
committer | Andy Dougherty <doughera.lafayette.edu> | 1996-01-03 01:33:57 +0000 |
commit | dd6decf0ecc1084ce27bf33d6b21eccb4b0a6b07 (patch) | |
tree | 67b64b59f0b2ae8588fece4d4ab5a74a6c7b5438 /installperl | |
parent | b29d8d1397a78458b8d5add8cef3da1f1d5fdf3e (diff) | |
download | perl-dd6decf0ecc1084ce27bf33d6b21eccb4b0a6b07.tar.gz |
perl 5.002beta1h patch: installperl
Use new location of utility scripts.
Eliminate double '//' and extra "".
Diffstat (limited to 'installperl')
-rwxr-xr-x | installperl | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/installperl b/installperl index 45f9c7efd1..be8c8a8e3c 100755 --- a/installperl +++ b/installperl @@ -13,14 +13,15 @@ while (@ARGV) { umask 022; -@scripts = ('cppstdin', 'c2ph', 'h2ph', 'h2xs', 'pstruct', - 'x2p/s2p', 'x2p/find2perl', - 'perldoc', - 'pod/pod2man', 'pod/pod2html', 'pod/pod2latex' ); +@scripts = qw(cppstdin + utils/c2ph utils/h2ph utils/h2xs utils/pstruct + utils/perlbug utils/perldoc + x2p/s2p x2p/find2perl + pod/pod2man pod/pod2html pod/pod2latex pod/pod2text); # pod documentation now handled by separate installman script. # These two are archaic leftovers. -@manpages = ('x2p/a2p.man', 'x2p/s2p.man'); +@manpages = qw(x2p/a2p.man x2p/s2p.man); @pods = (<pod/*.pod>); @@ -374,7 +375,7 @@ sub installlib { if ($?) { &unlink("$installlib/$name"); &makedir("$installlib/$dir"); - cp_if_diff("$_", "$installlib/$dir/$_"); + cp_if_diff($_, "$installlib/$name"); # HP-UX (at least) needs to maintain execute permissions # on dynamically-loaded libraries. if ($name =~ /\.(so|$dlext)$/o) { |