Permalink
Browse files

fix a couple of warnings from debug code

  • Loading branch information...
1 parent b1cb0c1 commit fc482ff4995795df412491cc5adb248b7397fcd6 @grantm committed Sep 21, 2012
Showing with 2 additions and 2 deletions.
  1. +2 −2 bin/bcvi
View
@@ -1179,7 +1179,7 @@ sub dispatch_request {
$self->send_response(100);
my $req = $self->collect_headers();
- $self->DEBUG("Calling host: " . $self->calling_host());
+ $self->DEBUG("Calling host: " . $self->calling_host) if $self->calling_host;
$self->validate_auth_key($req->{auth_key})
or $self->exit_response(900);
$self->DEBUG("Received command: $req->{command}");
@@ -1196,7 +1196,7 @@ sub validate_auth_key {
return 1 if $key && $key eq $self->auth_key;
my $alias = $self->calling_host();
- $self->DEBUG("Invalid Auth-Key in request from $alias");
+ $self->DEBUG("Invalid Auth-Key in request from $alias") if $key;
return;
}

0 comments on commit fc482ff

Please sign in to comment.