Explorar o código

typo

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@8464 8c9fc860-2736-0410-a75d-ab315db34111
eth.metacore %!s(int64=6) %!d(string=hai) anos
pai
achega
4ba95c1330
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      source/WMEditors.Mod

+ 1 - 1
source/WMEditors.Mod

@@ -831,7 +831,7 @@ TYPE
 		END SelectAll;
 
 		PROCEDURE Paste;
-		VAR text : ARRAY MaxStringSize OF CHAR; valid : BOOLEAN; ignore : WORDT;
+		VAR text : ARRAY MaxStringSize OF CHAR; valid : BOOLEAN; ignore : WORD;
 		BEGIN
 			Texts.clipboard.AcquireRead;
 			IF (0 < Texts.clipboard.GetLength()) & (Texts.clipboard.GetLength() < MaxStringSize) THEN