X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/471d166b4b6a7214d8df6ca8882a8f1a98709634..d7f3d531eb80c72495f2491764fab2b74db4eb35:/SL/Menu.pm 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: $@";