jvcllaz: Update to include issues #6595 of the jvcl bugtracker.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7134 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2019-08-15 16:59:40 +00:00 · 2019-08-15 16:59:40 +00:00 · a1ac8efd03
commit a1ac8efd03
parent c4704cf800
1 changed files with 1 additions and 1 deletions
--- a/components/jvcllaz/run/JvTimeFramework/jvtfdays.pas
+++ b/components/jvcllaz/run/JvTimeFramework/jvtfdays.pas
@ -2565,7 +2565,7 @@ begin
    while (ApptsExamined < FData[MapRow, -1]) and not Result do
    begin
      Test := FData[MapRow, MapCol];
-      if Test > 0 then
+      if Test <> 0 then
      begin
        Inc(ApptsExamined);
        if Test = NativeInt(Appt) then