remove playing log msg

src/Skat/Operations.hs

@@ -87,7 +87,6 @@ countGame = getp count
 
 play :: (Show p, Player p) => p -> Skat Card
 play p = do
-    liftIO $ putStrLn "playing"
     table <- getp tableCards
     turnCol <- gets turnColour
     trump <- gets trumpColour