Clean up imports

cpm/Cpm.icl

@@ -19,7 +19,6 @@ import StdBool, StdEnum, StdFile, StdFunc, StdMisc
 import Text
 import UtilIO
 import UtilStrictLists
-import Reader, State
 
 :: CpmAction
   =  Project FilePath ProjectAction
@@ -158,8 +157,8 @@ doProjectAction cleanhome pwd  pn  (BuildProject force ideenvs) world
   # iniGeneral                 = initGeneral True compilerOptions pwd proj_path proj envs logfile
   # {ls, gst_world}            = pinit force {ls=iniGeneral,gst_world=world,gst_continue_or_stop=False}
   = gst_world
-  where  envsfile                   = cleanhome </> ideenvs
-         proj_path                  = GetLongPathName pn
+  where  envsfile   = cleanhome </> ideenvs
+         proj_path  = GetLongPathName pn
 
 doProjectAction cleanhome  _  pn  (ProjectPath pa) world
    # projectfile      = addExtension (dropExtension pn) "prj"
@@ -214,7 +213,6 @@ openProject cleanhome projectfile world
 saveProject :: !FilePath !Project !FilePath !*World -> (Bool, !*World)
 saveProject cleanhome prj projectfile world = accFiles (SaveProjectFile projectfile prj cleanhome) world
 
-
 rmStrictListIdx :: !Int !(List String) -> List String
 rmStrictListIdx 0  (_ :! t)          = t
 rmStrictListIdx n  (h :! t) | n > 0  = h :! (rmStrictListIdx (n - 1) t)