rename CursorInfo to avoid nameclash with ObjectI/O

Ed/EdMonad.icl

@@ -39,7 +39,7 @@ import EdAction
 	 , timerId		:: !Id				// P4
 	 , toolPt		:: !Point2			// P4
 	 , fontInfo		:: !FontInfo	 
-	 , cursorInfo	:: !CursorInfo
+	 , cursorInfo	:: !CursorInfo`
 	 , selectInfo	:: !SelectInfo
 	 , undoInfo		:: !UndoInfo
 	 , needSave		:: !Bool
@@ -50,7 +50,7 @@ import EdAction
 	 , readOnly		:: !Bool
 	 }
 
-:: CursorInfo
+:: CursorInfo`	// rename to avoid conflict with Object I/O
    = { position		:: !Position
 	 , virtualX		:: !Int
 	 , visible		:: !Bool
@@ -470,7 +470,6 @@ where
 		| c ==  s.[i]		= (True, i);
 							= FindLastChar c s (dec i);
 
-
 setNeedSave :: Bool -> EditMonad (PSt .l) nothing
 setNeedSave need =
 	getReadOnly												>>>= \readOnly ->