diff options
author | louise <louise> | 2009-10-21 15:57:08 +0000 |
---|---|---|
committer | louise <louise> | 2009-10-21 15:57:08 +0000 |
commit | c40e253074c8ce38ae2715979effd86a22562f1a (patch) | |
tree | a98578fa7622800595ec21ce2822250c037544bb | |
parent | a437f7f497e5970f92aa3d2fe7a1f6b3a4755c8a (diff) |
Moving MockQuery to lib dir where it can be accessed by other app tests
-rwxr-xr-x | t/Cobrand.t | 4 | ||||
-rw-r--r-- | t/MockQuery.pm | 34 |
2 files changed, 2 insertions, 36 deletions
diff --git a/t/Cobrand.t b/t/Cobrand.t index 1db4de024..b5559381c 100755 --- a/t/Cobrand.t +++ b/t/Cobrand.t @@ -6,7 +6,7 @@ # Copyright (c) 2009 UK Citizens Online Democracy. All rights reserved. # Email: louise@mysociety.org; WWW: http://www.mysociety.org/ # -# $Id: Cobrand.t,v 1.21 2009-10-21 15:03:32 louise Exp $ +# $Id: Cobrand.t,v 1.22 2009-10-21 15:58:25 louise Exp $ # use strict; @@ -20,7 +20,7 @@ use lib "$FindBin::Bin/../perllib"; use lib "$FindBin::Bin/../../perllib"; use Cobrand; -use MockQuery; +use mySociety::MockQuery; sub test_site_restriction { my $q = new MockQuery('mysite'); 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; |