From 4164fa92e00396fcb74ee958222b82fac72d7015 Mon Sep 17 00:00:00 2001
From: vincents <vincents@lazarus-ide.org>
Date: Wed, 21 May 2008 13:30:05 +0000
Subject: [PATCH] LCL: removed broken override for specifying the
 SystemEncoding

git-svn-id: trunk@15197 -
---
 lcl/lconvencoding.pas | 8 --------
 1 file changed, 8 deletions(-)

diff --git a/lcl/lconvencoding.pas b/lcl/lconvencoding.pas
index 4be257dbd3..67a24e0cbf 100644
--- a/lcl/lconvencoding.pas
+++ b/lcl/lconvencoding.pas
@@ -108,7 +108,6 @@ end;
 function GetSystemEncoding: string;
 var Lang: string;
     i: integer;
-    s: string;
 begin
   if EncodingValid then begin
     Result:=SystemEncoding;
@@ -134,13 +133,6 @@ begin
   if (i>0) and (i<=length(Lang)) then
     Result:=copy(Lang,i+1,length(Lang)-i);
 
-  // check parameters
-  for i:=1 to ParamCount do
-  begin
-    s:=ParamStr(i);
-    if s='--charset=' then Result:=copy(s,pos(#61,s),length(s));
-  end;
-
   Result:=NormalizeEncoding(Result);
 
   SystemEncoding:=Result;