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

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

revision 70 by dpavlin, Tue Apr 1 19:44:31 2008 UTC revision 71 by dpavlin, Thu Apr 10 21:33:37 2008 UTC
# Line 9  use A3C::LDAP; Line 9  use A3C::LDAP;
9  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
10    
11    
12  template '/skole' => page {  template 'ldap' => page {
13          h1 { _('Schools in system') };          h1 { _('LDAP data about Schools in system') };
         show 'skole_sve';  
 };  
   
 private template 'skole_sve' => sub {  
14          my $ldap = A3C::LDAP->new;          my $ldap = A3C::LDAP->new;
15          div {          div {
16                  $ldap->search(                  $ldap->search(
# Line 36  private template 'skole_sve' => sub { Line 32  private template 'skole_sve' => sub {
32          }          }
33  };  };
34    
35  template '/search-users' => page {  template 'people' => page {
36            
37            h1 { _('Find people') }
38    
39          my $action = new_action(          my $action = new_action(
40                  class   => 'SearchUser',                  class   => 'SearchPerson',
41                  moniker => 'search-users'                  moniker => 'search-users',
42                    sticky_on_success => 1,
43                    sticky_on_failure => 1,
44          );          );
45    
46    
47          form {          form {
48                  render_action( $action => [ 'uid_contains', 'cn_contains' ] );                  render_action( $action => [ 'uid_contains', 'cn_contains' ] );
49                  form_submit( label => _('Find someone') );                  form_submit( label => _('Find someone') );
# Line 64  template '/search-users' => page { Line 65  template '/search-users' => page {
65    
66  };  };
67    
68  template '/sync' => page {  template 'sync' => page {
69    
70            h1 { _('Sync school from LDAP') }
71    
72          my $action = new_action(          my $action = new_action(
73                  class   => 'SyncOrganization',                  class   => 'SyncOrganization',

Legend:
Removed from v.70  
changed lines
  Added in v.71

  ViewVC Help
Powered by ViewVC 1.1.26