diff options
Diffstat (limited to 't/MockQuery.pm')
-rw-r--r-- | t/MockQuery.pm | 34 |
1 files changed, 0 insertions, 34 deletions
diff --git a/t/MockQuery.pm b/t/MockQuery.pm deleted file mode 100644 index f01aad5ac..000000000 --- a/t/MockQuery.pm +++ /dev/null @@ -1,34 +0,0 @@ -#!/usr/bin/perl -w -# -# MockQuery.pm: -# Mock query to support tests for the Page functions -# -# Copyright (c) 2009 UK Citizens Online Democracy. All rights reserved. -# Email: louise@mysociety.org; WWW: http://www.mysociety.org/ -# -# $Id: MockQuery.pm,v 1.2 2009-09-15 13:55:17 louise Exp $ -# - - -package MockQuery; - -sub new { - my ($class, $site, $params) = @_; - my $self = { - site => $site, - params => $params, - }; - bless $self, $class; - return $self; -} - -sub header { - -} - -sub param { - my ($self, $key) = @_; - return $self->{params}->{$key}; -} - -1; |