[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:
parent
98f6a78822
commit
91fd576e30
1 changed files with 5 additions and 0 deletions
|
@ -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
|
||||
|
|
Loading…
Reference in a new issue