summaryrefslogtreecommitdiff
path: root/src/cjr_print.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adam@chlipala.net>2011-06-24 13:50:59 -0400
committerGravatar Adam Chlipala <adam@chlipala.net>2011-06-24 13:50:59 -0400
commit57e22bb49145d0c4da64b8ff76540b286c55a448 (patch)
treec714756284742c85cf82e7ea9b20de3a54626ccd /src/cjr_print.sml
parent25f4cc36cfd766a9d5ca7e6572b291c23fd16c5d (diff)
'noXsrfProtection' .urp directive
Diffstat (limited to 'src/cjr_print.sml')
-rw-r--r--src/cjr_print.sml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/cjr_print.sml b/src/cjr_print.sml
index f2455636..9b747bcb 100644
--- a/src/cjr_print.sml
+++ b/src/cjr_print.sml
@@ -2619,7 +2619,7 @@ fun p_file env (ds, ps) =
newline,
string "if (*request == '/') ++request;",
newline,
- if couldWrite ek then
+ if couldWrite ek andalso not (Settings.checkNoXsrfProtection s) then
box [string "{",
newline,
string "uw_Basis_string sig = ",