From 72985505ef4c375dbf07e2fbb58bdb6168c7167b Mon Sep 17 00:00:00 2001 From: Michael Davidsaver Date: Tue, 4 Jun 2019 10:27:55 +0200 Subject: [PATCH] further no need to search for perl modules under bin --- modules/ca/src/perl/capr.pl | 1 - modules/ca/src/template/top/caPerlApp/caget.pl | 1 - modules/ca/src/template/top/caPerlApp/cainfo.pl | 1 - modules/ca/src/template/top/caPerlApp/camonitor.pl | 1 - modules/ca/src/template/top/caPerlApp/caput.pl | 1 - modules/database/src/tools/dbExpand.pl | 1 - modules/database/src/tools/dbdExpand.pl | 1 - modules/database/src/tools/dbdReport.pl | 1 - modules/database/src/tools/dbdToHtml.pl | 1 - modules/database/src/tools/dbdToMenuH.pl | 1 - modules/database/src/tools/dbdToRecordtypeH.pl | 1 - modules/database/src/tools/registerRecordDeviceDriver.pl | 1 - modules/libcom/src/env/bldEnvData.pl | 1 - 13 files changed, 13 deletions(-) diff --git a/modules/ca/src/perl/capr.pl b/modules/ca/src/perl/capr.pl index 17a6dd04b..21e56ecd9 100644 --- a/modules/ca/src/perl/capr.pl +++ b/modules/ca/src/perl/capr.pl @@ -11,7 +11,6 @@ use strict; use FindBin qw($Bin); use lib ("$Bin/../../lib/perl"); -no lib $Bin; use Getopt::Std; use EPICS::Path; diff --git a/modules/ca/src/template/top/caPerlApp/caget.pl b/modules/ca/src/template/top/caPerlApp/caget.pl index dae3a778a..d206d8a36 100644 --- a/modules/ca/src/template/top/caPerlApp/caget.pl +++ b/modules/ca/src/template/top/caPerlApp/caget.pl @@ -6,7 +6,6 @@ use strict; use FindBin qw($Bin); use lib ("$Bin/../../lib/perl"); use _APPNAME_ModuleDirs; -no lib $Bin; use Getopt::Std; use Scalar::Util qw(looks_like_number); diff --git a/modules/ca/src/template/top/caPerlApp/cainfo.pl b/modules/ca/src/template/top/caPerlApp/cainfo.pl index 37c705e26..4d4a1ffbe 100644 --- a/modules/ca/src/template/top/caPerlApp/cainfo.pl +++ b/modules/ca/src/template/top/caPerlApp/cainfo.pl @@ -6,7 +6,6 @@ use strict; use FindBin qw($Bin); use lib ("$Bin/../../lib/perl"); use _APPNAME_ModuleDirs; -no lib $Bin; use Getopt::Std; use CA; diff --git a/modules/ca/src/template/top/caPerlApp/camonitor.pl b/modules/ca/src/template/top/caPerlApp/camonitor.pl index 15c0212f0..c426fa536 100644 --- a/modules/ca/src/template/top/caPerlApp/camonitor.pl +++ b/modules/ca/src/template/top/caPerlApp/camonitor.pl @@ -6,7 +6,6 @@ use strict; use FindBin qw($Bin); use lib ("$Bin/../../lib/perl"); use _APPNAME_ModuleDirs; -no lib $Bin; use Getopt::Std; use Scalar::Util qw(looks_like_number); diff --git a/modules/ca/src/template/top/caPerlApp/caput.pl b/modules/ca/src/template/top/caPerlApp/caput.pl index b08c9d200..03842d397 100644 --- a/modules/ca/src/template/top/caPerlApp/caput.pl +++ b/modules/ca/src/template/top/caPerlApp/caput.pl @@ -6,7 +6,6 @@ use strict; use FindBin qw($Bin); use lib ("$Bin/../../lib/perl"); use _APPNAME_ModuleDirs; -no lib $Bin; use Getopt::Std; use CA; diff --git a/modules/database/src/tools/dbExpand.pl b/modules/database/src/tools/dbExpand.pl index e4088d007..6596e4361 100644 --- a/modules/database/src/tools/dbExpand.pl +++ b/modules/database/src/tools/dbExpand.pl @@ -13,7 +13,6 @@ use strict; use FindBin qw($Bin); use lib ("$Bin/../../lib/perl"); -no lib $Bin; use DBD; use DBD::Parser; diff --git a/modules/database/src/tools/dbdExpand.pl b/modules/database/src/tools/dbdExpand.pl index 7e9ba8b5a..74e81eb76 100644 --- a/modules/database/src/tools/dbdExpand.pl +++ b/modules/database/src/tools/dbdExpand.pl @@ -11,7 +11,6 @@ use strict; use FindBin qw($Bin); use lib ("$Bin/../../lib/perl"); -no lib $Bin; use DBD; use DBD::Parser; diff --git a/modules/database/src/tools/dbdReport.pl b/modules/database/src/tools/dbdReport.pl index 8a82d690b..3f2269d8b 100644 --- a/modules/database/src/tools/dbdReport.pl +++ b/modules/database/src/tools/dbdReport.pl @@ -9,7 +9,6 @@ use FindBin qw($Bin); use lib ("$Bin/../../lib/perl"); -no lib $Bin; use DBD; use DBD::Parser; diff --git a/modules/database/src/tools/dbdToHtml.pl b/modules/database/src/tools/dbdToHtml.pl index 87fc23230..66d46f949 100644 --- a/modules/database/src/tools/dbdToHtml.pl +++ b/modules/database/src/tools/dbdToHtml.pl @@ -11,7 +11,6 @@ use strict; use FindBin qw($Bin); use lib ("$Bin/../../lib/perl"); -no lib $Bin; use DBD; use DBD::Parser; diff --git a/modules/database/src/tools/dbdToMenuH.pl b/modules/database/src/tools/dbdToMenuH.pl index e80ae3340..76aff7dac 100644 --- a/modules/database/src/tools/dbdToMenuH.pl +++ b/modules/database/src/tools/dbdToMenuH.pl @@ -9,7 +9,6 @@ use FindBin qw($Bin); use lib ("$Bin/../../lib/perl"); -no lib $Bin; use EPICS::Getopts; use File::Basename; diff --git a/modules/database/src/tools/dbdToRecordtypeH.pl b/modules/database/src/tools/dbdToRecordtypeH.pl index 028309fc4..891b5b5c5 100644 --- a/modules/database/src/tools/dbdToRecordtypeH.pl +++ b/modules/database/src/tools/dbdToRecordtypeH.pl @@ -9,7 +9,6 @@ use FindBin qw($Bin); use lib ("$Bin/../../lib/perl"); -no lib $Bin; use EPICS::Getopts; use File::Basename; diff --git a/modules/database/src/tools/registerRecordDeviceDriver.pl b/modules/database/src/tools/registerRecordDeviceDriver.pl index 507385e57..acbcc517c 100644 --- a/modules/database/src/tools/registerRecordDeviceDriver.pl +++ b/modules/database/src/tools/registerRecordDeviceDriver.pl @@ -13,7 +13,6 @@ use strict; use FindBin qw($Bin); use lib ("$Bin/../../lib/perl"); -no lib $Bin; use DBD; use DBD::Parser; diff --git a/modules/libcom/src/env/bldEnvData.pl b/modules/libcom/src/env/bldEnvData.pl index 180d63870..693be65da 100644 --- a/modules/libcom/src/env/bldEnvData.pl +++ b/modules/libcom/src/env/bldEnvData.pl @@ -15,7 +15,6 @@ use strict; use FindBin qw($Bin); use lib ("$Bin/../../lib/perl"); -no lib $Bin; use Getopt::Std; use File::Basename;