Browse Source

--- Merging r14932 into '.':
U packages/univint/src/TextEdit.pas

git-svn-id: branches/fixes_2_4@14934 -

Jonas Maebe 15 years ago
parent
commit
4b4f33ed2c
1 changed files with 1 additions and 2 deletions
  1. 1 2
      packages/univint/src/TextEdit.pas

+ 1 - 2
packages/univint/src/TextEdit.pas

@@ -194,7 +194,7 @@ uses MacTypes,QuickdrawTypes,MixedMode;
 {$ALIGN MAC68K}
 {$ALIGN MAC68K}
 
 
 type
 type
-	TERecPtr = ^SInt32; { an opaque type }
+	TERecPtr = ^TERec;
 	TEPtr = TERecPtr;
 	TEPtr = TERecPtr;
 	TEHandle = ^TEPtr;
 	TEHandle = ^TEPtr;
 	HighHookProcPtr = procedure( const (*var*) r: Rect; pTE: TEPtr );
 	HighHookProcPtr = procedure( const (*var*) r: Rect; pTE: TEPtr );
@@ -356,7 +356,6 @@ type
             <=  charPosition            D0.W
             <=  charPosition            D0.W
             
             
 }
 }
-type
 	HighHookUPP = HighHookProcPtr;
 	HighHookUPP = HighHookProcPtr;
 	EOLHookUPP = EOLHookProcPtr;
 	EOLHookUPP = EOLHookProcPtr;
 	CaretHookUPP = CaretHookProcPtr;
 	CaretHookUPP = CaretHookProcPtr;