document: remove Language. prefix in module names

diff --git a/symantic-document/Language/Symantic/Document.hs b/symantic-document/Language/Symantic/Document.hs
deleted file mode 100644 (file)
index 9883c3a..0000000
--- a/symantic-document/Language/Symantic/Document.hs
+++ /dev/null
@@ -1,4 +0,0 @@
-module Language.Symantic.Document
- ( module Language.Symantic.Document.Sym
- ) where
-import Language.Symantic.Document.Sym

diff --git a/symantic-document/Language/Symantic/HLint.hs b/symantic-document/Language/Symantic/HLint.hs
deleted file mode 120000 (symlink)
index ab18269..0000000
--- a/symantic-document/Language/Symantic/HLint.hs
+++ /dev/null
@@ -1 +0,0 @@
-../HLint.hs
\ No newline at end of file

diff --git a/symantic-document/Symantic/Document.hs b/symantic-document/Symantic/Document.hs
new file mode 100644 (file)
index 0000000..7bb4387
--- /dev/null
+++ b/symantic-document/Symantic/Document.hs
@@ -0,0 +1,4 @@
+module Symantic.Document
+ ( module Symantic.Document.Sym
+ ) where
+import Symantic.Document.Sym

diff --git a/symantic-document/Language/HLint.hs b/symantic-document/Symantic/Document/HLint.hs
similarity index 100%
rename from symantic-document/Language/HLint.hs
rename to symantic-document/Symantic/Document/HLint.hs

