Mercurial > urweb

diff src/jscomp.sml @ 1656:3e7c7e200713

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix handling of quotes in generating C literals
author Adam Chlipala <adam@chlipala.net>
date Mon, 02 Jan 2012 17:08:39 -0500
parents 438561303d02
children 0577be31a435
line wrap: on
line diff
--- a/src/jscomp.sml	Mon Jan 02 16:54:18 2012 -0500
+++ b/src/jscomp.sml	Mon Jan 02 17:08:39 2012 -0500
@@ -1324,7 +1324,7 @@
         val script =
             if !foundJavaScript then
                 lines ^ urlRules ^ String.concat (rev (#script st))
-                ^ "\ntime_format = \"" ^ String.toCString (Settings.getTimeFormat ()) ^ "\";\n"
+                ^ "\ntime_format = \"" ^ Prim.toCString (Settings.getTimeFormat ()) ^ "\";\n"
             else
                 ""
     in