Configure has a path to less and perl5db.pl can use it

diff --git a/lib/perl5db.pl b/lib/perl5db.pl
index b49fc41..5ccdbbe 100644 (file)
--- a/lib/perl5db.pl
+++ b/lib/perl5db.pl
@@ -7583,6 +7583,12 @@ C<$ENV{LESS}> so we don't have to go through doing the stats again.
 
 sub fix_less {
 
+    my $config_less = eval {
+       require Config;
+       $Config::Config{less};
+    };
+    return $config_less if $config_less;
+
     # We already know if this is set.
     return if defined $ENV{LESS} && $ENV{LESS} =~ /r/;