From a034cc76e98af000f3835abef6ce336f58d01eb7 Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Thu, 31 Jan 2008 11:51:41 +0000
Subject: [PATCH] =?utf8?q?Beim=20Erstellen=20des=20XUL/XML-Men=C3=BCs=20di?=
 =?utf8?q?e=20HTTP-Antwort=20von=20$form->create=5Fhttp=5Fresponse()=20erz?=
 =?utf8?q?eugen=20lassen,=20weil=20diese=20die=20n=C3=B6tigen=20Session-Co?=
 =?utf8?q?okies=20setzt.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 bin/mozilla/menuXML.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/bin/mozilla/menuXML.pl b/bin/mozilla/menuXML.pl
index 3aa32f2f8..f36cb4b1c 100644
--- a/bin/mozilla/menuXML.pl
+++ b/bin/mozilla/menuXML.pl
@@ -46,7 +46,8 @@ use Encode;
 # end of main
 
 sub display {
-  print "Content-type: text/xml; charset=iso-8859-1\n\n";
+  print $form->create_http_response('content_type' => 'text/xml',
+                                    'charset'      => 'iso-8859-1');
   print qq|<?xml version="1.0" encoding="iso-8859-1"?>\n|;
   print qq|<?xml-stylesheet href="xslt/xulmenu.xsl" type="text/xsl"?>\n|;
   print qq|<!DOCTYPE doc [
-- 
2.20.1