소스 검색

* fixed AnsiStrLower/AnsiStrUpper (were exchanged)

git-svn-id: trunk@9441 -
Jonas Maebe 18 년 전
부모
커밋
19985965e6
1개의 변경된 파일2개의 추가작업 그리고 2개의 파일을 삭제
  1. 2 2
      rtl/unix/cwstring.pp

+ 2 - 2
rtl/unix/cwstring.pp

@@ -669,7 +669,7 @@ function AnsiStrLower(Str: PChar): PChar;
 var
   temp: ansistring;
 begin
-  temp:=upperansistring(str);
+  temp:=loweransistring(str);
   ansi2pchar(temp,str,result);
 end;
 
@@ -678,7 +678,7 @@ function AnsiStrUpper(Str: PChar): PChar;
 var
   temp: ansistring;
 begin
-  temp:=loweransistring(str);
+  temp:=upperansistring(str);
   ansi2pchar(temp,str,result);
 end;