Index: SVN-Look-0.15/Makefile.PL
--- SVN-Look-0.15/Makefile.PL.orig	2009-10-25 02:06:37 +0100
+++ SVN-Look-0.15/Makefile.PL	2009-10-25 18:50:55 +0100
@@ -14,22 +14,6 @@
     'author-tests' => \$author_tests,
 ) or die $usage;
 
-my $svnlook;
-for my $d (
-    path(),
-    catfile('usr', 'local', 'bin'),
-    catfile('usr', 'bin'),
-    catfile('bin'),
-) {
-    my $f = catfile($d, 'svnlook');
-    next unless -x $f;
-    next unless system("$f help >/dev/null 2>/dev/null") == 0;
-    $svnlook = $f;
-    last;
-}
-die "Aborting because I couldn't find the 'svnlook' executable.\n"
-    unless $svnlook;
-
 if ($author_tests) {
     open(ENABLED, ">t/author.enabled") or die "Can't touch ./t/author.enabled: $!";
     close(ENABLED)                     or die "Can't touch ./t/author.enabled: $!";
Index: SVN-Look-0.15/lib/SVN/Look.pm
--- SVN-Look-0.15/lib/SVN/Look.pm.orig	2009-10-25 02:16:36 +0100
+++ SVN-Look-0.15/lib/SVN/Look.pm	2009-10-25 18:49:26 +0100
@@ -45,6 +45,7 @@
 our $SVNLOOK;
 my $root = rootdir();
 for my $d (
+    "@l_prefix@/bin",
     path(),
     catfile($root, 'usr', 'local', 'bin'),
     catfile($root, 'usr', 'bin'),