From 9b961b8638173349268599dde688ff594d56e297 Mon Sep 17 00:00:00 2001 From: Will Hawes Date: Fri, 27 Apr 2018 15:06:34 +0100 Subject: [PATCH] Make POSTGRES_HOME override PATH. --- lib/Test/PostgreSQL.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/Test/PostgreSQL.pm b/lib/Test/PostgreSQL.pm index 65714bd..abdcc8a 100644 --- a/lib/Test/PostgreSQL.pm +++ b/lib/Test/PostgreSQL.pm @@ -646,12 +646,12 @@ method setup() { method _find_program($prog) { undef $errstr; - my $path = which $prog; - return $path if $path; for my $sp (@{$self->search_paths}) { return "$sp/bin/$prog" if -x "$sp/bin/$prog"; return "$sp/$prog" if -x "$sp/$prog"; } + my $path = which $prog; + return $path if $path; $errstr = "could not find $prog, please set appropriate PATH or POSTGRES_HOME"; return; }