From 6c0ba4af0cb8eddc421391ae167364ca3b490b5b Mon Sep 17 00:00:00 2001
From: marco <marco@freepascal.org>
Date: Thu, 17 May 2012 16:58:09 +0000
Subject: [PATCH]  * getfs deprecated, replaced by a totally crossplatform
 sysutils.getfilehandle, probably already since 2.4.0

git-svn-id: trunk@21317 -
---
 rtl/unix/unixutil.pp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/rtl/unix/unixutil.pp b/rtl/unix/unixutil.pp
index a32e87cf30..e8ea35ffb2 100644
--- a/rtl/unix/unixutil.pp
+++ b/rtl/unix/unixutil.pp
@@ -33,8 +33,8 @@ Function StringToPPChar(Var S:AnsiString;ReserveEntries:integer):ppchar;
 function ArrayStringToPPchar(const S:Array of AnsiString;reserveentries:Longint):ppchar; // const ?
 Function Basename(Const path:pathstr;Const suf:pathstr):pathstr; deprecated;
 Function FNMatch(const Pattern,Name:string):Boolean; deprecated;
-Function GetFS (var T:Text):longint;
-Function GetFS(Var F:File):longint;
+Function GetFS (var T:Text):longint; deprecated;
+Function GetFS(Var F:File):longint; deprecated; // use sysutils.getfilehandle
 Procedure FSplit(const Path:PathStr;Var Dir:DirStr;Var Name:NameStr;Var Ext:ExtStr); deprecated;
 Function LocalToEpoch(year,month,day,hour,minute,second:Word):Longint;
 Procedure EpochToLocal(epoch:longint;var year,month,day,hour,minute,second:Word);