From 7df1df08ec3b906e16a6884e366c2413a5bc8014 Mon Sep 17 00:00:00 2001
From: inoussa <inoussa@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Sat, 6 Oct 2018 12:19:32 +0000
Subject: [PATCH] Fix: Overload "IsStrEmpty" for RawByteString and
 UnicodeString.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6678 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 wst/trunk/server_service_imputils.pas | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/wst/trunk/server_service_imputils.pas b/wst/trunk/server_service_imputils.pas
index 24f7b683d..134b05d64 100644
--- a/wst/trunk/server_service_imputils.pas
+++ b/wst/trunk/server_service_imputils.pas
@@ -50,11 +50,17 @@ Type
   end;
 
 
-  function IsStrEmpty(Const AStr:String):Boolean;
+  function IsStrEmpty(Const AStr : RawByteString):Boolean;overload;
+  function IsStrEmpty(Const AStr : UnicodeString):Boolean;overload;
 
 implementation
 
-function IsStrEmpty(Const AStr:String):Boolean;
+function IsStrEmpty(Const AStr : RawByteString):Boolean;
+begin
+  Result := ( Length(Trim(AStr)) = 0 );
+end;
+
+function IsStrEmpty(Const AStr : UnicodeString):Boolean;
 begin
   Result := ( Length(Trim(AStr)) = 0 );
 end;