Lines Matching defs:*toc*
240 $self->agent->protocols_allowed( [qw( http https ftp gopher )] );
351 # can we serve this protocol?
352 if ( !$self->is_protocol_supported( my $s = $req->uri->scheme ) )
368 # FIXME I don't know how to get the LWP::Protocol objet...
436 my $data = ""; # FIXME $protocol is undef here too
516 $self->request()->protocol() );
693 if !$self->is_protocol_supported($_);
741 sub is_protocol_supported {
744 if ( !$self->agent->is_protocol_supported($scheme) ) {
749 $scheme eq $_ && $ok++ for @{ $self->agent->protocols_allowed };
909 my ( $self, $dataref, $message, $protocol, $buffer ) = @_;
1227 =item is_protocol_supported( $scheme )
1238 $proxy->agent->protocols_allowed(
1239 [ @{ $proxy->agent->protocols_allowed }, 'myhttp' ] );