[Rt-commit] r11976 - in rt/branches/3.8-TESTING: bin

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Wed Apr 30 04:45:58 2008
New Revision: 11976

Modified:
   rt/branches/3.8-TESTING/bin/rt-crontool.in
   rt/branches/3.8-TESTING/bin/standalone_httpd.in
   rt/branches/3.8-TESTING/bin/webmux.pl.in
   rt/branches/3.8-TESTING/sbin/rt-clean-sessions.in
   rt/branches/3.8-TESTING/sbin/rt-dump-database.in
   rt/branches/3.8-TESTING/sbin/rt-notify-group-admin.in
   rt/branches/3.8-TESTING/sbin/rt-setup-database.in
   rt/branches/3.8-TESTING/sbin/rt-shredder.in
   rt/branches/3.8-TESTING/sbin/rt-validator.in

Log:
no annoying used only once warnings for $FindBin::Bin

Modified: rt/branches/3.8-TESTING/bin/rt-crontool.in
==============================================================================
--- rt/branches/3.8-TESTING/bin/rt-crontool.in	(original)
+++ rt/branches/3.8-TESTING/bin/rt-crontool.in	Wed Apr 30 04:45:58 2008
@@ -56,6 +56,7 @@
     for my $lib (@libs) {
         unless ( File::Spec->file_name_is_absolute($lib) ) {
             require FindBin;
+            no warnings "once";
             $lib =
               File::Spec->catfile( $FindBin::Bin, File::Spec->updir, $lib );
         }

Modified: rt/branches/3.8-TESTING/bin/standalone_httpd.in
==============================================================================
--- rt/branches/3.8-TESTING/bin/standalone_httpd.in	(original)
+++ rt/branches/3.8-TESTING/bin/standalone_httpd.in	Wed Apr 30 04:45:58 2008
@@ -56,6 +56,7 @@
     for my $lib (@libs) {
         unless ( File::Spec->file_name_is_absolute($lib) ) {
             require FindBin;
+            no warnings "once";
             $lib =
               File::Spec->catfile( $FindBin::Bin, File::Spec->updir, $lib );
         }

Modified: rt/branches/3.8-TESTING/bin/webmux.pl.in
==============================================================================
--- rt/branches/3.8-TESTING/bin/webmux.pl.in	(original)
+++ rt/branches/3.8-TESTING/bin/webmux.pl.in	Wed Apr 30 04:45:58 2008
@@ -71,6 +71,7 @@
     for my $lib (@libs) {
         unless ( File::Spec->file_name_is_absolute($lib) ) {
             require FindBin;
+            no warnings "once";
             $lib =
               File::Spec->catfile( $FindBin::Bin, File::Spec->updir, $lib );
         }

Modified: rt/branches/3.8-TESTING/sbin/rt-clean-sessions.in
==============================================================================
--- rt/branches/3.8-TESTING/sbin/rt-clean-sessions.in	(original)
+++ rt/branches/3.8-TESTING/sbin/rt-clean-sessions.in	Wed Apr 30 04:45:58 2008
@@ -56,6 +56,7 @@
     for my $lib (@libs) {
         unless ( File::Spec->file_name_is_absolute($lib) ) {
             require FindBin;
+            no warnings "once";
             $lib =
               File::Spec->catfile( $FindBin::Bin, File::Spec->updir, $lib );
         }

Modified: rt/branches/3.8-TESTING/sbin/rt-dump-database.in
==============================================================================
--- rt/branches/3.8-TESTING/sbin/rt-dump-database.in	(original)
+++ rt/branches/3.8-TESTING/sbin/rt-dump-database.in	Wed Apr 30 04:45:58 2008
@@ -55,6 +55,7 @@
     for my $lib (@libs) {
         unless ( File::Spec->file_name_is_absolute($lib) ) {
             require FindBin;
+            no warnings "once";
             $lib =
               File::Spec->catfile( $FindBin::Bin, File::Spec->updir, $lib );
         }

Modified: rt/branches/3.8-TESTING/sbin/rt-notify-group-admin.in
==============================================================================
--- rt/branches/3.8-TESTING/sbin/rt-notify-group-admin.in	(original)
+++ rt/branches/3.8-TESTING/sbin/rt-notify-group-admin.in	Wed Apr 30 04:45:58 2008
@@ -93,6 +93,7 @@
     for my $lib (@libs) {
         unless ( File::Spec->file_name_is_absolute($lib) ) {
             require FindBin;
+            no warnings "once";
             $lib =
               File::Spec->catfile( $FindBin::Bin, File::Spec->updir, $lib );
         }

Modified: rt/branches/3.8-TESTING/sbin/rt-setup-database.in
==============================================================================
--- rt/branches/3.8-TESTING/sbin/rt-setup-database.in	(original)
+++ rt/branches/3.8-TESTING/sbin/rt-setup-database.in	Wed Apr 30 04:45:58 2008
@@ -58,6 +58,7 @@
     for my $lib (@libs) {
         unless ( File::Spec->file_name_is_absolute($lib) ) {
             require FindBin;
+            no warnings "once";
             $lib =
               File::Spec->catfile( $FindBin::Bin, File::Spec->updir, $lib );
         }

Modified: rt/branches/3.8-TESTING/sbin/rt-shredder.in
==============================================================================
--- rt/branches/3.8-TESTING/sbin/rt-shredder.in	(original)
+++ rt/branches/3.8-TESTING/sbin/rt-shredder.in	Wed Apr 30 04:45:58 2008
@@ -117,6 +117,7 @@
     for my $lib (@libs) {
         unless ( File::Spec->file_name_is_absolute($lib) ) {
             require FindBin;
+            no warnings "once";
             $lib =
               File::Spec->catfile( $FindBin::Bin, File::Spec->updir, $lib );
         }

Modified: rt/branches/3.8-TESTING/sbin/rt-validator.in
==============================================================================
--- rt/branches/3.8-TESTING/sbin/rt-validator.in	(original)
+++ rt/branches/3.8-TESTING/sbin/rt-validator.in	Wed Apr 30 04:45:58 2008
@@ -79,6 +79,7 @@
     for my $lib (@libs) {
         unless ( File::Spec->file_name_is_absolute($lib) ) {
             require FindBin;
+            no warnings "once";
             $lib =
               File::Spec->catfile( $FindBin::Bin, File::Spec->updir, $lib );
         }