diff --git a/lib/Text/TEIWA/Source.hs b/lib/Text/TEIWA/Source.hs
index f81d57e65dc8408f91a225d17a1c601ab298a9b2..b4664db407033f025e48655b5cabbbc97440949e 100644
--- a/lib/Text/TEIWA/Source.hs
+++ b/lib/Text/TEIWA/Source.hs
@@ -25,7 +25,7 @@ import Text.TEIWA.Config (Config(..))
 import Text.TEIWA.Error (Error(..))
 import Text.TEIWA.Source.Common (AnnotationContext(..), Row)
 import qualified Text.TEIWA.Source.ConLLX as ConLLX (getContext, sentences)
-import qualified Text.TEIWA.Source.CSV as CSV (body, getContext)
+import qualified Text.TEIWA.Source.SSV as SSV (body, getContext)
 
 type TEIWAParser = ParsecT Text () (ReaderT Config (Either Error))
 type Format = TEIWAParser Annotation
@@ -49,8 +49,8 @@ coNLLX = do
 
 ssv :: Char -> Format
 ssv separator = do
-  context <- CSV.getContext separator =<< reader formColumn
-  TokenLevel <$> (CSV.body separator >>= mapM (annotateToken context))
+  context <- SSV.getContext separator =<< reader formColumn
+  TokenLevel <$> (SSV.body separator >>= mapM (annotateToken context))
 
 csv :: Format
 csv = ssv ','
diff --git a/lib/Text/TEIWA/Source/CSV.hs b/lib/Text/TEIWA/Source/SSV.hs
similarity index 98%
rename from lib/Text/TEIWA/Source/CSV.hs
rename to lib/Text/TEIWA/Source/SSV.hs
index eed165ca90e0f8d681df360b68c53f3dab8eadcd..12187018f0fa04625e96d12a9998345949026604 100644
--- a/lib/Text/TEIWA/Source/CSV.hs
+++ b/lib/Text/TEIWA/Source/SSV.hs
@@ -1,6 +1,6 @@
 {-# LANGUAGE NamedFieldPuns #-}
 {-# LANGUAGE FlexibleContexts #-}
-module Text.TEIWA.Source.CSV (
+module Text.TEIWA.Source.SSV (
       body
     , getContext
   ) where
diff --git a/teiwa.cabal b/teiwa.cabal
index 01eb1bc2876247e1c000450d6250f33e7bc3d009..07241079c353bd745b08e2852d26b5e125cf6224 100644
--- a/teiwa.cabal
+++ b/teiwa.cabal
@@ -30,7 +30,7 @@ library
                      , Text.TEIWA.Source
                      , Text.TEIWA.Source.Common
                      , Text.TEIWA.Source.ConLLX
-                     , Text.TEIWA.Source.CSV
+                     , Text.TEIWA.Source.SSV
   build-depends:       base >=4.12 && <4.15
                      , bytestring
                      , mtl