[MLton-commit] r5470

[Vesa Karvonen]

Start with an instructive greeting.
----------------------------------------------------------------------

U   mltonlib/trunk/com/ssh/async/unstable/example/smlbot/smlbot.sml

----------------------------------------------------------------------

Modified: mltonlib/trunk/com/ssh/async/unstable/example/smlbot/smlbot.sml
===================================================================
--- mltonlib/trunk/com/ssh/async/unstable/example/smlbot/smlbot.sml	2007-03-26 14:00:21 UTC (rev 5469)
+++ mltonlib/trunk/com/ssh/async/unstable/example/smlbot/smlbot.sml	2007-03-26 20:16:16 UTC (rev 5470)
@@ -148,7 +148,9 @@
                ; app send [["PASS", pass],
                            ["NICK", nick],
                            ["USER", nick, "0", "*", nick],
-                           ["JOIN", ch]]
+                           ["JOIN", ch],
+                           ["NOTICE", ch,
+                            ":Hello, I'm smlbot. Try writing \"sml: <code>\"."]]
                ; startReceiver sock send run
                ; PollLoop.run Handler.runAll
               end)