paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-28 00:11:49 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fix for web bug #6579

Browse Source 
git-svn-id: trunk@15899 -
This commit is contained in:
Tomas Hajny 2010-08-24 21:32:49 +00:00
parent 821d0c5d26
commit f544ee965a
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/os2/video.pp
View File

@ -116,11 +116,11 @@ begin
CursorX := NewCursorX; CursorX := NewCursorX;
CursorY := NewCursorY; CursorY := NewCursorY;
end end
else { else
{Do not set an error code; people should fix invalid NewCursorX Do not set an error code; people should fix invalid NewCursorX
or NewCursorY values when designing, there is no need for detecting or NewCursorY values when designing, there is no need for detecting
these errors at runtime.} these errors at runtime.
RunError (225); RunError (225);}
end; end;