diff --git a/code/week05/src/Week05/Free.hs b/code/week05/src/Week05/Free.hs
index be7a3b9..58f2c52 100644
--- a/code/week05/src/Week05/Free.hs
+++ b/code/week05/src/Week05/Free.hs
@@ -51,7 +51,7 @@ type FreeSchema =
     BlockchainActions
         .\/ Endpoint "mint" MintParams
 
-mint :: (HasBlockchainActions s, AsContractError e) => MintParams -> Contract w s e ()
+mint :: MintParams -> Contract w FreeSchema Text ()
 mint mp = do
     let val     = Value.singleton curSymbol (mpTokenName mp) (mpAmount mp)
         lookups = Constraints.monetaryPolicy policy