diff options
| author |  Christian Hesse <mail@eworm.de> | 2024-04-26 08:24:06 +0200 |
|---|---|---|
| committer | Christian Hesse <mail@eworm.de> | 2024-04-26 08:27:29 +0200 |
| commit | e09247b0d7a63028cb7f4004f583d89e23b5791a (patch) | |
| tree | a2547ba6e4d9e082f9eba4370d629787bb9bebad | |
| parent | bdaeb461224bde4e0dae6f9fa19f9612c9bb19ac (diff) | |
mod/notification-telegram: support excluding characters from escaping...
... to support formatting in plain text.
Handle with care, this can break the request if done wrong!
| -rw-r--r-- | mod/notification-telegram.rsc | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/mod/notification-telegram.rsc b/mod/notification-telegram.rsc index efde85a..858ab1b 100644 --- a/mod/notification-telegram.rsc +++ b/mod/notification-telegram.rsc @@ -83,6 +83,7 @@ :local EscapeMD do={ :local Text [ :tostr $1 ]; :local Mode [ :tostr $2 ]; + :local Excl [ :tostr $3 ]; :global CharacterReplace; :global IfThenElse; @@ -93,7 +94,9 @@ "#"; "+"; "-"; "="; "|"; "{"; "}"; "."; "!" }; } :foreach Char in=($Chars->$Mode) do={ - :set Text [ $CharacterReplace $Text $Char ("\\" . $Char) ]; + :if ([ :typeof [ :find $Excl $Char ] ] = "nil") do={ + :set Text [ $CharacterReplace $Text $Char ("\\" . $Char) ]; + } } :if ($Mode = "body") do={ |