From 0984a188dbc8213dba08868e7cdf98f56247f5f1 Mon Sep 17 00:00:00 2001
From: flavis <christian@flavigny.de>
Date: Wed, 19 Jan 2022 11:47:40 +0100
Subject: [PATCH] set stupid bidding to 0

---
 src/Skat/AI/Stupid.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Skat/AI/Stupid.hs b/src/Skat/AI/Stupid.hs
index 9d225e2..37cfbbe 100644
--- a/src/Skat/AI/Stupid.hs
+++ b/src/Skat/AI/Stupid.hs
@@ -29,7 +29,7 @@ newtype NoBidder = NoBidder Hand
 -- | no bidding from that player
 instance Bidder NoBidder where
     hand (NoBidder h) = h
-    askBid _ _ bid = return $ Just 120
+    askBid _ _ bid = return Nothing
     askResponse _ _ bid = if bid < 24 then return True else return False
     askGame _ _ = return $ Grand Hand
     askHand _ _ = return True