/[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 4 by dpavlin, Sun Jun 3 22:49:47 2007 UTC revision 8 by dpavlin, Tue Jun 5 11:32:42 2007 UTC
# Line 13  template '/' => page { Line 13  template '/' => page {
13  private template 'code_editor' => sub {  private template 'code_editor' => sub {
14          form {          form {
15                  my $action = new_action( class => 'CreateCode' );                  my $action = new_action( class => 'CreateCode' );
16                  render_param( $action => 'source', cols => 80, rows => 25 );                  render_param( $action => 'source', cols => 80, rows => 25, language => 'perl', render_as => 'Jifty::Plugin::CodePress::Textarea' );
17                  #render_action( $action => [ 'source' => { cols => 80, rows => 30 }, ] );                  #render_action( $action => [ 'source' => { cols => 80, rows => 30 }, ] );
18                  form_submit(                  form_submit(
19                          label => _("Save my code"),                          label => _("Save my code"),
# Line 23  private template 'code_editor' => sub { Line 23  private template 'code_editor' => sub {
23                  );                  );
24          }          }
25  };  };
26    
27    template '/upload' => page {
28            h1 { _("Upload new file") },
29            form {
30                    my $action = new_action( class => 'Upload' );
31                    render_action( $action => [ 'file', 'content' ] );
32                    form_submit(
33                            label => _('Upload'),
34                    );
35            }
36    };
37    
38  1;  1;
Legend:
Removed from v.4  
changed lines
  Added in v.8
  ViewVC Help
Powered by ViewVC 1.1.26