summaryrefslogtreecommitdiff
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
commitea4d6f8b4770447d32b2b3f3fd04828ee86c1c39 (patch)
tree267186f1f42b5fdd606f78b8668e9f63411111ff
parentb694410ddffeb7bad34b1b93fd8570eedb28a4d0 (diff)
Fix missing SQL name-mangling in table initialization
-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")