r8980@llin: dpavlin | 2005-11-20 00:49:22 +0100

[webpac2] / web / browse.cgi

diff --git a/web/browse.cgi b/web/browse.cgi
index 916d946..3981a86 100755 (executable)
--- a/web/browse.cgi
+++ b/web/browse.cgi
@@ -76,14 +76,14 @@ sub get_file_in_html($) {
 
 if ($q->path_info =~ m#xml#) {
 
-       my @ds = $db->load_ds($rec);
+       my $ds = $db->load_ds($rec);
 
-       if (@ds && $#ds > 0) {
+       if ($ds) {
                print qq{<response>
 <action type='html' target='div_record' errorCode='' errorMessage='' >
                }, $iconv_utf8->convert( $out->apply(
                        template => $template_file,
-                       data => \@ds,
+                       data => $ds,
                ) ), qq{
 
 </action>