1 files changed, 1 insertions, 0 deletions

diff --git a/webgui/src/Main.hs b/webgui/src/Main.hs
index 4f2c83c..141b0ea 100644
--- a/webgui/src/Main.hs
+++ b/webgui/src/Main.hs
@@ -115,6 +115,7 @@ setup Config{..} window (split -> (socketErr, dataUpdate)) = void $ do
         errorsTab = maybe (fatal "Could not make nonfatal errors visible") return =<< getElementById window "errors-tab"
       errors #+ [UI.li # set TP.text str]
       errorsTab # set style [("display", "inline-block")]
+      switchTab "errors"
     fatal :: String -> UI a
     fatal str = do
       (getBody window #) . set children =<< sequence [UI.p # set TP.text str # set UI.class_ "fatal"]