Mercurial > urweb

diff src/settings.sml @ 841:44c2c089ca15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Start of Option; Basis.current; fix missed cases in Jscomp.isNullable
author Adam Chlipala <adamc@hcoop.net>
date Sun, 07 Jun 2009 11:13:18 -0400
parents 5154a047c6bc
children 6725d73c3c31
line wrap: on
line diff
--- a/src/settings.sml	Sat Jun 06 15:29:34 2009 -0400
+++ b/src/settings.sml	Sun Jun 07 11:13:18 2009 -0400
@@ -98,6 +98,7 @@
 
 val clientBase = basis ["get",
                         "set",
+                        "current",
                         "alert",
                         "recv",
                         "sleep",
@@ -125,6 +126,7 @@
 
 val jsFuncsBase = basisM [("alert", "alert"),
                           ("get_client_source", "sg"),
+                          ("current", "scur"),
                           ("htmlifyBool", "bs"),
                           ("htmlifyFloat", "ts"),
                           ("htmlifyInt", "ts"),