From 0d0eff43997034887c12d913249263932811491a Mon Sep 17 00:00:00 2001
From: "endico%mozilla.org" <>
Date: Sat, 20 May 2000 15:07:19 +0000
Subject: fix url of dtd

---
 export_bug.cgi | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

diff --git a/export_bug.cgi b/export_bug.cgi
index bc086a616..d7421c321 100755
--- a/export_bug.cgi
+++ b/export_bug.cgi
@@ -25,7 +25,7 @@ use diagnostics;
 use strict;
 use RelationSet;
 use XML::Dumper;
-#use vars %::COOKIE;
+use vars %::COOKIE;
 require "CGI.pl";
 
 #$::lockcount = 0;
@@ -277,12 +277,17 @@ sub Unlock {
 }
 
 my $xml;
+my $urlbase = Param("urlbase");
 $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 .= " exporter=\"$exporter\"";
 $xml .= " version=\"$::param{'version'}\"";
-$xml .= " urlbase=\"" . Param("urlbase") . "\"";
+$xml .= " urlbase=\"$urlbase\"";
 $xml .= " maintainer=\"" . Param("maintainer") ."\">\n";
 $xml .= "<bug>\n";
 
-- 
cgit v1.2.3-24-g4f1b