diff --git a/Debug/FileLocation.hs b/Debug/FileLocation.hs
--- a/Debug/FileLocation.hs
+++ b/Debug/FileLocation.hs
@@ -5,7 +5,7 @@
 
 import Language.Haskell.TH.Syntax
 import Debug.Trace
-import FileLocation.Internal (locationToString)
+import FileLocation.LocationString (locationToString)
 
 -- | A version of Debug.Trace.trace that just prints a value.
 -- This should be included in Debug.Trace
diff --git a/FileLocation.hs b/FileLocation.hs
--- a/FileLocation.hs
+++ b/FileLocation.hs
@@ -1,12 +1,13 @@
 {-# LANGUAGE TemplateHaskell #-}
 -- | see Debug.FileLocation module for more definitions
 module FileLocation
-  (err, undef,
-   debug, debugM, debugMsg, dbg, dbgMsg, trc, ltrace, ltraceM, strace
+  ( err, undef
+  , debug, debugM, debugMsg, dbg, dbgMsg, trc, ltrace, ltraceM, strace
+  , locationToString
   )
   where
 
-import FileLocation.Internal (locationToString)
+import FileLocation.LocationString (locationToString)
 import Debug.FileLocation (debug, debugM, debugMsg, dbg, dbgMsg, trc, ltrace, ltraceM, strace)
 import Debug.Trace (trace)
 -- future plans
diff --git a/FileLocation/Internal.hs b/FileLocation/Internal.hs
deleted file mode 100644
--- a/FileLocation/Internal.hs
+++ /dev/null
@@ -1,11 +0,0 @@
-module FileLocation.Internal (locationToString) where
-
-import Language.Haskell.TH.Syntax
-
--- leaving out the loc_end parameter
-locationToString :: Loc -> String
-locationToString loc = (loc_package loc) ++ ':' : (loc_module loc) ++ 
-  ' ' : (loc_filename loc) ++ ':' : (line loc) ++ ':' : (char loc)
-  where
-    line = show . fst . loc_start
-    char = show . snd . loc_start
diff --git a/FileLocation/LocationString.hs b/FileLocation/LocationString.hs
new file mode 100644
--- /dev/null
+++ b/FileLocation/LocationString.hs
@@ -0,0 +1,12 @@
+module FileLocation.LocationString (locationToString) where
+
+import Language.Haskell.TH.Syntax
+
+-- turn the TH Loc loaction information into a human readable string
+-- leaving out the loc_end parameter
+locationToString :: Loc -> String
+locationToString loc = (loc_package loc) ++ ':' : (loc_module loc) ++ 
+  ' ' : (loc_filename loc) ++ ':' : (line loc) ++ ':' : (char loc)
+  where
+    line = show . fst . loc_start
+    char = show . snd . loc_start
diff --git a/file-location.cabal b/file-location.cabal
--- a/file-location.cabal
+++ b/file-location.cabal
@@ -1,5 +1,5 @@
 Name:                file-location
-Version:             0.2.1
+Version:             0.2.2
 Synopsis:            common functions that show file location information
 Homepage:            https://github.com/gregwebs/ErrorLocation.hs
 License:             BSD3
@@ -41,7 +41,7 @@
 
 Library
   Exposed-modules: FileLocation, Debug.FileLocation
-  Other-modules: FileLocation.Internal
+  Other-modules: FileLocation.LocationString
   
   -- Packages needed in order to build this package.
   Build-depends: base >= 4 && < 5,