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

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

revision 32 by dpavlin, Fri Dec 14 13:54:02 2007 UTC revision 34 by dpavlin, Fri Dec 14 14:39:05 2007 UTC
# Line 106  template '/units' => page { Line 106  template '/units' => page {
106    
107  };  };
108    
109  private template '/toggle_edit' => sub {  template 'toggle_edit' => sub {
110          my $self = shift;          my $self = shift;
111    
112          # no fun for anonymous users          my $toggleedit = new_action(
113          return unless $self->current_user->id;                  class => 'ToggleEdit',
114    #               moniker => 'toggle-edit',
         render_region(  
                 name => 'toggle-edit',  
                 path => '/toggle_edit_region',  
115          );          );
116    
 };  
   
 template 'toggle_edit_region' => sub {  
         my $self = shift;  
   
         my $toggleedit = new_action( class => 'ToggleEdit' );  
   
117          my $label = $self->current_user->editing ? _("Disable editing") : _("Enable editing");          my $label = $self->current_user->editing ? _("Disable editing") : _("Enable editing");
118    
119          warn "## $label\n";          warn "## $label\n";
120    
121          form {          form {
122                  hyperlink(                  outs_raw( $toggleedit->button(
123                          label => $label,                          label => $label,
124                          onclick => {                          submit => $toggleedit,
125                                  submit => $toggleedit,                  ));
                                 refresh_self => 1,  
                         },  
                 )  
126          }          }
127    
128  };  };
Legend:
Removed from v.32  
changed lines
  Added in v.34
  ViewVC Help
Powered by ViewVC 1.1.26