[Catalyst] Small patch for ConfigLoader

[Len Jaffe]

>  Brian Cassidy <brian.cassidy at nald.ca> wrote:
> my $v = Data::Visitor::Callback->new(
>     plain_value => sub {
>         return unless defined $_;
>         s[__HOME__][ $c->path_to( '' ) ]e;
>         s[__path_to\((.+)\)__][ $c->path_to( split(
> '/', $1 ) ) ]e;
>     }
> );

And people say perl is hard to read :-)

Leonard A. Jaffe     lenjaffe at jaffesystems.com
Leonard Jaffe Computer Systems Consulting Ltd.
Columbus, OH, USA 614-404-4214 F: 530-380-7423