diff --git a/Data/Text/Internal.hs b/Data/Text/Internal.hs
index 5da8b0c1c7d005de01d61af30ff2ad9c0ea32a54..474b0d2ba443610c0f470fcf5f586958edef2886 100644
--- a/Data/Text/Internal.hs
+++ b/Data/Text/Internal.hs
@@ -12,8 +12,13 @@
 -- Stability   : experimental
 -- Portability : GHC
 --
--- Semi-public internals.  Most users should not need to use this
--- module.
+-- A module containing private 'Text' internals. This exposes the
+-- 'Text' representation and low level construction functions.
+-- Modules which extend the 'Text' system may need to use this module.
+--
+-- You should not use this module unless you are determined to monkey
+-- with the internals, as the functions here do just about nothing to
+-- preserve data invariants.  You have been warned!
 
 module Data.Text.Internal
     (
diff --git a/Data/Text/Lazy/Internal.hs b/Data/Text/Lazy/Internal.hs
index 47407346b6fbb4d33baa2faae68042c480a3c1a9..ae66530e164f0a86827a05752cbc237730105d45 100644
--- a/Data/Text/Lazy/Internal.hs
+++ b/Data/Text/Lazy/Internal.hs
@@ -9,10 +9,14 @@
 -- Stability   : experimental
 -- Portability : GHC
 -- 
--- A module containing semi-public 'Text' internals. This exposes the
+-- A module containing private 'Text' internals. This exposes the
 -- 'Text' representation and low level construction functions.
 -- Modules which extend the 'Text' system may need to use this module.
--- Regular users should not.
+--
+-- You should not use this module unless you are determined to monkey
+-- with the internals, as the functions here do just about nothing to
+-- preserve data invariants.  You have been warned!
+
 module Data.Text.Lazy.Internal
     (
       Text(..)
diff --git a/text.cabal b/text.cabal
index f5c4ae41a8659ffcbd9d24d9188b057958cbdbd0..a937bcdbddfbde8dc315a53ff8d8c3da32e75e2a 100644
--- a/text.cabal
+++ b/text.cabal
@@ -1,5 +1,5 @@
 name:           text
-version:        0.11.0.2
+version:        0.11.0.3
 homepage:       http://bitbucket.org/bos/text
 bug-reports:    http://bitbucket.org/bos/text/issues
 synopsis:       An efficient packed Unicode text type.
@@ -79,18 +79,20 @@ flag developer
 library
   exposed-modules:
     Data.Text
+    Data.Text.Array
     Data.Text.Encoding
     Data.Text.Encoding.Error
     Data.Text.Foreign
     Data.Text.IO
+    Data.Text.Internal
     Data.Text.Lazy
     Data.Text.Lazy.Builder
     Data.Text.Lazy.Encoding
     Data.Text.Lazy.IO
+    Data.Text.Lazy.Internal
     Data.Text.Lazy.Read
     Data.Text.Read
   other-modules:
-    Data.Text.Array
     Data.Text.Encoding.Fusion
     Data.Text.Encoding.Fusion.Common
     Data.Text.Encoding.Utf16
@@ -102,10 +104,8 @@ library
     Data.Text.Fusion.Internal
     Data.Text.Fusion.Size
     Data.Text.IO.Internal
-    Data.Text.Internal
     Data.Text.Lazy.Encoding.Fusion
     Data.Text.Lazy.Fusion
-    Data.Text.Lazy.Internal
     Data.Text.Lazy.Search
     Data.Text.Search
     Data.Text.Unsafe