/[Frey]/trunk/lib/Frey/Dumper.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 /trunk/lib/Frey/Dumper.pm

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

revision 366 by dpavlin, Sun Nov 16 16:44:20 2008 UTC revision 367 by dpavlin, Mon Nov 17 11:58:41 2008 UTC
# Line 28  sub unroll { Line 28  sub unroll {
28    
29          $out .= qq|<li${title}>|;          $out .= qq|<li${title}>|;
30          my $mark = $key || '&diams;';          my $mark = $key || '&diams;';
31          $out .= $ref && $ref !~ m{^(ARRAY|HASH)$} ? qq|<a href="/$ref" class="blessed" target="blessed" title="$ref">$mark</a>| : $key;          $out .= $ref && $ref !~ m{^(ARRAY|HASH)$} ? qq|<a href="/$ref" class="blessed" target="blessed" title="$ref">$mark</a>| : ( $key || '' );
32    
33          if ( ref($data) eq 'ARRAY' ) {          if ( ref($data) eq 'ARRAY' ) {
34                  $out .= " &darr;</li>" if $key;                  $out .= " &darr;</li>" if $key;
Legend:
Removed from v.366  
changed lines
  Added in v.367
  ViewVC Help
Powered by ViewVC 1.1.26