X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=lib%2FRexec.pm;h=8d6a9a347ed3af222d87aa4d32d055560cc0e041;hb=f9eb851972c8acd9d3dfccc1c02104ac96f44b00;hp=71fdd224da40d6b0ac488004ee8add2d5d4b4c97;hpb=4accf346e37b757479d5f1537e71996f5d96a061;p=clearscm.git

diff --git a/lib/Rexec.pm b/lib/Rexec.pm
index 71fdd22..8d6a9a3 100644
--- a/lib/Rexec.pm
+++ b/lib/Rexec.pm
@@ -500,6 +500,10 @@ Returns:
   # Close any prior opened sessions
   $self->logoff if ($self->{handle});
 
+  # Check to see if this machines is known in DNS. If not then the chance is
+  # good that we will not be able to log in
+  return unless gethostbyname $self->{host};
+    
   my $remote;
 
   if ($self->{protocol}) {