Mercurial > urweb

diff src/jscomp.sml @ 764:7f653298dd66

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
C FFI compiler options
author Adam Chlipala <adamc@hcoop.net>
date Thu, 30 Apr 2009 17:15:14 -0400
parents f7e2026dd5ae
children a28982de5645
line wrap: on
line diff
--- a/src/jscomp.sml	Thu Apr 30 16:25:27 2009 -0400
+++ b/src/jscomp.sml	Thu Apr 30 17:15:14 2009 -0400
@@ -965,7 +965,7 @@
                                 val (ek, st) = jsE inner (ek, st)
                                 val (unurl, st) = unurlifyExp loc (t, st)
                             in
-                                (strcat [str ("rc(cat(\"" ^ !Monoize.urlPrefix ^ "\","),
+                                (strcat [str ("rc(cat(\"" ^ Settings.getUrlPrefix () ^ "\","),
                                          e,
                                          str ("), function(s){var t=s.split(\"/\");var i=0;return "
                                               ^ unurl ^ "},"),