From 6154a5de3c787fda35b7a800beb4f094115849a8 Mon Sep 17 00:00:00 2001 From: Alice BRENON <alice.brenon@ens-lyon.fr> Date: Fri, 19 Mar 2021 14:02:29 +0100 Subject: [PATCH] Rename CoNLLX module (the 'N' was erroneously lowercase) --- lib/Text/TEIWA/Source.hs | 6 +++--- lib/Text/TEIWA/Source/{ConLLX.hs => CoNLLX.hs} | 2 +- teiwa.cabal | 2 +- 3 files changed, 5 insertions(+), 5 deletions(-) rename lib/Text/TEIWA/Source/{ConLLX.hs => CoNLLX.hs} (96%) diff --git a/lib/Text/TEIWA/Source.hs b/lib/Text/TEIWA/Source.hs index 53a7403..6c906f7 100644 --- a/lib/Text/TEIWA/Source.hs +++ b/lib/Text/TEIWA/Source.hs @@ -26,7 +26,7 @@ import Text.TEIWA.Error (Error(..)) import Text.TEIWA.Source.Common ( AnnotationContext(..), Field, Row, TEIWAParser, annotationContext ) -import qualified Text.TEIWA.Source.ConLLX as ConLLX (fields, sentences) +import qualified Text.TEIWA.Source.CoNLLX as CoNLLX (fields, sentences) import qualified Text.TEIWA.Source.SSV as SSV (body, fields) type Format = TEIWAParser Annotation @@ -52,9 +52,9 @@ annotateToken (AnnotationContext {columnIndex, columnName, header}) (atLine, rec coNLLX :: Format coNLLX = do - context <- annotationContext ConLLX.fields + context <- annotationContext CoNLLX.fields SentenceLevel <$> ( - ConLLX.sentences >>= mapM ( + CoNLLX.sentences >>= mapM ( fmap SentenceAnnotation . mapM (annotateToken context) ) ) diff --git a/lib/Text/TEIWA/Source/ConLLX.hs b/lib/Text/TEIWA/Source/CoNLLX.hs similarity index 96% rename from lib/Text/TEIWA/Source/ConLLX.hs rename to lib/Text/TEIWA/Source/CoNLLX.hs index fb0f1d4..5f2d517 100644 --- a/lib/Text/TEIWA/Source/ConLLX.hs +++ b/lib/Text/TEIWA/Source/CoNLLX.hs @@ -1,6 +1,6 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE FlexibleContexts #-} -module Text.TEIWA.Source.ConLLX ( +module Text.TEIWA.Source.CoNLLX ( fields , sentences ) where diff --git a/teiwa.cabal b/teiwa.cabal index 0724107..8e84544 100644 --- a/teiwa.cabal +++ b/teiwa.cabal @@ -29,7 +29,7 @@ library , Text.TEIWA.Error , Text.TEIWA.Source , Text.TEIWA.Source.Common - , Text.TEIWA.Source.ConLLX + , Text.TEIWA.Source.CoNLLX , Text.TEIWA.Source.SSV build-depends: base >=4.12 && <4.15 , bytestring -- GitLab