summaryrefslogtreecommitdiff
path: root/src/cjr_print.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-03-10 11:18:01 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-03-10 11:18:01 -0400
commit998ec0f6506d8b7065fbe277c253188b38bcac7c (patch)
tree99e4bdad36025df9b3bd37c782f9dd36f052307a /src/cjr_print.sml
parent36b92359be479b92b5adcbdc669576e61d01f74a (diff)
React demo
Diffstat (limited to 'src/cjr_print.sml')
-rw-r--r--src/cjr_print.sml5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/cjr_print.sml b/src/cjr_print.sml
index ab808426..4b6a56db 100644
--- a/src/cjr_print.sml
+++ b/src/cjr_print.sml
@@ -2349,7 +2349,10 @@ fun p_file env (ds, ps) =
newline,
string "uw_set_script_header(ctx, \"",
string (case side of
- ServerAndClient => "<script src=\\\"/app.js\\\"></script>\\n"
+ ServerAndClient => "<script src=\\\""
+ ^ OS.Path.joinDirFile {dir = !Monoize.urlPrefix,
+ file = "app.js"}
+ ^ "\\\"></script>\\n"
| ServerOnly => ""),
string "\");",
newline]),