Explode loudly if the user is dumb

clintongormley · Sep 28, 2010 · db4c9d5 · db4c9d5
1 parent ec13602
commit db4c9d5
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/lib/AnyEvent/RabbitMQ.pm b/lib/AnyEvent/RabbitMQ.pm
@@ -4,6 +4,7 @@ use strict;
 use warnings;
 
 use Data::Dumper;
+use Carp qw/ confess /;
 use List::MoreUtils qw(none);
 
 use AnyEvent::Handle;
@@ -58,6 +59,10 @@ sub connect {
     $args{on_read_failure} ||= sub {warn @_, "\n"};
     $args{timeout}         ||= 0;
 
+    for (qw/ host port /) {
+        confess("No $_ passed to connect to") unless $args{$_};
+    }
+
     if ($self->{verbose}) {
         warn 'connect to ', $args{host}, ':', $args{port}, '...', "\n";
     }