From c203097ec2b68fa7b8374797e379ae4351cea575 Mon Sep 17 00:00:00 2001
From: marcoonthegit <marco@freepascal.org>
Date: Mon, 25 Apr 2022 14:07:43 +0200
Subject: [PATCH] * add overload to getenvironmentvariable so that it is also
 found when windows is before sysutils in the uses list.  bug #39448

---
 rtl/objpas/sysutils/osutilsh.inc | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/rtl/objpas/sysutils/osutilsh.inc b/rtl/objpas/sysutils/osutilsh.inc
index f7d6bcacca..17050da5fc 100644
--- a/rtl/objpas/sysutils/osutilsh.inc
+++ b/rtl/objpas/sysutils/osutilsh.inc
@@ -23,8 +23,8 @@ Procedure RaiseLastOSError;overload;
 Procedure RaiseLastOSError(LastError: Integer);overload;
 procedure CheckOSError(LastError: Integer);platform;{$ifdef SYSTEMINLINE}inline;{$endif}
 
-Function GetEnvironmentVariable(Const EnvVar : AnsiString) : AnsiString;
-Function GetEnvironmentVariable(Const EnvVar : UnicodeString) : UnicodeString;
+Function GetEnvironmentVariable(Const EnvVar : AnsiString) : AnsiString; overload;
+Function GetEnvironmentVariable(Const EnvVar : UnicodeString) : UnicodeString; overload;
 Function GetEnvironmentString(Index : Integer) : {$ifdef FPC_RTL_UNICODE}UnicodeString{$else}AnsiString{$endif};
 Function GetEnvironmentVariableCount : Integer;
 {$IFDEF HAS_SLEEP}