/[webpac]/trunk2/all2all.pl
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/all2all.pl

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

revision 432 by dpavlin, Sun Sep 12 20:36:33 2004 UTC revision 433 by dpavlin, Mon Sep 13 12:13:04 2004 UTC
# Line 187  print HTML qq{ Line 187  print HTML qq{
187  <div style="float: right; width: 10em; text-align: center; margin: 0.5m; background: #e0e0e0; border: 1px dashed #c0c0c0; z-index: 1;">  <div style="float: right; width: 10em; text-align: center; margin: 0.5m; background: #e0e0e0; border: 1px dashed #c0c0c0; z-index: 1;">
188  Folding:  Folding:
189  <br/>  <br/>
190  <a href="#" onClick="back_display();">&laquo;</a>&nbsp;<a href="#" onClick="apply_changed_display();">default</a>&nbsp;<a href="#" onClick="forward_display();">&raquo;</a>  <a href="#" onClick="back_display();">&laquo;</a>&nbsp;<a href="#" onClick="default_display();">default</a>&nbsp;<a href="#" onClick="forward_display();">&raquo;</a>
191  <br/>  <br/>
192  <a href="#" onClick="show_hide_display(show,hide);">reset</a>  <a href="#" onClick="show_hide_display(show,hide);">reset</a>
193  <a href="#" onClick="show_display(show); show_display(hide);">all</a>  <a href="#" onClick="show_display(show); show_display(hide);">all</a>
# Line 356  sub unroll { Line 356  sub unroll {
356                    
357                          my $have_children = $tree[$level]->{'have_children'}->($code,$v900,$start_code);                          my $have_children = $tree[$level]->{'have_children'}->($code,$v900,$start_code);
358                          if ($have_children) {                          if ($have_children) {
359                                  ($link_start,$link_end) = (qq{<a href="#mfn$mfn" onClick="return toggle_display('mfn$mfn');">},qq{</a>});                                  ($link_start,$link_end) = (qq{<a href="#mfn$mfn" onClick="return toggle_display('id$mfn');">},qq{</a>});
360                          } else {                          } else {
361                                  $log->debug("# $level doesn't have_children($code,$v900,$start_code)");                                  $log->debug("# $level doesn't have_children($code,$v900,$start_code)");
362                          }                          }
# Line 376  sub unroll { Line 376  sub unroll {
376                          my $style = $tree[$level]->{'style'};                          my $style = $tree[$level]->{'style'};
377    
378                          print HTML " " x $level .                          print HTML " " x $level .
379                                  qq{<a name="mfn$mfn"></a>\n <ul id="mfn$mfn"}.                                  qq{<a name="mfn$mfn"></a>\n <ul id="id$mfn"}.
380                                  ($style ? ' style="'.$style.'"' : '').                                  ($style ? ' style="'.$style.'"' : '').
381                                  qq{>\n};                                  qq{>\n};
382    
383                          if ($style) {                          if ($style) {
384                                  if ($style =~ m/display\s*:\s*none/i) {                                  if ($style =~ m/display\s*:\s*none/i) {
385                                          push @hide_ids, "mfn$mfn";                                          push @hide_ids, "id$mfn";
386                                  } else {                                  } else {
387                                          push @show_ids, "mfn$mfn";                                          push @show_ids, "id$mfn";
388                                  }                                  }
389                          } else {                          } else {
390                                  # default: show                                  # default: show
391                                  push @show_ids, "mfn$mfn";                                  push @show_ids, "id$mfn";
392                          }                          }
393    
394                          unroll($level+1, $tree[$level]->{'child_code'}->($code,$v900,$start_code));                          unroll($level+1, $tree[$level]->{'child_code'}->($code,$v900,$start_code));

Legend:
Removed from v.432  
changed lines
  Added in v.433

  ViewVC Help
Powered by ViewVC 1.1.26