From 3835d837864ce09cbc82c5aeccad4cbd5e76a2a8 Mon Sep 17 00:00:00 2001
From: Nikolay Korotkiy <sikmir@disroot.org>
Date: Sat, 17 May 2025 23:14:29 +0400
Subject: [PATCH] transgui: fix build with lazarus 4.0

---
 pkgs/by-name/tr/transgui/package.nix | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/pkgs/by-name/tr/transgui/package.nix b/pkgs/by-name/tr/transgui/package.nix
index 23286a131448..fb78b119b537 100644
--- a/pkgs/by-name/tr/transgui/package.nix
+++ b/pkgs/by-name/tr/transgui/package.nix
@@ -55,6 +55,9 @@ stdenv.mkDerivation rec {
 
   postPatch = ''
     substituteInPlace restranslator.pas --replace /usr/ $out/
+
+    # Fix build with lazarus 4.0, https://github.com/transmission-remote-gui/transgui/issues/1486
+    substituteInPlace main.pas --replace-warn "h <> INVALID_HANDLE_VALUE" "h >= 0"
   '';
 
   preBuild = ''