--- trunk2/lib/WebPAC/Tree.pm 2004/11/01 22:52:44 580
+++ trunk2/lib/WebPAC/Tree.pm 2004/11/01 23:38:53 581
@@ -399,7 +399,7 @@
$html .= " " x $level . qq{Učitavanje podataka...\n};
$html .= " " x $level .
- qq{\n};
+ qq{\n};
@{$self->{'iframe_mfn'}->{$mfn}} = @{$self->{'mfn_arr'}};
} else {
@@ -441,11 +441,13 @@
print JS "var show = ['",join("','",@{$self->{'show_ids'}}),"'];\n";
print JS "var hide = ['",join("','",@{$self->{'hide_ids'}}),"'];\n";
- print JS "var mfn_iframe = [\n";
+ my @mfn_iframe;
+
foreach my $if (keys %{$self->{'iframe_mfn'}}) {
-# print JS " ",join(",",map { "[$_:$if]" } @{$self->{'iframe_mfn'}->{$if}}),",\n";
+ push @mfn_iframe, join(",", map { "$_:$if" } @{$self->{'iframe_mfn'}->{$if}});
}
- print JS " null\n]\n";
+
+ print JS "var mfn_iframe = {\n",join(",\n",@mfn_iframe),"\n};\n";
close(JS);