From 8e9c6c3568af1bc384eb4ce64d9eae3f89004da3 Mon Sep 17 00:00:00 2001 From: Max Kanat-Alexander Date: Sat, 2 Oct 2010 08:52:56 -0700 Subject: Bug 601364: Make xt/search.t also test the normal field=value search params r=mkanat, a=mkanat (module owner) --- xt/lib/Bugzilla/Test/Search/FieldTestNormal.pm | 58 ++++++++++++++++++++++++++ 1 file changed, 58 insertions(+) create mode 100644 xt/lib/Bugzilla/Test/Search/FieldTestNormal.pm (limited to 'xt/lib/Bugzilla/Test/Search/FieldTestNormal.pm') diff --git a/xt/lib/Bugzilla/Test/Search/FieldTestNormal.pm b/xt/lib/Bugzilla/Test/Search/FieldTestNormal.pm new file mode 100644 index 000000000..f0f8ed8c4 --- /dev/null +++ b/xt/lib/Bugzilla/Test/Search/FieldTestNormal.pm @@ -0,0 +1,58 @@ +# -*- Mode: perl; indent-tabs-mode: nil -*- +# +# The contents of this file are subject to the Mozilla Public +# License Version 1.1 (the "License"); you may not use this file +# except in compliance with the License. You may obtain a copy of +# the License at http://www.mozilla.org/MPL/ +# +# Software distributed under the License is distributed on an "AS +# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or +# implied. See the License for the specific language governing +# rights and limitations under the License. +# +# The Original Code is the Bugzilla Bug Tracking System. +# +# The Initial Developer of the Original Code is Everything Solved, Inc. +# Portions created by the Initial Developer are Copyright (C) 2010 the +# Initial Developer. All Rights Reserved. +# +# Contributor(s): +# Max Kanat-Alexander + +# This is the same as a FieldTest, except that it uses normal URL +# parameters instead of Boolean Charts. +package Bugzilla::Test::Search::FieldTestNormal; +use strict; +use warnings; +use base qw(Bugzilla::Test::Search::FieldTest); + +# We just clone a FieldTest because that's the best for performance, +# overall--that way we don't have to translate the value again. +sub new { + my ($class, $field_test) = @_; + my $self = { %$field_test }; + return bless $self, $class; +} + +sub name { + my $self = shift; + my $name = $self->SUPER::name(@_); + return "$name (Normal Params)"; +} + +sub search_params { + my ($self) = @_; + return $self->{search_params} if $self->{search_params}; + + my $field = $self->field; + my $value = $self->translated_value; + my %params = ( + $field => $value, + "${field}_type" => $self->operator, + ); + + $self->{search_params} = \%params; + return $self->{search_params}; +} + +1; \ No newline at end of file -- cgit v1.2.3-24-g4f1b