summaryrefslogtreecommitdiff
path: root/src/settings.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/settings.sml')
-rw-r--r--src/settings.sml4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/settings.sml b/src/settings.sml
index 57ab956a..c9030eac 100644
--- a/src/settings.sml
+++ b/src/settings.sml
@@ -252,7 +252,9 @@ val jsFuncsBase = basisM [("alert", "alert"),
("now", "now"),
("timeToString", "showTime"),
- ("htmlifyTime", "showTime")]
+ ("htmlifyTime", "showTime"),
+ ("toSeconds", "toSeconds"),
+ ("diffInSeconds", "diffInSeconds")]
val jsFuncs = ref jsFuncsBase
fun setJsFuncs ls = jsFuncs := foldl (fn ((k, v), m) => M.insert (m, k, v)) jsFuncsBase ls
fun jsFunc x = M.find (!jsFuncs, x)