Browse Source

minor cleanup

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@6762 8c9fc860-2736-0410-a75d-ab315db34111
eth.hunzikerp 9 năm trước cách đây
mục cha
commit
2cd8cea4a0
1 tập tin đã thay đổi với 3 bổ sung3 xóa
  1. 3 3
      source/WMComponents.Mod

+ 3 - 3
source/WMComponents.Mod

@@ -698,16 +698,16 @@ TYPE
 			END
 		END InternalPropertyChanged;
 
-		PROCEDURE InternalLinkChanged(sender, property : ANY);
+		PROCEDURE InternalLinkChanged(sender, link : ANY);
 		BEGIN
 			IF ~initialized THEN RETURN END;
 			IF ~IsCallFromSequencer() THEN
-				sequencer.ScheduleEvent(SELF.InternalLinkChanged, sender, property);
+				sequencer.ScheduleEvent(SELF.InternalLinkChanged, sender, link);
 				IF CanYield THEN Objects.Yield END;
 			ELSE
 				IF ~inLinkUpdate THEN
 					inLinkUpdate := TRUE;
-					LinkChanged(sender, property);
+					LinkChanged(sender, link);
 					inLinkUpdate := FALSE
 				END;
 			END