--- trunk/lib/WebPAC/Output/SWISH.pm	2009/04/25 14:17:27	1160
+++ trunk/lib/WebPAC/Output/SWISH.pm	2009/04/25 14:18:06	1161
@@ -148,7 +148,7 @@
 
 	return unless (@tags);
 
-	my $xml = qq{<xml>};
+	my $xml = qq{<all>};
 
 	$xml .= "<$_>" . $self->$_ . "</$_>" foreach ( 'database', 'input' );
 
@@ -176,7 +176,7 @@
 	$data = to_json($data);
 	$xml .= qq{<data><![CDATA[$data]]></data>};
 
-	$xml .= qq{</xml>\n};
+	$xml .= qq{</all>\n};
 
 	my $len = length($xml);