Merge changes from 3.15 branch

src/tools/test/Breaktable.plt

@@ -1,7 +1,6 @@
 #!/usr/bin/perl
 
-use FindBin qw($Bin);
-use lib "$Bin/../../../../lib/perl";
+use lib '../..';
 
 use Test::More tests => 9;
 

src/tools/test/DBD.plt

@@ -1,7 +1,6 @@
 #!/usr/bin/perl
 
-use FindBin qw($Bin);
-use lib "$Bin/../../../../lib/perl";
+use lib '../..';
 
 use Test::More tests => 18;
 

src/tools/test/Device.plt

@@ -1,7 +1,6 @@
 #!/usr/bin/perl
 
-use FindBin qw($Bin);
-use lib "$Bin/../../../../lib/perl";
+use lib '../..';
 
 use Test::More tests => 16;
 

src/tools/test/Driver.plt

@@ -1,7 +1,6 @@
 #!/usr/bin/perl
 
-use FindBin qw($Bin);
-use lib "$Bin/../../../../lib/perl";
+use lib '../..';
 
 use Test::More tests => 2;
 

src/tools/test/Function.plt

@@ -1,7 +1,6 @@
 #!/usr/bin/perl
 
-use FindBin qw($Bin);
-use lib "$Bin/../../../../lib/perl";
+use lib '../..';
 
 use Test::More tests => 2;
 

src/tools/test/Menu.plt

@@ -1,7 +1,6 @@
 #!/usr/bin/perl
 
-use FindBin qw($Bin);
-use lib "$Bin/../../../../lib/perl";
+use lib '../..';
 
 use Test::More tests => 14;
 

src/tools/test/Recfield.plt

@@ -1,7 +1,6 @@
 #!/usr/bin/perl
 
-use FindBin qw($Bin);
-use lib "$Bin/../../../../lib/perl";
+use lib '../..';
 
 use Test::More tests => 76;
 

src/tools/test/Recordtype.plt

@@ -1,7 +1,6 @@
 #!/usr/bin/perl
 
-use FindBin qw($Bin);
-use lib "$Bin/../../../../lib/perl";
+use lib '../..';
 
 use Test::More tests => 17;
 

src/tools/test/Registrar.plt

@@ -1,7 +1,6 @@
 #!/usr/bin/perl
 
-use FindBin qw($Bin);
-use lib "$Bin/../../../../lib/perl";
+use lib '../..';
 
 use Test::More tests => 2;
 

src/tools/test/Variable.plt

@@ -1,7 +1,6 @@
 #!/usr/bin/perl
 
-use FindBin qw($Bin);
-use lib "$Bin/../../../../lib/perl";
+use lib '../..';
 
 use Test::More tests => 4;
 

src/tools/test/macLib.plt

@@ -1,7 +1,6 @@
 #!/usr/bin/perl
 
-use FindBin qw($Bin);
-use lib "$Bin/../../../../lib/perl";
+use lib '../..';
 
 use Test::More tests => 35;