revert removing cpmPaths os dependant stuff

CpmLinux.prj

@@ -46,6 +46,7 @@ Global
 		StripByteCode:	False
 	Paths
 		Path:	{Project}*cpm
+		Path:	{Project}*cpm*Posix
 		Path:	{Project}*Pm
 		Path:	{Project}*Unix
 		Path:	{Project}*Util

CpmMacOSX.prj

@@ -42,6 +42,7 @@ Global
 		ExportedNames:	
 	Paths
 		Path:	{Project}*cpm
+		Path:	{Project}*cpm*Posix
 		Path:	{Project}*BatchBuild
 		Path:	{Application}*lib*ArgEnv
 		Path:	{Application}*lib*Directory

CpmWin.prj

@@ -42,6 +42,7 @@ Global
 		ExportedNames:	
 	Paths
 		Path:	{Project}\cpm
+		Path:	{Project}\cpm\Windows
 		Path:	{Application}\Libraries\ArgEnv
 		Path:	{Application}\Libraries\Directory
 		Path:	{Application}\Libraries\Generics

cpm/CpmPaths.dcl → cpm/Posix/CpmPaths.dcl

@@ -3,4 +3,5 @@ definition module CpmPaths
 import PmEnvironment
 
 readIDEEnvs :: !String !String !*World -> *([Target], *World)
+
 writeIDEEnvs :: !String !String ![Target] !*World -> *(Bool, *World)

cpm/Windows/CpmPaths.dcl

+definition module CpmPaths
+
+import PmEnvironment
+
+readIDEEnvs :: !String !String !*World -> *([Target], *World)
+
+writeIDEEnvs :: !String !String ![Target] !*World -> *(Bool, *World)

cpm/Windows/CpmPaths.icl

+implementation module CpmPaths
+
+import StdEnv,Platform,PmEnvironment
+
+append_dir_separator :: !{#Char} -> {#Char}
+append_dir_separator s
+	| size s>0 && s.[size s-1]==DirSeparator
+		= s
+		= s+++DirSeparatorString
+
+readIDEEnvs :: !String !String !*World -> *([Target], *World)
+readIDEEnvs cleanhome ideenvs world
+	= openEnvironments cleanhome (append_dir_separator cleanhome+++"Config"+++DirSeparatorString+++ideenvs) world
+
+writeIDEEnvs :: !String !String ![Target] !*World -> *(Bool, *World)
+writeIDEEnvs cleanhome ideenvs envs world
+	= saveEnvironments (append_dir_separator cleanhome+++"Config"+++DirSeparatorString+++ideenvs) envs world