Changeset 808 for branches

Show
Ignore:
Timestamp:
12/03/08 12:46:43 (12 months ago)
Author:
hachi
Message:

Use duck typing to see if we have a reverse proxy

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • branches/reproxy-close-crash/lib/Perlbal/BackendHTTP.pm

    r772 r808  
    197197    # tell our client that we're gone 
    198198    if (my $client = $self->{client}) { 
    199         $client->backend(undef); 
     199        if ($client->can('backend')) { 
     200            $client->backend(undef); 
     201        } else { 
     202            Perlbal::log('crit', "Unknown reverse proxy glitch, our client isn't a reverse proxy?"); 
     203        } 
    200204        $self->{client} = undef; 
    201205    }