--- a/_test/repo.pl	Wed Oct 23 11:49:16 2013 +0400
+++ b/_test/repo.pl	Wed Oct 23 16:24:52 2013 +0400
@@ -1,6 +1,8 @@
 #!/usr/bin/perl
 use strict;
 
+
+
 use IMPL::require {
 	Repository => 'Yours::Model::Repository',
 	Sync => 'Yours::SyncRepository',
@@ -10,23 +12,28 @@
 
 my @repos = (
 	{
+		name => 'update',
+		dir => '_data/update',
+		location => 'http://mirror.yandex.ru/opensuse/update/12.3/',
+	},
+	{
 		name => 'gnome',
-		dir => 'gnome',
+		dir => '_data/gnome',
 		location => 'http://download.opensuse.org/repositories/GNOME:/STABLE:/3.8/openSUSE_12.3/'
 	},
 	{
 		name => 'mono',
-		dir => 'mono',
+		dir => '_data/mono',
 		location => 'http://download.opensuse.org/repositories/Mono/openSUSE_12.3/'
 	},
 	{
 		name => 'nvidia',
-		dir => 'nvidia',
+		dir => '_data/nvidia',
 		location => 'ftp://download.nvidia.com/opensuse/12.3/'
 	},
 	{
 		name => 'broken',
-		dir => 'broken',
+		dir => '_data/broken',
 		location => 'http://mirror.yandex.ru/opensuse/repositories/KDE:/Extra/KDE_Release_410_openSUSE_12.3/'
 	}
 );
@@ -42,8 +49,8 @@
 			}) 
 			->Update($repo);
 	};
-	if(my $err = $@) {
-		print eval { $err->message || $err }, "\n";
+	if($@) {
+		warn $@;
 	} else {
 		print "done\n";
 	}