oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

removing files no longer being distributed with WebGUI

Browse source
This commit is contained in:
JT Smith 2005-03-28 23:41:14 +00:00
parent e2dc0e7b2c
commit 56a8e6ea44
70 changed files with 0 additions and 45620 deletions
Download patch file Download diff file Expand all files Collapse all files

30
lib/DBIx/FullTextSearch/URL.pm
View file

@ -1,30 +0,0 @@
package DBIx::FullTextSearch::URL;
use DBIx::FullTextSearch::String;
use strict;
use vars qw! @ISA !;
@ISA = qw! DBIx::FullTextSearch::String !;
use LWP::UserAgent;
sub index_document {
my ($self, $uri, $extra_data) = @_;
my $ua = ( defined $self->{'user_agent'}
? $self->{'user_agent'}
: $self->{'user_agent'} = new LWP::UserAgent );
my $request = new HTTP::Request('GET', $uri);
my $response = $ua->simple_request($request);
if ($response->is_success) {
my $data = $response->content;
$data .= " $extra_data" if $extra_data;
return $self->SUPER::index_document($uri, $data);
}
else {
$self->{'errstr'} = $response->message;
}
return;
}
1;