diff --git a/symantic-document/Language/Symantic/Document/Sym.hs b/symantic-document/Symantic/Document/Sym.hs
similarity index 99%
rename from symantic-document/Language/Symantic/Document/Sym.hs
rename to symantic-document/Symantic/Document/Sym.hs
index 4367f4ebd67f5f440bddf9b61133edb3b873804a..f2eda1638993da83317da9088ec5a2e478658cd3 100644 (file)
--- a/symantic-document/Language/Symantic/Document/Sym.hs
+++ b/symantic-document/Symantic/Document/Sym.hs
@@ -1,5 +1,5 @@
 {-# LANGUAGE GeneralizedNewtypeDeriving #-}
-module Language.Symantic.Document.Sym where
+module Symantic.Document.Sym where
 
 import Data.Bool
 import Data.Char (Char)

diff --git a/symantic-document/Language/Symantic/Document/Term.hs b/symantic-document/Symantic/Document/Term.hs
similarity index 97%
rename from symantic-document/Language/Symantic/Document/Term.hs
rename to symantic-document/Symantic/Document/Term.hs
index 137e78dd06c2336caf0d57bb727d9a9c899c3609..f44695eb41c326a598f6f06e5c93dda1775067c5 100644 (file)
--- a/symantic-document/Language/Symantic/Document/Term.hs
+++ b/symantic-document/Symantic/Document/Term.hs
@@ -1,6 +1,6 @@
-module Language.Symantic.Document.Term
- ( module Language.Symantic.Document.Sym
- , module Language.Symantic.Document.Term
+module Symantic.Document.Term
+ ( module Symantic.Document.Sym
+ , module Symantic.Document.Term
  ) where
 
 import Control.Applicative (Applicative(..))
@@ -18,7 +18,7 @@ import qualified Data.List as List
 import qualified Data.Text.Lazy as TL
 import qualified Data.Text.Lazy.Builder as TLB
 
-import Language.Symantic.Document.Sym
+import Symantic.Document.Sym
 
 -- * Type 'Reader'
 data Reader

diff --git a/symantic-document/Language/Symantic/Document/Term/Dimension.hs b/symantic-document/Symantic/Document/Term/Dimension.hs
similarity index 97%
rename from symantic-document/Language/Symantic/Document/Term/Dimension.hs
rename to symantic-document/Symantic/Document/Term/Dimension.hs
index 924bc91af6d48e422213eb99a5713fa2dcbdfd92..bd68c0aca0e2fe36836ff036dc871804d1918259 100644 (file)
--- a/symantic-document/Language/Symantic/Document/Term/Dimension.hs
+++ b/symantic-document/Symantic/Document/Term/Dimension.hs
@@ -1,6 +1,6 @@
-module Language.Symantic.Document.Term.Dimension
- ( module Language.Symantic.Document.Sym
- , module Language.Symantic.Document.Term.Dimension
+module Symantic.Document.Term.Dimension
+ ( module Symantic.Document.Sym
+ , module Symantic.Document.Term.Dimension
  ) where
 
 import Control.Applicative (Applicative(..))
@@ -16,7 +16,7 @@ import GHC.Exts (IsList(..))
 import Prelude ((+))
 import Text.Show (Show(..))
 
-import Language.Symantic.Document.Sym
+import Symantic.Document.Sym
 
 -- * Type 'Dim'
 data Dim

diff --git a/symantic-document/Language/Symantic/Document/HLint.hs b/symantic-document/Symantic/Document/Term/HLint.hs
similarity index 100%
rename from symantic-document/Language/Symantic/Document/HLint.hs
rename to symantic-document/Symantic/Document/Term/HLint.hs

diff --git a/symantic-document/Language/Symantic/Document/Term/IO.hs b/symantic-document/Symantic/Document/Term/IO.hs
similarity index 97%
rename from symantic-document/Language/Symantic/Document/Term/IO.hs
rename to symantic-document/Symantic/Document/Term/IO.hs
index b91e2a01f1351137b09576f167f911304c491441..c2db4c38ab7533511ef113c8246ceaf4af111d9a 100644 (file)
--- a/symantic-document/Language/Symantic/Document/Term/IO.hs
+++ b/symantic-document/Symantic/Document/Term/IO.hs
@@ -1,6 +1,6 @@
-module Language.Symantic.Document.Term.IO
- ( module Language.Symantic.Document.Sym
- , module Language.Symantic.Document.Term.IO
+module Symantic.Document.Term.IO
+ ( module Symantic.Document.Sym
+ , module Symantic.Document.Term.IO
  ) where
 
 import Control.Applicative (Applicative(..))
@@ -20,7 +20,7 @@ import qualified Data.Text.IO as Text
 import qualified Data.Text.Lazy.IO as TL
 import qualified System.IO as IO
 
-import Language.Symantic.Document.Sym
+import Symantic.Document.Sym
 
 -- * Type 'Reader'
 data Reader

diff --git a/symantic-document/Language/Symantic/Document/Term/HLint.hs b/symantic-document/Symantic/HLint.hs
similarity index 100%
rename from symantic-document/Language/Symantic/Document/Term/HLint.hs
rename to symantic-document/Symantic/HLint.hs

diff --git a/symantic-document/symantic-document.cabal b/symantic-document/symantic-document.cabal
index 677431838c2a1712d567ce4fc04ee513a352d9ba..8185341a8480a667d68b2c5e1a06e93fc670e052 100644 (file)
--- a/symantic-document/symantic-document.cabal
+++ b/symantic-document/symantic-document.cabal
@@ -28,11 +28,11 @@ Source-Repository head
 
 Library
   exposed-modules:
-    Language.Symantic.Document
-    Language.Symantic.Document.Sym
-    Language.Symantic.Document.Term
-    Language.Symantic.Document.Term.Dimension
-    Language.Symantic.Document.Term.IO
+    Symantic.Document
+    Symantic.Document.Sym
+    Symantic.Document.Term
+    Symantic.Document.Term.Dimension
+    Symantic.Document.Term.IO
   default-language: Haskell2010
   default-extensions:
     DataKinds

diff --git a/symantic-document/test/HUnit.hs b/symantic-document/test/HUnit.hs
index 3d8901533abe9d1788e345578e14145fe7abd181..091f5a21cd79d37c56932fb04782f00f620c8051 100644 (file)
--- a/symantic-document/test/HUnit.hs
+++ b/symantic-document/test/HUnit.hs
@@ -18,9 +18,9 @@ import Text.Show (Show(..))
 import qualified Data.List as List
 import qualified Data.Text.Lazy as TL
 
-import qualified Language.Symantic.Document.Term as Doc
-import qualified Language.Symantic.Document.Term.Dimension as Dim
-import Language.Symantic.Document.Term ((<+>))
+import qualified Symantic.Document.Term as Doc
+import qualified Symantic.Document.Term.Dimension as Dim
+import Symantic.Document.Term ((<+>))
 
 -- * Tests
 hunits :: TestTree