diff --git a/build/Backlinks.hs b/build/Backlinks.hs index b8636d7..f7e9821 100644 --- a/build/Backlinks.hs +++ b/build/Backlinks.hs @@ -356,7 +356,7 @@ backlinksField = field "backlinks" $ \item -> do blItem <- load (fromFilePath "data/backlinks.json") :: Compiler (Item String) case Aeson.decodeStrict (TE.encodeUtf8 (T.pack (itemBody blItem))) :: Maybe (Map T.Text [BacklinkSource]) of - Nothing -> fail "backlinks: could not parse data/backlinks.json" + Nothing -> noResult "backlinks: could not parse data/backlinks.json" Just blMap -> do mRoute <- getRoute (itemIdentifier item) case mRoute of