/[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 239 by dpavlin, Sun Sep 7 22:11:44 2008 UTC revision 242 by dpavlin, Wed Oct 1 20:22:22 2008 UTC
# Line 45  template 'index.html' => page { Line 45  template 'index.html' => page {
45    
46  };  };
47    
48  =head2 name_diff  =head2 errors
49    
50  =cut  =cut
51    
52  template 'name_diff' => page {  template 'errors' => page {
53    
54          title is _('Strix name differences');          title is _('Strix errors');
55    
56          render_region(          render_region(
57                  name => 'selected-instances',                  name => 'selected-instances',
58                  path => '/strix/selected-instances'                  path => '/strix/selected-instances'
59          );          );
60    
61            h2 { _('Name differences') }
62    
63          my $name_diff = A3C::SQL->new({ query => qq{          my $name_diff = A3C::SQL->new({ query => qq{
64                  select                  select
65                          instance,hreduorgurl,                          instance,hreduorgurl,
# Line 121  template 'instances' => page { Line 123  template 'instances' => page {
123                          };                          };
124                          while ( my $row = $sql->next ) {                          while ( my $row = $sql->next ) {
125                                  row {                                  row {
126                                          cell { outs_raw '<a href="' . $row->hrEduOrgUrl . '">' . $row->hrEduOrgUrl . '</a>' }                                          cell { outs_raw '<a href="http://' . $row->hrEduOrgUrl . '">' . $row->hrEduOrgUrl . '</a>' }
127                                          cell { $row->o }                                          cell { $row->o }
128                                          cell { $row->l }                                          cell { $row->l }
129                                          cell { $row->postalAddress }                                          cell { $row->postalAddress }
Legend:
Removed from v.239  
changed lines
  Added in v.242
  ViewVC Help
Powered by ViewVC 1.1.26