Update low balance reminder for new deposit regime

[bpt/portal.git] / mail.sml

diff --git a/mail.sml b/mail.sml
index 4695592..d0e2d27 100644 (file)
--- a/mail.sml
+++ b/mail.sml
@@ -19,4 +19,12 @@ fun mwrite (ses, s) = (TextIO.output (Unix.textOutstreamOf ses, s);
 
 fun mclose ses = Unix.reap ses
 
+(*type session = unit
+
+fun mopen () = ()
+
+fun mwrite ((), s) = print s
+
+fun mclose () = OS.Process.success*)
+
 end