Attachment #14697 for bug #9425

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

Lines 19-24 package Koha::Template::Plugin::KohaAuthorisedValues; Link Here

(-)a/Koha/Template/Plugin/KohaAuthorisedValues.pm (-1 / +3 lines)
19		19
20	use Modern::Perl;	20	use Modern::Perl;
21		21
		22	use Encode;
22	use Template::Plugin;	23	use Template::Plugin;
23	use base qw( Template::Plugin );	24	use base qw( Template::Plugin );
24		25
Lines 44-50 will print the OPAC description for the LOST value stored in item.itemlost. Link Here
44		45
45	sub GetByCode {	46	sub GetByCode {
46	my ( $self, $category, $code, $opac ) = @_;	47	my ( $self, $category, $code, $opac ) = @_;
47	return GetAuthorisedValueByCode( $category, $code, $opac );	48	my $lib = GetAuthorisedValueByCode( $category, $code, $opac );
		49	return Encode::encode_utf8($lib);
48	}	50	}
49		51
50	1;	52	1;




use strict;
use warnings;

use Encode;
use Template::Plugin::Filter;
use base qw( Template::Plugin::Filter );
use warnings;
use strict;

use C4::Branch qw( GetBranchName );

sub filter {
    my ($self,$branchcode) = @_;
    my $branchname = GetBranchName( $branchcode );
    return Encode::encode_utf8($branchname);
}

1;
- 

Return to bug 9425

Lines 20-35 package Koha::Template::Plugin::KohaBranchName; Link Here

(-)a/Koha/Template/Plugin/KohaBranchName.pm (-3 / +4 lines)
20	use strict;	20	use strict;
21	use warnings;	21	use warnings;
22		22
		23	use Encode;
23	use Template::Plugin::Filter;	24	use Template::Plugin::Filter;
24	use base qw( Template::Plugin::Filter );	25	use base qw( Template::Plugin::Filter );
25	use warnings;	26	use warnings;
26	use strict;	27	use strict;
27		28
28	use C4::Branch qw( GetBranchName );;	29	use C4::Branch qw( GetBranchName );
29		30
30	sub filter {	31	sub filter {
31	my ($self,$branchcode) = @_;	32	my ($self,$branchcode) = @_;
32	return GetBranchName( $branchcode );	33	my $branchname = GetBranchName( $branchcode );
		34	return Encode::encode_utf8($branchname);
33	}	35	}
34		36
35	1;	37	1;
36	-