diff --git a/octopod-frontend/src/Frontend/Utils.hs b/octopod-frontend/src/Frontend/Utils.hs
index b2a4e83..d282b5f 100644
--- a/octopod-frontend/src/Frontend/Utils.hs
+++ b/octopod-frontend/src/Frontend/Utils.hs
@@ -317,7 +317,7 @@ statusWidget :: MonadWidget t m => Dynamic t DeploymentStatus -> m ()
 statusWidget stDyn = do
   stDyn' <- holdUniqDyn stDyn
   let
-    pendingWidget = divClass "status status--pending"
+    pendingWidget = divClass "loading loading--status-alike"
   dyn_ $ stDyn' <&> \case
     Running -> divClass "status status--success" $ text "Running"
     Failure -> divClass "status status--failure" $ text "Failure"