/[webpac2]/Webpacus2/lib/Webpacus/View.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 /Webpacus2/lib/Webpacus/View.pm

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

revision 1092 by dpavlin, Sun Dec 23 22:07:55 2007 UTC revision 1093 by dpavlin, Tue Feb 12 23:03:11 2008 UTC
# Line 92  private template 'perlmonks' => sub { Line 92  private template 'perlmonks' => sub {
92          }          }
93  };  };
94    
 #  
 # hidra node result  
 #  
   
95  private template 'hidra' => sub {  private template 'hidra' => sub {
96          my $self = shift;          my $self = shift;
97          my $ds = shift || die "no ds?";          my $ds = shift || die "no ds?";
98    
         warn "## hidra ds == ",dump($ds);  
   
         div {  
                 { class is 'title' }  
                 hyperlink(  
                         url => $ds->display('URL'),  
                         label => $ds->display( 'TitleProper' )  
                 );  
         };  
   
99          tt { $ds->display( 'database' ) . '/' . $ds->display( 'input' ) . '/' . $ds->display( 'id' ) }          tt { $ds->display( 'database' ) . '/' . $ds->display( 'input' ) . '/' . $ds->display( 'id' ) }
100          span { { class is 'score' } $ds->display('score') }          div { _('Title'), ': ', $ds->display( 'TitleProper' ) }
101            div { _('Fond'), ': ', $ds->display( 'Fond' ) }
102    
103  };  };
104    
105    
106  1;  1;
Legend:
Removed from v.1092  
changed lines
  Added in v.1093
  ViewVC Help
Powered by ViewVC 1.1.26