Attachment #121314 for bug #17600

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

Lines 62-68 BEGIN { Link Here

(-)a/C4/Auth.pm (-1 / +1 lines)
62	require Exporter;	62	require Exporter;
63	@ISA = qw(Exporter);	63	@ISA = qw(Exporter);
64		64
65	@EXPORT_OK = qw(&check_api_auth &get_session &check_cookie_auth &checkpw &checkpw_internal &checkpw_hash	65	@EXPORT_OK = qw(&checkauth &check_api_auth &get_session &check_cookie_auth &checkpw &checkpw_internal &checkpw_hash
66	&get_all_subpermissions &get_user_subpermissions track_login_daily &in_iprange	66	&get_all_subpermissions &get_user_subpermissions track_login_daily &in_iprange
67	&get_template_and_user &haspermission	67	&get_template_and_user &haspermission
68	);	68	);

Lines 20-25 package C4::ClassSortRoutine; Link Here

(-)a/C4/ClassSortRoutine.pm (+1 lines)
20	use strict;	20	use strict;
21	use warnings;	21	use warnings;
22		22
		23	use Class::Factory::Util;
23	use C4::Context;	24	use C4::Context;
24		25
25	our (@ISA, @EXPORT_OK);	26	our (@ISA, @EXPORT_OK);

Lines 30-35 use Koha::MarcSubfieldStructures; Link Here

(-)a/C4/Koha.pm (+2 lines)
30	use Business::ISBN ();	30	use Business::ISBN ();
31	use Business::ISSN ();	31	use Business::ISSN ();
32	use autouse 'Data::cselectall_arrayref' => qw(Dumper);	32	use autouse 'Data::cselectall_arrayref' => qw(Dumper);
		33	use vars qw($DEBUG);
33	our (@ISA, @EXPORT_OK);	34	our (@ISA, @EXPORT_OK);
34	BEGIN {	35	BEGIN {
35	require Exporter;	36	require Exporter;
Lines 38-43 BEGIN { Link Here
38	&GetItemTypesCategorized	39	&GetItemTypesCategorized
39	&getallthemes	40	&getallthemes
40	&getFacets	41	&getFacets
		42	&getImageSets
41	&getnbpages	43	&getnbpages
42	&getitemtypeimagedir	44	&getitemtypeimagedir
43	&getitemtypeimagesrc	45	&getitemtypeimagesrc

Lines 24-29 use parent qw(Plack::Middleware); Link Here

(-)a/Koha/Middleware/RealIP.pm (+1 lines)
24	use C4::Context;	24	use C4::Context;
25		25
26	use Net::Netmask ();	26	use Net::Netmask ();
		27	use Plack::Util::Accessor qw( trusted_proxy );
27		28
28	=head1 METHODS	29	=head1 METHODS
29		30

Lines 21-27 use Modern::Perl; Link Here

(-)a/Koha/Template/Plugin/AuthorisedValues.pm (-1 / +1 lines)
21	use Template::Plugin;	21	use Template::Plugin;
22	use base qw( Template::Plugin );	22	use base qw( Template::Plugin );
23		23
24	use C4::Koha;	24	use C4::Koha qw( GetAuthorisedValues );
25	use Koha::AuthorisedValues;	25	use Koha::AuthorisedValues;
26		26
27	sub GetByCode {	27	sub GetByCode {

Lines 628-634 if ($tag) { Link Here

(-)a/opac/opac-search.pl (-2 / +2 lines)
628	my $taglist = get_tags({term=>$tag, approved=>1});	628	my $taglist = get_tags({term=>$tag, approved=>1});
629	$results_hashref->{biblioserver}->{hits} = scalar (@$taglist);	629	$results_hashref->{biblioserver}->{hits} = scalar (@$taglist);
630	my @marclist = map { C4::Biblio::GetXmlBiblio( $_->{biblionumber} ) } @$taglist;	630	my @marclist = map { C4::Biblio::GetXmlBiblio( $_->{biblionumber} ) } @$taglist;
631	$DEBUG and printf STDERR "taglist (%s biblionumber)\nmarclist (%s records)\n", scalar(@$taglist), scalar(@marclist);	631	#Global symbol "$DEBUG" requires explicit package name
		632	#$DEBUG and printf STDERR "taglist (%s biblionumber)\nmarclist (%s records)\n", scalar(@$taglist), scalar(@marclist);
632	$results_hashref->{biblioserver}->{RECORDS} = \@marclist;	633	$results_hashref->{biblioserver}->{RECORDS} = \@marclist;
633	# FIXME: tag search and standard search should work together, not exclusively	634	# FIXME: tag search and standard search should work together, not exclusively
634	# FIXME: Because search and standard search don't work together OpacHiddenItems	635	# FIXME: Because search and standard search don't work together OpacHiddenItems
635	-

Return to bug 17600