--- a/Lib/IMPL/Web/AutoLocator.pm	Tue Jun 05 07:45:21 2012 +0400
+++ b/Lib/IMPL/Web/AutoLocator.pm	Fri Jun 29 19:24:15 2012 +0400
@@ -43,7 +43,7 @@
 		$args{query} = ref $query eq 'HASH' ? hashMerge($this->query,$query) : $query;
 	}
 	
-	return __PACKAGE__->new(%args);
+	return $this->new(%args);
 }
 
 sub SetView {
@@ -93,11 +93,11 @@
 	Locator => 'IMPL::Web::Locator'
 };
 
-my $bugTracker = Locator->new("http://myhost.org/bugzilla")->view("cgi");
+my $bugTracker = Locator->new(base => "http://myhost.org/bugzilla")->SetView("cgi");
 
 my $bug = $bugTracker->show_bug({id = 1});
 
-my $wikiPages = Locator->new("http://myhost.org/wiki/bin/view");
+my $wikiPages = Locator->new(base => "http://myhost.org/wiki/bin/view");
 
 my $page = $wiki->Main->HowTo;
 
@@ -122,3 +122,6 @@
 =head2 C<AUTLOAD>
 
 Перенаправляет вызовы методов в метод C<Fetch> передавая первым параметром имя метода.
+
+=cut
+