Permalink
Browse files

fix uuv warnings

  • Loading branch information...
1 parent 0d0a00c commit d1fa76ea37379f3c8855d409ec08bc370fdea5de @miyagawa committed Feb 11, 2010
Showing with 1 addition and 1 deletion.
  1. +1 −1 lib/AnyEvent/Server/PSGI/Twiggy.pm
View
2 lib/AnyEvent/Server/PSGI/Twiggy.pm
@@ -43,7 +43,7 @@ sub new {
sub register_service {
my($self, $app) = @_;
- my @listen = @{$self->{listen} || [ "$self->{host}:$self->{port}" ]};
+ my @listen = @{$self->{listen} || [ ($self->{host} || '') . ":$self->{port}" ]};
for my $listen (@listen) {
push @{$self->{listen_guards}}, $self->_create_tcp_server($listen, $app);
}

0 comments on commit d1fa76e

Please sign in to comment.