From 585635371a182d2b3cd5400f6d26d8e20ade6dbd Mon Sep 17 00:00:00 2001
From: Tomas Bzatek <tbzatek@redhat.com>
Date: Mon, 23 Dec 2024 12:09:37 +0100
Subject: Drop Application.GTKVersion_2_xxx_Up

...and related quirks along with it.

Assume latest gtk2 release.
---
 UChown.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'UChown.pas')

diff --git a/UChown.pas b/UChown.pas
index 770c3fe..5e09809 100644
--- a/UChown.pas
+++ b/UChown.pas
@@ -140,7 +140,7 @@ begin
     for i := 0 to OwnerListView.Items.Count - 1 do
       if OwnerListView.Items[i].AsInteger(1) = UID then begin
         OwnerListView.Items[i].Selected := True;
-        OwnerListView.Items[i].SetCursor(0, False, not Application.GTKVersion_2_2_0_Up, 0.5, 0);
+        OwnerListView.Items[i].SetCursor(0, False, False, 0.5, 0);
         susr := OwnerListView.Items[i].AsString(0);
         Break;
       end;
@@ -148,7 +148,7 @@ begin
     for i := 0 to GroupListView.Items.Count - 1 do
       if GroupListView.Items[i].AsInteger(1) = GID then begin
         GroupListView.Items[i].Selected := True;
-        GroupListView.Items[i].SetCursor(0, False, not Application.GTKVersion_2_2_0_Up, 0.5, 0);
+        GroupListView.Items[i].SetCursor(0, False, False, 0.5, 0);
         sgrp := GroupListView.Items[i].AsString(0);
         Break;
       end;
-- 
cgit v1.2.3