rename Info type to InfoMessage

BatchBuild/messwin.dcl

@@ -3,10 +3,10 @@ definition module messwin
 import StdString, StdPSt
 from IdeState import :: General
 
-:: Info
+:: InfoMessage
 	= Level1 String
 	| Level2 String
 	| Level3 [String]
 
-showInfo	:: !.Info !*(PSt General) -> !*PSt General
+showInfo	:: !.InfoMessage !*(PSt General) -> !*PSt General
 closeInfo	:: !*(PSt General) -> !*PSt General

BatchBuild/messwin.icl

@@ -3,12 +3,12 @@ implementation module messwin
 import StdString, StdPSt, StdBool, StdList, StdFunc
 from IdeState import :: General, writeLog
 
-:: Info
+:: InfoMessage
 	= Level1 String
 	| Level2 String
 	| Level3 [String]
 
-showInfo :: !.Info !*(PSt General) -> !*PSt General
+showInfo :: !.InfoMessage !*(PSt General) -> !*PSt General
 showInfo info  ps
 	= case info of
 		(Level1 s)	-> writeLog s ps