--- 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{\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);