From 2fd3d1310ce13a20456f8ccde8a7979df143b83f Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Wed, 12 Nov 2014 19:21:34 +0000
Subject: [PATCH] aggpas: unicode file names

git-svn-id: trunk@46825 -
---
 components/aggpas/src/svg/agg_svg_parser_lcl.pas | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/components/aggpas/src/svg/agg_svg_parser_lcl.pas b/components/aggpas/src/svg/agg_svg_parser_lcl.pas
index 6f84319abe..b2a2300eb4 100644
--- a/components/aggpas/src/svg/agg_svg_parser_lcl.pas
+++ b/components/aggpas/src/svg/agg_svg_parser_lcl.pas
@@ -43,7 +43,7 @@ uses
  agg_trans_affine ,
  agg_math_stroke ,
  expat ,
- FileUtil ;
+ FileUtil, LazUTF8Classes ;
 
 { TYPES DEFINITION }
 const
@@ -659,9 +659,9 @@ end;
 
 procedure parser.parse(fname: string);
 var
-  fs: TFileStream;
+  fs: TFileStreamUTF8;
 begin
-  fs:=TFileStream.Create(UTF8ToSys(fname),fmOpenRead+fmShareDenyWrite);
+  fs:=TFileStreamUTF8.Create(fname,fmOpenRead+fmShareDenyWrite);
   try
     parse(fs);
   finally