summaryrefslogtreecommitdiff
path: root/lang/perl5/files
diff options
context:
space:
mode:
Diffstat (limited to 'lang/perl5/files')
-rw-r--r--lang/perl5/files/patch-Install.pm13
-rw-r--r--lang/perl5/files/use.perl28
2 files changed, 40 insertions, 1 deletions
diff --git a/lang/perl5/files/patch-Install.pm b/lang/perl5/files/patch-Install.pm
new file mode 100644
index 000000000000..06bef472a7cf
--- /dev/null
+++ b/lang/perl5/files/patch-Install.pm
@@ -0,0 +1,13 @@
+$FreeBSD$
+
+--- lib/ExtUtils/Install.pm.orig Sun Jun 16 13:36:29 2002
++++ lib/ExtUtils/Install.pm Sun Jun 16 13:36:50 2002
+@@ -156,7 +156,7 @@
+ } else {
+ inc_uninstall($_,$File::Find::dir,$verbose,0); # nonono set to 0
+ }
+- $packlist->{$origfile}++;
++ $packlist->{$targetfile}++;
+
+ }, ".");
+ chdir($cwd) or Carp::croak("Couldn't chdir to $cwd: $!");
diff --git a/lang/perl5/files/use.perl b/lang/perl5/files/use.perl
index 557e38b52311..7769cdd49d77 100644
--- a/lang/perl5/files/use.perl
+++ b/lang/perl5/files/use.perl
@@ -17,7 +17,7 @@ EOF
my $port_perl = '%%PREFIX%%/bin/perl';
$port_perl =~ tr|/|/|s;
-my $ident = `/usr/bin/ident /usr/bin/perl5`;
+my $ident = `/usr/bin/ident -q /usr/bin/perl5`;
@ARGV == 1 or usage();
if ($ARGV[0] eq 'port') {
@@ -63,6 +63,18 @@ sub switch_to_system
EOF
close MK;
+
+ open MPOLD, "< /etc/manpath.config" or die "/etc/manpath.config: $!";
+ open MPNEW, "> /etc/manpath.config.new" or die "/etc/manpath.config.new: $!";
+ while (<MPOLD>) {
+ next if m|use.perl generated line|;
+ next if m|^\s*OPTIONAL_MANPATH\s+\S+/lib/perl5/%%PERL_VERSION%%/man\s*$|;
+ print MPNEW;
+ }
+ close MPNEW;
+ close MPOLD;
+ rename '/etc/manpath.config', '/etc/manpath.config.bak';
+ rename '/etc/manpath.config.new', '/etc/manpath.config';
}
sub switch_to_port
@@ -96,4 +108,18 @@ NO_PERL_WRAPPER=yo
EOF
close MK;
+
+ open MPOLD, "< /etc/manpath.config" or die "/etc/manpath.config: $!";
+ open MPNEW, "> /etc/manpath.config.new" or die "/etc/manpath.config.new: $!";
+ while (<MPOLD>) {
+ print MPNEW <<EOF if m|^\s*OPTIONAL_MANPATH\s+\S+/lib/perl5/\S+/man\s*$|;
+# -- use.perl generated line -- #
+OPTIONAL_MANPATH %%PREFIX%%/lib/perl5/%%PERL_VERSION%%/man
+EOF
+ print MPNEW;
+ }
+ close MPNEW;
+ close MPOLD;
+ rename '/etc/manpath.config', '/etc/manpath.config.bak';
+ rename '/etc/manpath.config.new', '/etc/manpath.config';
}