File 3455-xmerl-Fix-silly-matching-bug.patch of Package erlang
From 5141e6b0f55327074cb0ad1350cb2ee116ec4119 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?John=20H=C3=B6gberg?= <john@erlang.org>
Date: Fri, 22 Jan 2021 13:24:58 +0100
Subject: [PATCH 05/10] xmerl: Fix silly matching bug
We shouldn't crash if the whitespace happens to differ.
---
lib/xmerl/src/xmerl_sax_parser_base.erlsrc | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lib/xmerl/src/xmerl_sax_parser_base.erlsrc b/lib/xmerl/src/xmerl_sax_parser_base.erlsrc
index 3dfdec440a..7c6044b3da 100644
--- a/lib/xmerl/src/xmerl_sax_parser_base.erlsrc
+++ b/lib/xmerl/src/xmerl_sax_parser_base.erlsrc
@@ -3104,7 +3104,7 @@ add_default_attribute({ElementName, AttrName, Value},
parse_att_type(?STRING_EMPTY, State) ->
cf(?STRING_EMPTY, State, fun parse_att_type/2);
parse_att_type(?STRING_UNBOUND_REST(C, _) = Bytes, State) when ?is_whitespace(C) ->
- {_WS, Rest, State1} = whitespace(Bytes, State, []),
+ {_, Rest, State1} = whitespace(Bytes, State, []),
case parse_att_type_1(Rest, State1, []) of
{"(", Rest1, State2} ->
{T, Rest2, State3} = parse_until_right_paren(Rest1, State2, []),
@@ -3115,7 +3115,7 @@ parse_att_type(?STRING_UNBOUND_REST(C, _) = Bytes, State) when ?is_whitespace(C)
{"(" ++ T, Rest2, State3}
end;
{"NOTATION", Rest1, State2} ->
- {_WS, Rest2, State3} = whitespace(Rest1, State2, []),
+ {_, Rest2, State3} = whitespace(Rest1, State2, []),
case parse_att_type_1(Rest2, State3, []) of
{"(", Rest3, State4} ->
{T, Rest4, State5} = parse_until_right_paren(Rest3, State4, []),
--
2.26.2