Mercurial > pub > Impl
diff Lib/IMPL/Web/AutoLocator.pm @ 244:a02b110da931
refactoring
fixed binding to CGI query parameters with multiple values
author | sergey |
---|---|
date | Mon, 22 Oct 2012 04:09:27 +0400 |
parents | 5c82eec23bb6 |
children | 32aceba4ee6d |
line wrap: on
line diff
--- a/Lib/IMPL/Web/AutoLocator.pm Fri Oct 19 02:23:15 2012 +0400 +++ b/Lib/IMPL/Web/AutoLocator.pm Mon Oct 22 04:09:27 2012 +0400 @@ -1,8 +1,11 @@ package IMPL::Web::AutoLocator; use strict; +use overload '""' => 'toString'; + use IMPL::Const qw(:prop); -use IMPL::lang qw( :hash ); +use IMPL::lang qw(:hash); +use IMPL::clone qw(clone); use URI; use URI::Escape; use IMPL::declare { @@ -23,6 +26,12 @@ ] }; +sub Clone { + my $this = shift; + + return clone($this); +} + sub Child { my $this = shift; my $child = shift or die ArgumentException->new("a child resource identifier is required"); @@ -64,6 +73,10 @@ return $url; } +sub toString { + shift->url->as_string(); +} + sub AUTOLOAD { our $AUTOLOAD;