[GB.MARKDOWN]

* BUG: Forbid the use of <script> markup.


git-svn-id: svn://localhost/gambas/trunk@6220 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Benoît Minisini 2014-04-01 02:08:58 +00:00
parent 98f6a78822
commit 91fd576e30

View file

@ -682,6 +682,11 @@ ENTER_MARKUP:
Until sCar = ">"
sPattern = String.Mid$(sLine, I1 + 1, I - I1 - 1)
If sPattern = "script" Or If sPattern Begins "script " Then
sResult &= "<div class=\"error\">" & Html("<script> is forbidden") & "</div>"
Return sResult
Endif
'sPattern = LCase(sPattern)
If Left$(sPattern) = "/" Then