diff options
author | endico%mozilla.org <> | 2000-06-24 08:52:32 +0200 |
---|---|---|
committer | endico%mozilla.org <> | 2000-06-24 08:52:32 +0200 |
commit | 3346ad4502d5eb84714414a7ead209f899e8d488 (patch) | |
tree | 614217ce6a8b06669d24ebfcde50b5adaf720bca | |
parent | 93065508a87470c0bb4ba98c235659092e1766fe (diff) | |
download | bugzilla-3346ad4502d5eb84714414a7ead209f899e8d488.tar.gz bugzilla-3346ad4502d5eb84714414a7ead209f899e8d488.tar.xz |
move new path code to beginning
-rwxr-xr-x | importxml.pl | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/importxml.pl b/importxml.pl index 4310c69f8..7793d3e69 100755 --- a/importxml.pl +++ b/importxml.pl @@ -27,13 +27,6 @@ use diagnostics; use strict; -use XML::Parser; -use Data::Dumper; -$Data::Dumper::Useqq = 1; - -require "CGI.pl"; -require "globals.pl"; -$::lockcount = 0; # figure out which path this script lives in. Set the current path to # this and add it to @INC so this will work when run as part of mail @@ -43,6 +36,14 @@ $path =~ s#(.*)/[^/]+#$1#; chdir $path; use lib ($path); +use XML::Parser; +use Data::Dumper; +$Data::Dumper::Useqq = 1; + +require "CGI.pl"; +require "globals.pl"; +$::lockcount = 0; + GetVersionTable(); ConnectToDatabase(); @@ -563,7 +564,6 @@ for (my $k=1 ; $k <= $bugqty ; $k++) { } } -$log .= "\n\n my $subject = "$bugqty bug(s) successfully moved from $urlbase to " . Param("urlbase") ; my @to = ($exporter); |