is(@lines, 1, "once $cmd visited only one repo");
my $r = [ split /\|/, defined $lines[0] ? $lines[0] : '' ];
my $e = [ $cmd, qw/@n @g @w @b @@/ ];
is(@lines, 1, "once $cmd visited only one repo");
my $r = [ split /\|/, defined $lines[0] ? $lines[0] : '' ];
my $e = [ $cmd, qw/@n @g @w @b @@/ ];