/[A3C]/lib/A3C/View/Strix.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 /lib/A3C/View/Strix.pm

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

revision 186 by dpavlin, Mon Jun 16 22:56:14 2008 UTC revision 187 by dpavlin, Mon Jun 16 23:24:25 2008 UTC
# Line 123  sub strix { Line 123  sub strix {
123    
124  =cut  =cut
125    
126    sub strix_link {
127            my ( $url, $label ) = @_;
128            hyperlink(
129                    url => 'http://' . get('instance') . '.cms-qa.skole.hr' . $url,
130                    label => $label || $url,
131                    target => 'strix',
132            );
133    }
134    
135  template 'sitemap' => page {  template 'sitemap' => page {
136    
137          title is _('Sitemap %1', get('instance'));          title is _('Sitemap %1', get('instance'));
# Line 138  template 'sitemap' => page { Line 147  template 'sitemap' => page {
147    
148          sub full_url {          sub full_url {
149                  my $p = shift;                  my $p = shift;
150                  hyperlink(                  strix_link( $p->{url}, $p->{naziv} );
                         url => 'http://new.cms-qa.skole.hr' . $p->{url},  
                         label => $p->{naziv},  
                 );  
151                  if ( $p->{type} eq 'category' ) {                  if ( $p->{type} eq 'category' ) {
152                          outs_raw(' ');                          outs_raw(' ');
153                          hyperlink(                          hyperlink(
154                                  url => '/strix/layout?url=' . $p->{url},                                  url => '/strix/layout?url=' . $p->{url} . ';instance=' . get('instance'),
155                                  label => _('layout'),                                  label => _('layout'),
156                                  class => 'layout',                                  class => 'layout',
157                          );                          );
# Line 199  template 'layout' => page { Line 205  template 'layout' => page {
205                  path => '/strix/selected-instances'                  path => '/strix/selected-instances'
206          );          );
207    
208          hyperlink(          strix_link( $category->{url}, $category->{naziv} );
                 url => 'http://' . $category->{sitename} . '/' . $category->{url},  
                 label => $category->{naziv},  
         );  
209    
210          my $layout = strix->layout( $url );          my $layout = strix->layout( $url );
211    
Legend:
Removed from v.186  
changed lines
  Added in v.187
  ViewVC Help
Powered by ViewVC 1.1.26