File XML-Parser-sethashsalt.diff of Package perl-XML-Parser

--- ./Expat/Expat.pm.orig	2019-07-24 11:46:04.634577298 +0000
+++ ./Expat/Expat.pm	2019-07-24 11:46:44.006485426 +0000
@@ -65,6 +65,7 @@ sub new {
   $args{_Setters} = \%Handler_Setters;
   $args{Parser} = ParserCreate($self, $args{ProtocolEncoding},
                                $args{Namespaces});
+  SetHashSalt($args{Parser}, $args{HashSalt}) if $args{HashSalt};
   $self;
 }
 
--- ./Expat/Expat.xs.orig	2019-07-22 09:25:43.311146846 +0000
+++ ./Expat/Expat.xs	2019-07-22 09:31:01.982463580 +0000
@@ -2213,4 +2213,9 @@ XML_Do_External_Parse(parser, result)
     OUTPUT:
         RETVAL
 
+int
+XML_SetHashSalt(parser, hash_salt)
+	XML_Parser			parser
+	unsigned long hash_salt
+
 
openSUSE Build Service is sponsored by