package BookPub::RDAS::Request;

use lib '/app/tools/rdas/lib';
use base 'RDAS::Request';

use RDAS::Fetcher::Mechanize;

sub _getFetchObject {
    my $self   = shift;
    my $url    = shift || $self->url;
    my $ua     = $self->userAgent;
    my $cached = $self->cache_fetch;

    return RDAS::Fetcher::Mechanize->new(
        url         => $url,
        cached      => $cached,
        cacheExpire => 60 * 24 * 24,
        userAgent   => $ua,
    );
}

1;