/[webpac]/trunk2/lib/WebPAC/Tree.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk2/lib/WebPAC/Tree.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 580 by dpavlin, Mon Nov 1 22:52:44 2004 UTC revision 581 by dpavlin, Mon Nov 1 23:38:53 2004 UTC
# Line 399  sub unroll { Line 399  sub unroll {
399                                  $html .= " " x $level . qq{<span id="w$mfn" style="display: none;">Učitavanje podataka...</span>\n};                                  $html .= " " x $level . qq{<span id="w$mfn" style="display: none;">Učitavanje podataka...</span>\n};
400    
401                                  $html .= " " x $level .                                  $html .= " " x $level .
402                                  qq{<iframe id="i$mfn" name="i$mfn" width="100%" height="0" marginwidth="0" marginheight="0" frameborder="1" border="0" onLoad="iframe_resize(this.name);"></iframe>\n};                                  qq{<iframe id="i$mfn" name="i$mfn" width="100%" height="0" marginwidth="0" marginheight="0" frameborder="0" border="0" onLoad="iframe_resize(this.name);"></iframe>\n};
403                                  @{$self->{'iframe_mfn'}->{$mfn}} = @{$self->{'mfn_arr'}};                                  @{$self->{'iframe_mfn'}->{$mfn}} = @{$self->{'mfn_arr'}};
404    
405                          } else {                          } else {
# Line 441  sub generate_js { Line 441  sub generate_js {
441          print JS "var show = ['",join("','",@{$self->{'show_ids'}}),"'];\n";          print JS "var show = ['",join("','",@{$self->{'show_ids'}}),"'];\n";
442          print JS "var hide = ['",join("','",@{$self->{'hide_ids'}}),"'];\n";          print JS "var hide = ['",join("','",@{$self->{'hide_ids'}}),"'];\n";
443    
444          print JS "var mfn_iframe = [\n";          my @mfn_iframe;
445    
446          foreach my $if (keys %{$self->{'iframe_mfn'}}) {          foreach my $if (keys %{$self->{'iframe_mfn'}}) {
447  #               print JS " ",join(",",map { "[$_:$if]" } @{$self->{'iframe_mfn'}->{$if}}),",\n";                  push @mfn_iframe, join(",", map { "$_:$if" } @{$self->{'iframe_mfn'}->{$if}});
448          }          }
449          print JS " null\n]\n";          
450            print JS "var mfn_iframe = {\n",join(",\n",@mfn_iframe),"\n};\n";
451    
452          close(JS);          close(JS);
453    

Legend:
Removed from v.580  
changed lines
  Added in v.581

  ViewVC Help
Powered by ViewVC 1.1.26