package Sources::CGI;

use strict;
use warnings;

use CGI;
use vars qw(@ISA);

@ISA = qw( CGI );

sub getparam
{
    my ($self, $what) = @_;

    return $self->url_param($what) || $self->param($what);
}

1;