remove playing log msg
This commit is contained in:
@@ -87,7 +87,6 @@ countGame = getp count
|
|||||||
|
|
||||||
play :: (Show p, Player p) => p -> Skat Card
|
play :: (Show p, Player p) => p -> Skat Card
|
||||||
play p = do
|
play p = do
|
||||||
liftIO $ putStrLn "playing"
|
|
||||||
table <- getp tableCards
|
table <- getp tableCards
|
||||||
turnCol <- gets turnColour
|
turnCol <- gets turnColour
|
||||||
trump <- gets trumpColour
|
trump <- gets trumpColour
|
||||||
|
|||||||
Reference in New Issue
Block a user