From 9a3054ffc89f129530fdd4571ccfc2212fd00156 Mon Sep 17 00:00:00 2001
From: josch <josch@7eef14d0-6ed0-489d-bf55-20463b2d70db>
Date: Mon, 10 Mar 2008 15:44:46 +0000
Subject: [PATCH] get mime types from xsl

git-svn-id: http://yolanda.mister-muffin.de/svn@254 7eef14d0-6ed0-489d-bf55-20463b2d70db
---
 trunk/functions.pl | 39 +++++++++++++++++----------------------
 1 file changed, 17 insertions(+), 22 deletions(-)

diff --git a/trunk/functions.pl b/trunk/functions.pl
index 5a7a7ed..1b73a62 100644
--- a/trunk/functions.pl
+++ b/trunk/functions.pl
@@ -160,21 +160,19 @@ sub output_page
     $param_xslt =~ s/[^\w]//gi;
     
     if($param_xslt eq "null")
-    {        
-        $output = $parser->parse_string(
-            XMLout(
-                $page,
-                KeyAttr => {},
-                RootName => 'page',
-                AttrIndent => '1'
-            )
-        );
+    {
         return $session->header(
             -type=>'application/xml',
             -charset=>'UTF-8',
             -cookie=>@cookies
         ),
-        $output->toString;
+        $parser->parse_string(
+            XMLout(
+                    $page,
+                    KeyAttr => {},
+                    RootName => 'page'
+            )
+        )->toString;
     }
     else
     {
@@ -197,8 +195,7 @@ sub output_page
                     XMLout(
                         $page,
                         KeyAttr => {},
-                        RootName => 'page',
-                        AttrIndent => '1'
+                        RootName => 'page'
                     )
                 )
             );
@@ -206,27 +203,25 @@ sub output_page
         if($param_xslt eq "xspf")
         {
             return $session->header(
-                -type=>'application/xspf+xml',
-                -charset=>'UTF-8',
+                -type=>$stylesheet->media_type,
+                -charset=>$stylesheet->output_encoding,
                 -attachment=>$query->param('query').".xspf",
                 -cookie=>@cookies
             ),
             $output->toString;
         }
-        elsif($param_xslt eq "rss")
+        elsif($param_xslt eq "pr0n")
         {
             return $session->header(
-                -type=>'application/rss+xml',
-                -charset=>'UTF-8',
-                -cookie=>@cookies
-            ),
-            $output->toString;
+                -status=>'402 Payment required',
+                -cost=>'$9000.00',
+            )
         }
         else
         {
             return $session->header(
-                -type=>'application/xhtml+xml',
-                -charset=>'UTF-8',
+                -type=>$stylesheet->media_type,
+                -charset=>$stylesheet->output_encoding,
                 -cookie=>@cookies
             ),
             $output->toString;