Selaa lähdekoodia

* fixed formatting

git-svn-id: trunk@26149 -
Jonas Maebe 11 vuotta sitten
vanhempi
commit
679c6bd27e
1 muutettua tiedostoa jossa 4 lisäystä ja 2 poistoa
  1. 4 2
      rtl/unix/unixcp.pp

+ 4 - 2
rtl/unix/unixcp.pp

@@ -728,9 +728,11 @@ begin
     begin
       // clean up, for example en_US.UTF-8 => UTF-8
       p:=Pos('.',lang);
-      if p>0 then Delete(lang,1,p);
+      if p>0 then
+        Delete(lang,1,p);
       p:=Pos('@',lang);
-      if p>0 then Delete(lang,p,length(lang)-p+1);
+      if p>0 then
+        Delete(lang,p,length(lang)-p+1);
       cp:=GetCodepageByName(lang);
       if cp <> CP_NONE then
         Result:=cp;