Remove redundant $

Found by hlint 3.3.1
2021-10-14 16:42:21 +02:00 · 2021-10-14 16:42:21 +02:00 · ed8877bd68
commit ed8877bd68
parent 49c4e1d014
1 changed files with 1 additions and 1 deletions
--- a/src/Text/Pandoc/Citeproc/BibTeX.hs
+++ b/src/Text/Pandoc/Citeproc/BibTeX.hs
@ -985,7 +985,7 @@ getTitle f = do
  lang <- gets localeLang
  let ils' =
        if f == "series"
-           then resolveKey lang $ ils
+           then resolveKey lang ils
           else ils
  let processTitle = if utc then unTitlecase (Just lang) else id
  return $ processTitle ils'