diff options
author | Jacob Mitchell <jmitchell@member.fsf.org> | 2016-09-07 13:19:13 -0700 |
---|---|---|
committer | Jacob Mitchell <jmitchell@member.fsf.org> | 2016-09-07 13:19:13 -0700 |
commit | 51ac19f565fa935eec6d9dd1f7119c6227383a3c (patch) | |
tree | 9539e4a61dd38f2e65d78a5805b3eadef26cfebf /src/main.mlton.sml | |
parent | c49ad46cc190e63f2395fcef03deff4386845877 (diff) |
HTTP Last-Modified: latest modtime of source files
See issue #38.
Diffstat (limited to 'src/main.mlton.sml')
-rw-r--r-- | src/main.mlton.sml | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/main.mlton.sml b/src/main.mlton.sml index 6d368106..fb1a1723 100644 --- a/src/main.mlton.sml +++ b/src/main.mlton.sml @@ -254,7 +254,8 @@ fun send (sock, s) = send (sock, String.extract (s, n, NONE)) end -val () = case CommandLine.arguments () of +val () = (Globals.setResetTime (); + case CommandLine.arguments () of ["daemon", "start"] => (case Posix.Process.fork () of SOME _ => () @@ -376,4 +377,4 @@ val () = case CommandLine.arguments () of else (OS.FileSys.remove socket; raise OS.SysErr ("", NONE)) - end handle OS.SysErr _ => OS.Process.exit (oneRun args) + end handle OS.SysErr _ => OS.Process.exit (oneRun args)) |