summaryrefslogtreecommitdiff
path: root/src/monoize.sml
diff options
context:
space:
mode:
authorGravatar Istvan Chung <istvan@vivatropolis.org>2015-04-23 16:37:15 -0400
committerGravatar Istvan Chung <istvan@vivatropolis.org>2015-04-23 16:37:15 -0400
commit2428d7ba0d07006930caa5feb15286db72e33c55 (patch)
tree267186f1f42b5fdd606f78b8668e9f63411111ff /src/monoize.sml
parent614393e835c2385d1590a6fe4081d10bf259f6a2 (diff)
Fix missing SQL name-mangling in table initialization
Diffstat (limited to 'src/monoize.sml')
-rw-r--r--src/monoize.sml4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/monoize.sml b/src/monoize.sml
index 59c5d2ea..67819538 100644
--- a/src/monoize.sml
+++ b/src/monoize.sml
@@ -4682,8 +4682,8 @@ fun monoize env file =
(L'.EDml (str
(foldl (fn ((x, _), s) =>
s ^ ", " ^ Settings.mangleSql x ^ " = NULL")
- ("UPDATE uw_"
- ^ tab
+ ("UPDATE "
+ ^ Settings.mangleSql tab
^ " SET "
^ Settings.mangleSql x
^ " = NULL")