projects
/
koha-ffzg.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 27673: Replace YAML with YAML::XS
[koha-ffzg.git]
/
opac
/
opac-search.pl
diff --git
a/opac/opac-search.pl
b/opac/opac-search.pl
index
d57cabd
..
c04960d
100755
(executable)
--- a/
opac/opac-search.pl
+++ b/
opac/opac-search.pl
@@
-30,6
+30,7
@@
use Modern::Perl;
use C4::Context;
use List::MoreUtils q/any/;
use Try::Tiny;
use C4::Context;
use List::MoreUtils q/any/;
use Try::Tiny;
+use YAML::XS;
use Data::Dumper; # TODO remove
use Data::Dumper; # TODO remove
@@
-245,7
+246,7
@@
my $yaml = C4::Context->preference('OpacHiddenItems');
if ( $yaml =~ /\S/ ) {
$yaml = "$yaml\n\n"; # YAML expects trailing newline. Surplus does not hurt.
eval {
if ( $yaml =~ /\S/ ) {
$yaml = "$yaml\n\n"; # YAML expects trailing newline. Surplus does not hurt.
eval {
- $hidingrules = YAML::Load($yaml);
+ $hidingrules = YAML::
XS::
Load($yaml);
};
if ($@) {
warn "Unable to parse OpacHiddenItems syspref : $@";
};
if ($@) {
warn "Unable to parse OpacHiddenItems syspref : $@";