From e594a7750707e92ab7bda2cc79466d16bf81f529 Mon Sep 17 00:00:00 2001 From: Katrin Fischer Date: Tue, 5 Feb 2019 22:03:12 +0000 Subject: [PATCH] Bug 22056: Remove remaining files in test directories It looks like these directories and test files were added by bug 5309. Later, most of the files were removed as no longer needed by bug 14321. Test: Verify that the files removed are no longer in use and can be safely removed. https://bugs.koha-community.org/show_bug.cgi?id=22170 --- .../intranet-tmpl/prog/en/modules/test/README | 1 - test/README | 3 - test/search.pl | 70 ---------------------- 3 files changed, 74 deletions(-) delete mode 100644 koha-tmpl/intranet-tmpl/prog/en/modules/test/README delete mode 100644 test/README delete mode 100755 test/search.pl diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/test/README b/koha-tmpl/intranet-tmpl/prog/en/modules/test/README deleted file mode 100644 index 20fe504cc4..0000000000 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/test/README +++ /dev/null @@ -1 +0,0 @@ -Test templates, to be used with test scripts 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