@@ -61,7 +61,8 @@ readBibtexString :: Variant -- ^ bibtex or biblatex
6161readBibtexString variant locale idpred contents = do
6262 case runParser (((resolveCrossRefs variant <$> bibEntries) <* eof) >>=
6363 mapM (itemToReference locale variant) .
64− filter (idpred . identifier))
64+ filter (\item -> idpred (identifier item) &&
65+ entryType item /= "xdata"))
6566 (fromMaybe defaultLang $ localeLanguage locale, Map.empty)
6667 "" contents of
6768 Left err -> Left err
@@ -1058,7 +1059,6 @@ getTypeAndGenre :: Bib (Text, Maybe Text)
10581059getTypeAndGenre = do
10591060 lang <- gets localeLang
10601061 et <- asks entryType
1061− guard $ et /= "xdata"
10621062 reftype' <- resolveKey' lang <$> getRawField "type"
10631063 <|> return mempty
10641064 st <- getRawField "entrysubtype" <|> return mempty