X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FAuth%2FSessionValue.pm;h=cfaa6245cc1c26d40f08de20e3abf066cf5b5df1;hb=678992ffad65c5d10c52552792edee0a2a708bfd;hp=6bf65b9232a0bd64107edb642454e9ba96f3e081;hpb=0a612d2fe7ec14c9ed3f7d0d036e1c63d3027f4f;p=kivitendo-erp.git diff --git a/SL/Auth/SessionValue.pm b/SL/Auth/SessionValue.pm index 6bf65b923..cfaa6245c 100644 --- a/SL/Auth/SessionValue.pm +++ b/SL/Auth/SessionValue.pm @@ -2,6 +2,10 @@ package SL::Auth::SessionValue; use strict; +# Classes that overload stringification must be known before +# YAML::Load() is called. +use SL::Locale::String (); + use Scalar::Util qw(weaken); use YAML; @@ -33,6 +37,8 @@ sub get { sub get_dumped { my ($self) = @_; + no warnings 'once'; + local $YAML::Stringify = 1; return YAML::Dump($self->get); }