comparison Lib/IMPL/Exception.pm @ 206:c8fe3f84feba

+IMPL::Web::Handlers::ViewSelector +IMPL::Web::Handlers::ErrorHandler *IMPL::Web::Handlers::RestController moved types mappings to ViewSelector
author sergey
date Thu, 03 May 2012 16:48:39 +0400
parents 6b1dda998839
children 6d8092d8ce1b
comparison
equal deleted inserted replaced
205:891c04080658 206:c8fe3f84feba
18 18
19 sub indent { 19 sub indent {
20 my ($str,$level) = @_; 20 my ($str,$level) = @_;
21 $level ||= 0; 21 $level ||= 0;
22 $str = '' unless defined $str; 22 $str = '' unless defined $str;
23 join ("\n", map( "\t"x$level.$_ , split(/\n/,$str) ) ); 23 join ("\n", map( " "x$level.$_ , split(/\n/,$str) ) );
24 } 24 }
25 25
26 sub new { 26 sub new {
27 my $class = shift; 27 my $class = shift;
28 $class = ref $class || $class; 28 $class = ref $class || $class;