Bommels05/Mozilla
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

find the path this script lives in and add it to @INC and to the current working directory.

Browse Source 
git-svn-id: svn://10.0.0.236/trunk@73103 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
endico%mozilla.org
2000-06-23 22:43:21 +00:00
parent 0714929f7c
commit 7959e0c5a2
1 changed files with 10 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
mozilla/webtools/bugzilla/importxml.pl
View File

@@ -35,9 +35,18 @@ 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
# alias by the mailer daemon
my $path = $0;
$path =~ s#(.*)/[^/]+#$1#;
chdir $path;
use lib ($path);
GetVersionTable();
ConnectToDatabase();
sub sillyness {
my $zz;
$zz = %::components;
@@ -182,7 +191,7 @@ if (defined $tree->[1][0]->{'urlbase'}) {
my $bugqty = ($#{@{$tree}->[1]} +1 -3) / 4;
my $log = "Importing $bugqty bug(s) from $urlbase,\n sent by $exporter.\n";
my $log = "Imported $bugqty bug(s) from $urlbase,\n sent by $exporter.\n";
for (my $k=1 ; $k <= $bugqty ; $k++) {
my $cur = $k*4;