Commit 0d0eff43 authored by endico%mozilla.org's avatar endico%mozilla.org

fix url of dtd

parent f910d39f
...@@ -25,7 +25,7 @@ use diagnostics; ...@@ -25,7 +25,7 @@ use diagnostics;
use strict; use strict;
use RelationSet; use RelationSet;
use XML::Dumper; use XML::Dumper;
#use vars %::COOKIE; use vars %::COOKIE;
require "CGI.pl"; require "CGI.pl";
#$::lockcount = 0; #$::lockcount = 0;
...@@ -277,12 +277,17 @@ sub Unlock { ...@@ -277,12 +277,17 @@ sub Unlock {
} }
my $xml; my $xml;
my $urlbase = Param("urlbase");
$xml = "<?xml version=\"1.0\" standalone=\"no\"?>\n"; $xml = "<?xml version=\"1.0\" standalone=\"no\"?>\n";
$xml .= "<!DOCTYPE bugzilla SYSTEM \"" . Param("urlbase") . "\">\n"; $xml .= "<!DOCTYPE bugzilla SYSTEM \"$urlbase";
if (! ($urlbase =~ /.+\/$/)) {
$xml .= "/";
}
$xml .= "bugzilla.dtd\">\n";
$xml .= "<bugzilla"; $xml .= "<bugzilla";
$xml .= " exporter=\"$exporter\""; $xml .= " exporter=\"$exporter\"";
$xml .= " version=\"$::param{'version'}\""; $xml .= " version=\"$::param{'version'}\"";
$xml .= " urlbase=\"" . Param("urlbase") . "\""; $xml .= " urlbase=\"$urlbase\"";
$xml .= " maintainer=\"" . Param("maintainer") ."\">\n"; $xml .= " maintainer=\"" . Param("maintainer") ."\">\n";
$xml .= "<bug>\n"; $xml .= "<bug>\n";
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment