@@ -129,7 +129,8 @@ main = do
129129
130130 it "produces a valid route config" $ inTmpObInit $ \tmp -> liftIO $ do
131131 configs <- getConfigs
132− withCurrentDirectory (T.unpack $ toTextIgnore tmp) $ getConfigRoute configs `shouldNotReturn` Nothing
132+ withCurrentDirectory (T.unpack $ toTextIgnore tmp) $
133+ return (either (const Nothing) Just $ getConfigRoute configs) `shouldNotReturn` Nothing
133134
134135 -- These tests fail with "Could not find module 'Obelisk.Generated.Static'"
135136 -- when not run by 'nix-build --attr selftest'