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

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

revision 28 by dpavlin, Mon Dec 10 14:56:12 2007 UTC revision 29 by dpavlin, Mon Dec 10 15:16:52 2007 UTC
# Line 65  template 'view' => sub :CRUDView { Line 65  template 'view' => sub :CRUDView {
65    
66          form {          form {
67                  if ( $record->current_user_can('delete') && $self->current_user->editing ) {                  if ( $record->current_user_can('delete') && $self->current_user->editing ) {
68                          hyperlink(                          outs_raw( $delete->button(
69                                  label   => _("Delete picture"),                                  label   => _("Delete picture"),
70                                  class   => "float-crud-button button-delete",                                  class   => "float-crud-button button-delete",
71                                  onclick => {                                  onclick => {
# Line 75  template 'view' => sub :CRUDView { Line 75  template 'view' => sub :CRUDView {
75                                          refresh_self => 1,                                          refresh_self => 1,
76                                          args => { id => $id },                                          args => { id => $id },
77                                  },                                  },
78                                  as_button => 1,                          ));
                         );  
79                  };                  };
80                  img { attr { src => "/static/pics/" . $record->picture->filename } }                  img { attr { src => "/static/pics/" . $record->picture->filename } }
81                  tt{ $record->picture->filename }                  tt{ $record->picture->filename }
Legend:
Removed from v.28  
changed lines
  Added in v.29
  ViewVC Help
Powered by ViewVC 1.1.26