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

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

revision 652 by dpavlin, Fri Nov 28 23:22:22 2008 UTC revision 653 by dpavlin, Sun Nov 30 23:49:32 2008 UTC
# Line 25  sub as_markup { Line 25  sub as_markup {
25    
26          $usage ||= $self->session_dump( $self->usage );          $usage ||= $self->session_dump( $self->usage );
27          #warn "# usage ",dump( $usage );          #warn "# usage ",dump( $usage );
28    
29            if ( ! $self->can('icon_path') ) {
30                    $self->TODO( "re-apply Frey::Web on $self" );
31                    Frey::Web->meta->apply( $self );
32            }
33    
34          foreach my $class ( $self->classes ) {          foreach my $class ( $self->classes ) {
35    
36                  my $icon = '';                  my $icon = $self->icon_path( $class );
                 if ( ! $self->can('icon_path') ) {  
                         $self->TODO( "re-apply Frey::Web on $self" );  
                         Frey::Web->meta->apply( $self );  
                 }  
                 $icon = $self->icon_path( $class );  
37                  if ($icon) {                  if ($icon) {
38                          push @icons, $icon;                          push @icons, $icon;
39                          $icon = qq|<!-- icon:$icon -->|;                          $icon = qq|<!-- icon:$icon -->|;
Legend:
Removed from v.652  
changed lines
  Added in v.653
  ViewVC Help
Powered by ViewVC 1.1.26