From eb9f26e78954e502b18f3579132afa6c73d7e103 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Fri, 4 Dec 2015 17:34:13 +0000
Subject: [PATCH] fppkg: using TProcessUTF8

git-svn-id: branches/fixes_1_6@50608 -
---
 components/fppkg/svn/svncommand.pas | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/components/fppkg/svn/svncommand.pas b/components/fppkg/svn/svncommand.pas
index e3bcf4d34f..022c618155 100644
--- a/components/fppkg/svn/svncommand.pas
+++ b/components/fppkg/svn/svncommand.pas
@@ -36,7 +36,7 @@ interface
 uses
   Classes, SysUtils,
   process,
-  FileUtil;
+  FileUtil, UTF8Process;
 
 function ExecuteSvnCommand(const Command: string; Output: TStream): integer;
 function ExecuteSvnCommand(const Command: string): integer;
@@ -61,7 +61,7 @@ end;
 
 function ExecuteSvnCommand(const Command: string; Output: TStream): integer;
 var
-  SvnProcess: TProcess;
+  SvnProcess: TProcessUTF8;
   
   function ReadOutput: boolean;
   // returns true if output was actually read
@@ -89,7 +89,7 @@ var
 begin
   if SvnExecutable='' then InitializeSvnExecutable;
 
-  SvnProcess := TProcess.Create(nil);
+  SvnProcess := TProcessUTF8.Create(nil);
   try
     SvnProcess.CommandLine := SvnExecutable + ' ' + Command;
     SvnProcess.Options := [poUsePipes];