Lp 1768987: Use FindBin in 24-sql-gettext-unique.t.

Use FindBin in the 24-sql-gettext-unique.t test file so that it can be
run from directories other than Open-ILS/src/perlmods.

Signed-off-by: Jason Stephenson <jason@sigio.com>

diff --git a/Open-ILS/src/perlmods/t/24-sql-gettext-unique.t b/Open-ILS/src/perlmods/t/24-sql-gettext-unique.t
index 5df76ce..0645f08 100644 (file)
--- a/Open-ILS/src/perlmods/t/24-sql-gettext-unique.t
+++ b/Open-ILS/src/perlmods/t/24-sql-gettext-unique.t
@@ -2,12 +2,13 @@ use strict;
 use warnings;
 use Test::More;
 use Test::Output;
+use FindBin;
 
 my $num_tests = 0;
 
 my $data;
 {
-    open(my $fh, "<", "../sql/Pg/950.data.seed-values.sql")
+    open(my $fh, "<", "$FindBin::Bin/../../sql/Pg/950.data.seed-values.sql")
         or die "Can't open 950.data.seed-values.sql: $!";
     local $/ = undef;
     $data = <$fh>;