@@ -55,7 +55,7 @@ getSubmissionR user repo sha' = do
5555 passed = M.size . M.filter Prelude.id $ tests
5656 H.h3 . toHtml $
5757 "Tests have run: " <> show passed <> "/" <> show total
58− <> if passed == total then " ✅" else " 🟨"
58+ <> if passed == total then " 🎉" else " 🍌"
5959 restartBuild
6060 H.table $ flip M.foldMapWithKey tests $ \testName testPassed -> H.tr $ do
6161 (H.td H.! A.align "right") . H.p $ toHtml testName