diff options
| author | bbaetz%acm.org <> | 2003-05-05 10:15:19 +0200 |
|---|---|---|
| committer | bbaetz%acm.org <> | 2003-05-05 10:15:19 +0200 |
| commit | 9488a8906592564ec2e7601041f3ea5484cde3cc (patch) | |
| tree | b9308d1a3dcf639d1e561ede1186ff58afc01834 /importxml.pl | |
| parent | c000c0a480f2cb73f2b0b89550bbd8e496b73c9d (diff) | |
| download | bugzilla-9488a8906592564ec2e7601041f3ea5484cde3cc.tar.gz bugzilla-9488a8906592564ec2e7601041f3ea5484cde3cc.tar.xz | |
Bug 201816 - use CGI.pm for header output
r=joel, a=justdave
Diffstat (limited to 'importxml.pl')
| -rwxr-xr-x | importxml.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/importxml.pl b/importxml.pl index 40182c954..afc02faa9 100755 --- a/importxml.pl +++ b/importxml.pl @@ -59,6 +59,8 @@ BEGIN { chdir $::path; use lib ($::path); +use Bugzilla; + use XML::Parser; use Data::Dumper; $Data::Dumper::Useqq = 1; @@ -136,7 +138,7 @@ sub Lock { open(LOCKFID, ">>data/maillock") || die "Can't open data/maillock: $!"; my $val = flock(LOCKFID,2); if (!$val) { # '2' is magic 'exclusive lock' const. - print "Content-type: text/html\n\n"; + print Bugzilla->cgi->header(); print "Lock failed: $val\n"; } chmod 0666, "data/maillock"; |