X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FAuth%2FSessionValue.pm;h=cfaa6245cc1c26d40f08de20e3abf066cf5b5df1;hb=02235d37571e93969951b4b8800f1f1a9faea44c;hp=6bf65b9232a0bd64107edb642454e9ba96f3e081;hpb=e0ba33ff38a40207472185d639567966e136da6b;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); }