From a502ae7b68bd2edeeeaaa163834b5a7854a6ac22 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Sat, 5 Jun 2021 15:27:02 +0200 Subject: [PATCH] Bug 28489: Don't deal with encoding during the serialization Signed-off-by: David Cook Signed-off-by: Nick Clemens Signed-off-by: Nick Clemens Signed-off-by: Jonathan Druart --- C4/Auth.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/C4/Auth.pm b/C4/Auth.pm index cf254ba60e..cb35984b2e 100644 --- a/C4/Auth.pm +++ b/C4/Auth.pm @@ -9,19 +9,18 @@ $INC{'CGI/Session/Serialize/yamlxs.pm'} = '1'; use CGI::Session::ErrorHandler; use YAML::XS (); -use Encode (); $CGI::Session::Serialize::yamlxs::VERSION = '0.1'; @CGI::Session::Serialize::yamlxs::ISA = ( "CGI::Session::ErrorHandler" ); sub freeze { my ($self, $data) = @_; - return Encode::decode_utf8(YAML::XS::Dump($data)); + return YAML::XS::Dump($data); } sub thaw { my ($self, $string) = @_; - return (YAML::XS::Load(Encode::encode_utf8($string)))[0]; + return (YAML::XS::Load($string))[0]; } # ******************************************************************** -- 2.39.5