Balance reminders: build on modern systems
[hcoop/portal.git] / contact / contact.sml
index b7390e9..e1b197a 100644 (file)
@@ -5,7 +5,7 @@ structure C = PgClient
 
 fun main _ =
     let
-       val db = C.conn "dbname='hcoop_hcoop'"
+       val db = C.conn "dbname='hcoop_hcoop' host='postgres'"
 
        fun allEmails () =
            let