[catagits/Catalyst-Runtime.git] / t / lib / TestApp2.pm

package TestApp2;
use strict;
use warnings;
use base qw/Catalyst/;
use Catalyst qw/Params::Nested/;

__PACKAGE__->config(
  encoding => 'UTF-8'
);

__PACKAGE__->config('name' => 'TestApp2');

__PACKAGE__->setup;

sub handle_unicode_encoding_exception {
  my ( $self, $param_value, $error_msg ) = @_;
  return $param_value;
}

1;
Commit	Line	Data
55046410	1	package TestApp2;
	2	use strict;
	3	use warnings;
	4	use base qw/Catalyst/;
	5	use Catalyst qw/Params::Nested/;
	6
	7	__PACKAGE__->config(
1bef5f59	8	encoding => 'UTF-8'
1bef5f59	9	);
55046410	10
	11	__PACKAGE__->config('name' => 'TestApp2');
	12
	13	__PACKAGE__->setup;
	14
	15	sub handle_unicode_encoding_exception {
	16	my ( $self, $param_value, $error_msg ) = @_;
	17	return $param_value;
	18	}
	19
	20	1;