View | Details | Raw Unified | Return to bug 11466
Collapse All | Expand All

(-)a/C4/Koha.pm (-1 / +1 lines)
Lines 189-195 build a HTML select with the following code : Link Here
189
189
190
sub GetSupportList{
190
sub GetSupportList{
191
	my $advanced_search_types = C4::Context->preference("AdvancedSearchTypes");
191
	my $advanced_search_types = C4::Context->preference("AdvancedSearchTypes");
192
	if (!$advanced_search_types or $advanced_search_types eq 'itemtypes') {  
192
	if (!$advanced_search_types or $advanced_search_types =~ /itemtypes/) {  
193
		my $query = qq|
193
		my $query = qq|
194
			SELECT *
194
			SELECT *
195
			FROM   itemtypes
195
			FROM   itemtypes
(-)a/t/db_dependent/Suggestions.t (-2 / +11 lines)
Lines 9-18 use Data::Dumper; Link Here
9
9
10
use C4::Suggestions;
10
use C4::Suggestions;
11
11
12
use Test::More tests =>9;
12
use Test::More tests =>12;
13
13
14
BEGIN {
14
BEGIN {
15
    use_ok('C4::Suggestions');
15
    use_ok('C4::Suggestions');
16
    use_ok('C4::Koha');
16
}
17
}
17
18
18
my ($suggestionid, $suggestion, $status, $biblionumber);
19
my ($suggestionid, $suggestion, $status, $biblionumber);
Lines 26-28 ok($suggestion= GetSuggestionFromBiblionumber( $biblionumber ), "GetSuggestionFr Link Here
26
ok($suggestion= GetSuggestionInfoFromBiblionumber( $biblionumber ), "GetSuggestionInfoFromBiblionumber OK");
27
ok($suggestion= GetSuggestionInfoFromBiblionumber( $biblionumber ), "GetSuggestionInfoFromBiblionumber OK");
27
ok(@{SearchSuggestion( {STATUS=>'STALLED'} )}>0, "SearchSuggestion Status OK");
28
ok(@{SearchSuggestion( {STATUS=>'STALLED'} )}>0, "SearchSuggestion Status OK");
28
29
29
- 
30
## Bug 11466, making sure GetSupportList() returns itemtypes, even if AdvancedSearchTypes has multiple values
31
C4::Context->set_preference("AdvancedSearchTypes", 'itemtypes|loc|ccode');
32
my $itemtypes = C4::Koha::GetSupportList();
33
ok(scalar @$itemtypes, "Purchase suggestion itemtypes collected, multiple AdvancedSearchTypes");
34
35
C4::Context->set_preference("AdvancedSearchTypes", 'itemtypes');
36
$itemtypes = C4::Koha::GetSupportList();
37
ok(scalar @$itemtypes, "Purchase suggestion itemtypes collected, default AdvancedSearchTypes");
38
##EO Bug 11466

Return to bug 11466