comparison Lib/IMPL/Web/Handler/ErrorHandler.pm @ 393:69a1f1508696

minor security refactoring
author cin
date Fri, 14 Feb 2014 16:41:12 +0400
parents feeb3bc4a818
children 38cb0b80e88e
comparison
equal deleted inserted replaced
392:54b1dc9e808a 393:69a1f1508696
42 eval { 42 eval {
43 $result = $next ? $next->($action) : undef; 43 $result = $next ? $next->($action) : undef;
44 }; 44 };
45 45
46 if (my $err = $@) { 46 if (my $err = $@) {
47
48 warn "error handler: $err";
49 47
50 my $vars = { 48 my $vars = {
51 error => $err 49 error => $err
52 }; 50 };
53 51