From 451815261fdf5078f0722896184b3f2ec7d54389 Mon Sep 17 00:00:00 2001 From: =?utf8?q?=C3=98yvind=20A=2E=20Holm?= Date: Thu, 24 Mar 2011 00:19:18 +0100 Subject: [PATCH] Move use strict before BEGIN 18c8dc5c-55a4-11e0-8409-1315618d356e --- gpsman2gpx | 3 ++- tests/addpoints/addpoints.t | 3 ++- tests/csv2gpx.t | 3 ++- tests/gpst-file/gpst-file.t | 3 ++- 4 files changed, 8 insertions(+), 4 deletions(-) diff --git a/gpsman2gpx b/gpsman2gpx index 41423e6..7adf16f 100755 --- a/gpsman2gpx +++ b/gpsman2gpx @@ -11,11 +11,12 @@ # file for legal stuff. #======================================================================= +use strict; + BEGIN { push(@INC, "$ENV{'HOME'}/bin/src/gpstools"); } -use strict; use Getopt::Long; use GPSTxml; diff --git a/tests/addpoints/addpoints.t b/tests/addpoints/addpoints.t index 9f8c762..3bbf9de 100755 --- a/tests/addpoints/addpoints.t +++ b/tests/addpoints/addpoints.t @@ -11,13 +11,14 @@ # file for legal stuff. #======================================================================= +use strict; + BEGIN { # push(@INC, "$ENV{'HOME'}/bin/STDlibdirDTS"); use Test::More qw{no_plan}; # use_ok() goes here } -use strict; use Getopt::Long; $| = 1; diff --git a/tests/csv2gpx.t b/tests/csv2gpx.t index 8ee0b5b..869818d 100755 --- a/tests/csv2gpx.t +++ b/tests/csv2gpx.t @@ -11,13 +11,14 @@ # file for legal stuff. #======================================================================= +use strict; + BEGIN { # push(@INC, "$ENV{'HOME'}/bin/STDlibdirDTS"); use Test::More qw{no_plan}; # use_ok() goes here } -use strict; use Getopt::Long; $| = 1; diff --git a/tests/gpst-file/gpst-file.t b/tests/gpst-file/gpst-file.t index 579c405..3471b89 100755 --- a/tests/gpst-file/gpst-file.t +++ b/tests/gpst-file/gpst-file.t @@ -11,13 +11,14 @@ # file for legal stuff. #======================================================================= +use strict; + BEGIN { # push(@INC, "$ENV{'HOME'}/bin/STDlibdirDTS"); use Test::More qw{no_plan}; # use_ok() goes here } -use strict; use Getopt::Long; $| = 1; -- 2.11.4.GIT