Finished off inital money stuff
[hcoop/portal.git] / money.sig
index e35df38..7ec8b7b 100644 (file)
--- a/money.sig
+++ b/money.sig
@@ -21,7 +21,7 @@ sig
     val listChargesWithNames : int -> (string * charge) list
 
     val clearCharges : int -> unit
-    val applyCharges : Init.C.conn -> int -> unit
+    val applyCharges : int -> unit
 
     val addEvenCharges : int * int list -> unit