diff --git a/src/Data.hs b/src/Data.hs
deleted file mode 100644
--- a/src/Data.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-module Data (
-    module Data.Char
-) where
-
-import Data.Char
diff --git a/src/Data/Char.hs b/src/Data/Char.hs
deleted file mode 100644
--- a/src/Data/Char.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-module Data.Char (
-    module Data.Char.SScript
-) where
-
-import Data.Char.SScript
diff --git a/src/Data/Char/SScript.hs b/src/Data/Char/SScript.hs
--- a/src/Data/Char/SScript.hs
+++ b/src/Data/Char/SScript.hs
@@ -3,6 +3,7 @@
 -- License     : BSD3
 -- Maintainer  : khalil.fazal@uoit.net
 -- Portability : portable
+-- Stability   : stable
 --
 -- Formats Strings with subscript or superscript characters
 module Data.Char.SScript (
diff --git a/sscript.cabal b/sscript.cabal
--- a/sscript.cabal
+++ b/sscript.cabal
@@ -1,5 +1,5 @@
 name:                sscript
-version:             0.1.0.1
+version:             0.1.0.2
 synopsis:            Formats Strings with subscript or superscript characters
 description:         Please see README.md
 homepage:            https://github.com/khalilfazal/sscript#readme
@@ -16,9 +16,7 @@
 library
   hs-source-dirs:   src
 
-  exposed-modules:  Data
-                    Data.Char
-                    Data.Char.SScript
+  exposed-modules:  Data.Char.SScript
 
   default-language: Haskell2010
   build-depends:    base < 5
diff --git a/test/Data/Char/SScriptSpec.hs b/test/Data/Char/SScriptSpec.hs
--- a/test/Data/Char/SScriptSpec.hs
+++ b/test/Data/Char/SScriptSpec.hs
@@ -17,7 +17,7 @@
 
 spec :: Spec
 spec = do
-    context "Char.SScript.subscript" $ do
+    context "Data.Char.SScript.subscript" $ do
         it "should work for a single char" $
             subscript '0' `shouldBe` '₀'
         it "should work for all single digit decimals" $
@@ -29,7 +29,7 @@
         it "should return the same char if it can't be subscripted" $
             shouldBeFixed (map subscript) "AEIORUVX"
 
-    context "Char.SScript.superscript" $ do
+    context "Data.Char.SScript.superscript" $ do
         it "should work for a single char" $
             superscript '0' `shouldBe` '⁰'
         it "should work for all single digit decimals" $
@@ -43,7 +43,7 @@
         it "should return the same char if it can't be superscripted" $
             shouldBeFixed (map superscript) "qCFQSVXYZ"
 
-    context "Char.SScript.formatSS" $ do
+    context "Data.Char.SScript.formatSS" $ do
         it "should convert chars following an underscore to its subscript, \
             \like in the chemical formula for dravite: \
             \https://en.wikipedia.org/wiki/Tourmaline#Dravite" $