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

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

revision 37 by dpavlin, Thu Jun 7 09:44:58 2007 UTC revision 40 by dpavlin, Sat Jun 9 23:18:08 2007 UTC
# Line 41  sub codepress { Line 41  sub codepress {
41          my $codepress = 1;          my $codepress = 1;
42          $codepress = current_user->user_object->codepress if ( current_user->id );          $codepress = current_user->user_object->codepress if ( current_user->id );
43          return { render_as => 'Textarea' } unless ( $codepress );          return { render_as => 'Textarea' } unless ( $codepress );
44            return { render_as => 'Jifty::Plugin::CodePress::Textarea' };
         return {  
                 render_as => 'Jifty::Plugin::CodePress::Textarea',  
                 submit => {  
                         onclick => [  
                                 { beforeclick => 'CodePress.beforeSubmit();'  },  
                         ],  
                 },  
         };  
45  }  }
46    
47  private template 'code_editor' => sub {  private template 'code_editor' => sub {
# Line 68  private template 'code_editor' => sub { Line 60  private template 'code_editor' => sub {
60                  render_param( $action => 'name' );                  render_param( $action => 'name' );
61                  render_param( $action => 'source', cols => 80, rows => 25, language => 'perl', render_as => codepress->{render_as} );                  render_param( $action => 'source', cols => 80, rows => 25, language => 'perl', render_as => codepress->{render_as} );
62                  #render_action( $action => [ 'source' => { cols => 80, rows => 30 }, ] );                  #render_action( $action => [ 'source' => { cols => 80, rows => 30 }, ] );
63                  form_submit( label => _($op), %{ codepress->{submit} } );                  form_submit( label => _($op) );
64                  # IE problem http://support.microsoft.com/kb/281197                  # IE problem http://support.microsoft.com/kb/281197
65                  form_next_page( url => '/run/code=' . $action->argument_value('id') );                  form_next_page( url => '/run/code=' . $action->argument_value('id') );
66          }          }
Legend:
Removed from v.37  
changed lines
  Added in v.40
  ViewVC Help
Powered by ViewVC 1.1.26