X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FMenu.pm;h=0c6df2247a976d6efb2939b9fd710bfa7d26e61e;hb=fa31a7e0c6a8d00e35511f5052145ab2156a8160;hp=42b08de48004d2fd4d6604351764930708c402ae;hpb=471d166b4b6a7214d8df6ca8882a8f1a98709634;p=kivitendo-erp.git diff --git a/SL/Menu.pm b/SL/Menu.pm index 42b08de48..0c6df2247 100644 --- a/SL/Menu.pm +++ b/SL/Menu.pm @@ -3,14 +3,9 @@ package SL::Menu; use strict; use SL::Auth; -use YAML (); use File::Spec; use SL::MoreCommon qw(uri_encode); - -our $yaml_xs; -BEGIN { - $yaml_xs = eval { require YAML::XS }; -} +use SL::YAML; our %menu_cache; @@ -29,11 +24,7 @@ sub new { for my $file (@files) { my $data; eval { - if ($yaml_xs) { - $data = YAML::XS::LoadFile(File::Spec->catfile($path, $file)); - } else { - $data = YAML::LoadFile(File::Spec->catfile($path, $file)); - } + $data = SL::YAML::LoadFile(File::Spec->catfile($path, $file)); 1; } or do { die "Error while parsing $file: $@";