Low balance reminders

[bpt/portal.git] / init.sig

diff --git a/init.sig b/init.sig
index 40db908..360b94e 100644 (file)
--- a/init.sig
+++ b/init.sig
@@ -17,6 +17,9 @@ signature INIT = sig
 
     val mkUserRow : C.value list -> user
 
+    (* Direct access to database connections *)
+    val conn : unit -> C.conn
+
     (* Open or close a session, wrapped in a transaction *)
     val init : unit -> unit
     val done : unit -> unit