fixed utf-8 encoding prob

git-svn-id: http://yolanda.mister-muffin.de/svn@141 7eef14d0-6ed0-489d-bf55-20463b2d70db

trunk/download.pl

@@ -81,7 +81,7 @@ if($query->param('id'))
 		$page->{'message'}->{'text'} = "error_202c";
 	
 		#print xml http header along with session cookie
-		print $session->header(-type=>'text/xml');
+		print $session->header(-type=>'text/xml', -charset=>'UTF-8');
 
 		#print xml
 		print XMLout($page, KeyAttr => {}, XMLDecl => $XMLDecl, RootName => 'page');
@@ -106,7 +106,7 @@ else
 	$page->{'message'}->{'text'} = "error_202c";
 	
 	#print xml http header along with session cookie
-	print $session->header(-type=>'text/xml');
+	print $session->header(-type=>'text/xml', -charset=>'UTF-8');
 
 	#print xml
 	print XMLout($page, KeyAttr => {}, XMLDecl => $XMLDecl, RootName => 'page');

trunk/index.pl

@@ -31,7 +31,7 @@ elsif($query->param('error'))
 fill_tagcloud;
 
 #print xml http header along with session cookie
-print $session->header(-type=>'text/xml');
+print $session->header(-type=>'text/xml', -charset=>'UTF-8');
 
 #print xml
 print XMLout($page, KeyAttr => {}, XMLDecl => $XMLDecl, RootName => 'page');

trunk/login.pl

@@ -146,7 +146,7 @@ else
 	$page->{loginform} = [''];
 
 	#print xml http header along with session cookie
-	print $session->header(-type=>'text/xml');
+	print $session->header(-type=>'text/xml', -charset=>'UTF-8');
 
 	print XMLout($page, KeyAttr => {}, XMLDecl => $XMLDecl, RootName => 'page');
 }

trunk/register.pl

@@ -37,7 +37,7 @@ else
 	$page->{registerform} = [''];
 
 	#print xml http header along with session cookie
-	print $session->header(-type=>'text/xml');
+	print $session->header(-type=>'text/xml', -charset=>'UTF-8');
 
 	print XMLout($page, KeyAttr => {}, XMLDecl => $XMLDecl, RootName => 'page');
 }

trunk/search.pl

@@ -145,7 +145,7 @@ if($query->param('query') or $query->param('orderby'))
 	$dbh->disconnect() or die $dbh->errstr;
 	
 	#print xml http header along with session cookie
-	print $session->header(-type=>'text/xml');
+	print $session->header(-type=>'text/xml', -charset=>'UTF-8');
 
 	#print xml
 	print XMLout($page, KeyAttr => {}, XMLDecl => $XMLDecl, RootName => 'page');
@@ -157,7 +157,7 @@ else
 	$page->{'message'}->{'text'} = "error_202c";
 	
 	#print xml http header along with session cookie
-	print $session->header(-type=>'text/xml');
+	print $session->header(-type=>'text/xml', -charset=>'UTF-8');
 
 	#print xml
 	print XMLout($page, KeyAttr => {}, XMLDecl => $XMLDecl, RootName => 'page');

trunk/upload.pl

@@ -22,7 +22,7 @@ if($username)
 	$page->{uploadform} = {'page' => '2'};
 
 	#print xml http header along with session cookie
-	print $session->header(-type=>'text/xml');
+	print $session->header(-type=>'text/xml', -charset=>'UTF-8');
 
 	print XMLout($page, KeyAttr => {}, XMLDecl => $XMLDecl, RootName => 'page');
 }
@@ -41,7 +41,7 @@ else
 	$page->{'message'}->{'text'} = "error_202c";
 	
 	#print xml http header along with session cookie
-	print $session->header(-type=>'text/xml');
+	print $session->header(-type=>'text/xml', -charset=>'UTF-8');
 
 	#print xml
 	print XMLout($page, KeyAttr => {}, XMLDecl => $XMLDecl, RootName => 'page');

trunk/uploader.pl

@@ -72,7 +72,7 @@ else
 	$page->{'message'}->{'text'} = "error_202c";
 	
 	#print xml http header along with session cookie
-	print $session->header(-type=>'text/xml');
+	print $session->header(-type=>'text/xml', -charset=>'UTF-8');
 
 	#print xml
 	print XMLout($page, KeyAttr => {}, XMLDecl => $XMLDecl, RootName => 'page');

trunk/video.pl

@@ -211,7 +211,7 @@ if($query->url_param('title') or $query->url_param('id'))
 	$dbh->disconnect() or die $dbh->errstr;
 	
 	#print xml http header along with session cookie
-	print $session->header(-type=>'text/xml');
+	print $session->header(-type=>'text/xml', -charset=>'UTF-8');
 
 	#print xml
 	print XMLout($page, KeyAttr => {}, XMLDecl => $XMLDecl, RootName => 'page', AttrIndent => 1);
@@ -232,7 +232,7 @@ else
 	$page->{'message'}->{'text'} = "error_202c";
 	
 	#print xml http header along with session cookie
-	print $session->header(-type=>'text/xml');
+	print $session->header(-type=>'text/xml', -charset=>'UTF-8');
 
 	#print xml
 	print XMLout($page, KeyAttr => {}, XMLDecl => $XMLDecl, RootName => 'page');

trunk/xsl/xhtml.xsl

@@ -1,4 +1,4 @@
-<?xml version="1.0" encoding="utf8" ?>
+<?xml version="1.0" encoding="UTF-8" ?>
 <xsl:stylesheet version="1.0"
 	xmlns="http://www.w3.org/1999/xhtml"
 	xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
@@ -10,7 +10,7 @@
 <xsl:output
 	doctype-public="-//W3C//DTD XHTML 1.1//EN"
 	doctype-system="http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd"
-	encoding="utf8"
+	encoding="UTF-8"
 	indent="yes"
 	method="xml"
 	media-type="application/xhtml+xml"
@@ -807,6 +807,24 @@
 			</tr>
 		</xsl:for-each>
 	</table>
+	
+	<div class="commentform">
+		<form method="post">
+			<xsl:attribute name="action">
+				<xsl:value-of select="/page/video/rdf:RDF/cc:Work/dc:identifier" />
+			</xsl:attribute>
+			<fieldset>
+				<br />
+				<textarea name="comment" cols="30" rows="3" />
+				<br />
+				<input type="submit" name="send">
+					<xsl:attribute name="value">
+						<xsl:value-of select="$locale_strings[@id='comment_post']" />
+					</xsl:attribute>
+				</input>
+			</fieldset>
+		</form>
+	</div>
 
 </xsl:template>
 
@@ -831,26 +849,6 @@
 		</xsl:for-each>
 	</div>
 
-	<div class="commentform">
-		<form method="post">
-			<xsl:attribute name="action">
-<!--
-			a bit of action, please
--->
-			</xsl:attribute>
-			<fieldset>
-				<br />
-				<textarea name="comment" cols="30" rows="3" />
-				<br />
-				<input type="submit" name="send">
-					<xsl:attribute name="value">
-						<xsl:value-of select="$locale_strings[@id='comment_post']" />
-					</xsl:attribute>
-				</input>
-			</fieldset>
-		</form>
-	</div>
-
 </xsl:template>
 
 <xsl:template match="registerform">