lib/Perly/View.pm

package Perly::View;

use strict;
use warnings;

use Jifty::View::Declare -base;

template '/' => page {
        h1 { _("Enter your code") }
        div { show 'code_editor' }
};

private template 'code_editor' => sub {
        form {
                my $action = new_action( class => 'CreateCode' );
                render_param( $action => 'source', cols => 80, rows => 25 );
                #render_action( $action => [ 'source' => { cols => 80, rows => 30 }, ] );
                form_submit( label => _("Save my code") );
        }
};

1;
1	package Perly::View;
2
3	use strict;
4	use warnings;
5
6	use Jifty::View::Declare -base;
7
8	template '/' => page {
9	h1 { _("Enter your code") }
10	div { show 'code_editor' }
11	};
12
13	private template 'code_editor' => sub {
14	form {
15	my $action = new_action( class => 'CreateCode' );
16	render_param( $action => 'source', cols => 80, rows => 25 );
17	#render_action( $action => [ 'source' => { cols => 80, rows => 30 }, ] );
18	form_submit( label => _("Save my code") );
19	}
20	};
21
22	1;