--- a/tests/test_scc.pl	Mon May 19 04:34:28 2014 +0400
+++ b/tests/test_scc.pl	Mon May 19 18:34:16 2014 +0400
@@ -15,10 +15,16 @@
 	\%config::hgSettings
 );
 
-foreach my $info (@{$repo->Income() || []}) {
-	print "$info->{number} : $info->{hash}\n";
-}
+$repo->name('ImplabNet');
+$repo->SaveConfig();
+
+print "repo: ", $repo->hgrc->val('paths','default')," name: " ,$repo->name, "\n";
 
 $repo->Pull('-u', '-r' => 20);
 
+print "LISTING\n";
+print "repo: ",$_->path, " " , $_->hgrc->val('paths','default','local'), "\n"
+	foreach @{HG->ListRepos('/tmp')};
+
+
 print "done\n";
\ No newline at end of file