remove arbitrary HTML tags from HAFAS HIMMessage attribute content
This commit is contained in:
parent
810945f8bc
commit
16c1d12373
1 changed files with 8 additions and 1 deletions
|
@ -205,7 +205,14 @@ sub get_xml_p {
|
|||
|
||||
# Dito for <HIMMessage [...] lead="[...]<br>[...]">.
|
||||
while ( $body
|
||||
=~ s{<HIMMessage([^>]+)lead="([^"]*)<br/?>([^"=]*)"}{<HIMMessage$1lead="$2 $3"}s
|
||||
=~ s{<HIMMessage([^>]+)lead="([^"]*)<br/?>([^"=]*)"}{<HIMMessage$1lead="$2 $3"}is
|
||||
)
|
||||
{
|
||||
}
|
||||
|
||||
# ... and any other HTML tag inside an XML attribute
|
||||
while ( $body
|
||||
=~ s{<HIMMessage([^>]+)lead="([^"]*)<[^>]+>([^"=]*)"}{<HIMMessage$1lead="$2$3"}is
|
||||
)
|
||||
{
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue