From fcdc002747e9caf09ba720088e2d3921416f4cbe Mon Sep 17 00:00:00 2001 From: Hayley Mapley Date: Fri, 26 Apr 2019 15:22:30 +1200 Subject: [PATCH] Bug 22056: Removed test directory, including search.pl and README Test plan: Check that this directory has been removed. Sponsored-by: Catalyst IT Signed-off-by: Katrin Fischer --- test/README | 3 --- test/search.pl | 70 ---------------------------------------------------------- 2 files changed, 73 deletions(-) delete mode 100644 test/README delete mode 100755 test/search.pl diff --git a/test/README b/test/README deleted file mode 100644 index fe2895c163..0000000000 --- a/test/README +++ /dev/null @@ -1,3 +0,0 @@ -A collection of cgi and command line scripts that are useful for some testing, -but for one reason or another cannot be made into automated test in t. -Use with templates in koha-tmpl/intranet-tmpl/prog/en/modules/test diff --git a/test/search.pl b/test/search.pl deleted file mode 100755 index 5d4f6e8d76..0000000000 --- a/test/search.pl +++ /dev/null @@ -1,70 +0,0 @@ -#!/usr/bin/perl -w - -use C4::Search; - -my @SEARCH = ( - { operators => [ - 'and', - 'and' - ], - operands => [ - 'shakespeare, "(william)"', - 'dream' - ], - indexes => [ - 'au,wrdl', - 'ti', - 'kw' - ], - limits => [ - 'yr,st-numeric=2000-' - ], - sort_by => [ - 'relevance' - ], - lang => 'en', - }, -); - - -foreach ( @SEARCH ) { - my ($expected, @mismatch); - my( $error, - $query, - $simple_query, - $query_cgi, - $query_desc, - $limit, - $limit_cgi, - $limit_desc, - $query_type ) - = buildQuery( $_->{operators}, $_->{operands}, $_->{indexes}, $_->{limits}, $_->{sort_by}, 0, $_->{lang} ); - - die $error if $error; - - $expected = $_->{query}; - push @mismatch, "Query: $query (not: $expected)" unless $query eq $expected; - - $expected = $_->{simple_query}; - push @mismatch, "Simple Query: $simple_query (not: $expected)" unless $simple_query eq $expected; - - $expected = $_->{query_cgi}; - push @mismatch, "Query CGI: $query_cgi (not: $expected)" unless $query_cgi eq $expected; - - $expected = $_->{query_desc}; - push @mismatch, "Query desc: $query_desc (not: $expected)" unless $query_desc eq $expected; - - $expected = $_->{limit}; - push @mismatch, "Limit: $limit (not: $expected)" unless $limit eq $expected; - - $expected = $_->{limit_cgi}; - push @mismatch, "Limit CGI: $limit_cgi (not: $expected)" unless $limit_cgi eq $expected; - - $expected = $_->{limit_desc}; - push @mismatch, "Limit desc: $limit_desc (not: $expected)" unless $limit_desc eq $expected; - - $expected = $_->{query_type}; - push @mismatch, "Query Type: $query_type (not: $expected)" unless $query_type eq $expected; - - die map "$_\n", @mismatch if @mismatch; -} -- 2.11.0