diff options
Diffstat (limited to 'specials.tl')
| -rw-r--r-- | specials.tl | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/specials.tl b/specials.tl index e743e1b..941bdf4 100644 --- a/specials.tl +++ b/specials.tl @@ -113,5 +113,13 @@ ;; <tag></tag> (defvar *html-empty-tag-aware-p* t) +;; Change certain TL-WHO behaviors to original CL-WHO behaviors. These +;; are behaviors TL-WHO changed in order to improve the security. +;; TL-WHO performs implicit HTML escaping on the output of the +;; expressions that calculate attribute values. TL-WHO's fmt function +;; also escapes the formatted output. If this varaible is twrue, these +;; behaviors revert to the CL-WHO behaviors of not escaping. +(defvar *cl-who-compat* nil) + ;; Used for indentation. (defconstant +newline+ "\n") |