+++ /dev/null
-diff -urN perl-5.6.1.orig/lib/ExtUtils/Liblist.pm perl-5.6.1/lib/ExtUtils/Liblist.pm
---- perl-5.6.1.orig/lib/ExtUtils/Liblist.pm Fri Feb 23 03:57:55 2001
-+++ perl-5.6.1/lib/ExtUtils/Liblist.pm Thu Apr 12 20:57:10 2001
-@@ -60,6 +60,7 @@
- my(@searchpath); # from "-L/path" entries in $potential_libs
- my(@libpath) = split " ", $Config{'libpth'};
- my(@ldloadlibs, @bsloadlibs, @extralibs, @ld_run_path, %ld_run_path_seen);
-+ $ld_run_path_seen{$_} = 1 foreach qw(/usr/X11R6/lib /usr/lib /lib);
- my(@libs, %libs_seen);
- my($fullname, $thislib, $thispth, @fullname);
- my($pwd) = cwd(); # from Cwd.pm
-diff -urN perl-5.6.1.orig/lib/ExtUtils/MM_Unix.pm perl-5.6.1/lib/ExtUtils/MM_Unix.pm
---- perl-5.6.1.orig/lib/ExtUtils/MM_Unix.pm Thu Apr 12 20:29:35 2001
-+++ perl-5.6.1/lib/ExtUtils/MM_Unix.pm Thu Apr 12 20:56:30 2001
-@@ -524,9 +524,16 @@
- };
- my($tmp);
- for $tmp (qw/
-- EXTRALIBS LDLOADLIBS BSLOADLIBS LD_RUN_PATH
-+ EXTRALIBS LDLOADLIBS BSLOADLIBS
- /) {
- next unless defined $self->{$tmp};
-+ push @m, "$tmp = $self->{$tmp}\n";
-+ }
-+ # don't set LD_RUN_PATH if empty
-+ for $tmp (qw/
-+ LD_RUN_PATH
-+ /) {
-+ next unless $self->{$tmp};
- push @m, "$tmp = $self->{$tmp}\n";
- }
- return join "", @m;