Prechádzať zdrojové kódy

* minor optimization (don't clear the result of GetDynLibsErrorStr twice)

git-svn-id: trunk@28948 -
Tomas Hajny 11 rokov pred
rodič
commit
6c17c9cb29
1 zmenil súbory, kde vykonal 3 pridanie a 2 odobranie
  1. 3 2
      rtl/os2/dynlibs.inc

+ 3 - 2
rtl/os2/dynlibs.inc

@@ -113,8 +113,9 @@ var
  RetMsgSize: cardinal;
  RC: cardinal;
 begin
- GetDynLibsErrorStr := '';
- if DynLibErrNo <> 0 then
+ if DynLibErrNo = 0 then
+  GetDynLibsErrorStr := ''
+ else
   begin
    Result := '';
    VarArr [1] := @DynLibErrPath [0];