[Only show playing code when output is HaskellCode
Joachim Breitner <mail@joachim-breitner.de>**20100904110814
 Ignore-this: aa82a67e2da9c31b2c58b73bdd10a896
] hunk ./b18n-combined-cgi.hs 304
-        (playCode, playErrorM) <- case (todo,getM,genCodeM,pcM) of
+        -- Playcode can only by used when the output is exMode
+        (playCode, playErrorM) <- if outMode /= HaskellCode then return (Nothing, Nothing) else
+            case (todo,getM,genCodeM,pcM) of