ViewFunctions.pm

package MyApp::Web::ViewFunctions;
 
use Tiffany::Text::MicroTemplate::Extended;
 
package Tiffany::Text::MicroTemplate::Extended;
 
use strict;
use warnings;
 
sub c { Amon2->context }
sub uri_with { Amon2->context->req->uri_with(@_) }
sub uri_for  { Amon2->context->uri_for(@_) }
sub mark_raw { Text::MicroTemplate::EncodedString->new($_[0]) }
 
sub nl2br {
    my $str = shift || '';
    $str =~ s{\r?\n}{<br />}g;
    mark_raw($str);
}
 
1;