From 2428d7ba0d07006930caa5feb15286db72e33c55 Mon Sep 17 00:00:00 2001 From: Istvan Chung Date: Thu, 23 Apr 2015 16:37:15 -0400 Subject: Fix missing SQL name-mangling in table initialization --- src/monoize.sml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/monoize.sml') 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") -- cgit v1.2.3