Fix Git->remote($arg) so it won't error if the remote does not exist.

Author: schwern

lib/Gitpan/Git.pm

@@ -193,6 +193,7 @@ method remotes() {
 
 method remote( Str $name, Str $action = "push" ) {
     my $remote = $self->remotes->{$name};
+    return unless $remote;
     return $action eq "push" ? $remote->pushurl || $remote->url : $remote->url;
 }
 

t/Git.t

@@ -103,6 +103,9 @@ note "Remotes"; {
     );
 
     is_deeply $git->remotes, {};
+
+    ok !$git->remote("foo");
+
     $git->change_remote( foo => "http://example.com" );
 
     is $git->remote( "foo" ),         "http://example.com";