From 5c9917ff8d18ddaefd5a8bf4b223009747477fd8 Mon Sep 17 00:00:00 2001
From: bringert <unknown>
Date: Thu, 21 Apr 2005 15:21:02 +0000
Subject: Fixed module names and imports after giant file move.

---
 src/GF/Speech/TransformCFG.hs | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'src/GF/Speech/TransformCFG.hs')

diff --git a/src/GF/Speech/TransformCFG.hs b/src/GF/Speech/TransformCFG.hs
index 8e2673a9f..71b3ca296 100644
--- a/src/GF/Speech/TransformCFG.hs
+++ b/src/GF/Speech/TransformCFG.hs
@@ -5,9 +5,9 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/04/15 09:45:32 $ 
+-- > CVS $Date: 2005/04/21 16:23:33 $ 
 -- > CVS $Author: bringert $
--- > CVS $Revision: 1.11 $
+-- > CVS $Revision: 1.12 $
 --
 --  This module does some useful transformations on CFGs.
 --
@@ -16,9 +16,9 @@
 -- peb thinks: most of this module should be moved to GF.Conversion...
 -----------------------------------------------------------------------------
 
-module TransformCFG (makeNice, CFRule_) where
+module GF.Speech.TransformCFG (makeNice, CFRule_) where
 
-import Ident
+import GF.Infra.Ident
 import GF.Formalism.CFG 
 import GF.Formalism.Utilities (Symbol(..), mapSymbol)
 import GF.Conversion.Types
@@ -100,4 +100,4 @@ fix f x = let x' = f x in if x' == x then x else fix f x'
 
 nothingOrNull :: Maybe [a] -> Bool
 nothingOrNull Nothing = True
-nothingOrNull (Just xs) = null xs
\ No newline at end of file
+nothingOrNull (Just xs) = null xs
-- 
cgit v1.2.3