Преглед изворни кода

* fix mantis #20973, return value in unixutils.

git-svn-id: trunk@19893 -
marco пре 13 година
родитељ
комит
6f8dac94e9
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      packages/unixutil/src/unixutils.pp

+ 1 - 1
packages/unixutil/src/unixutils.pp

@@ -1178,7 +1178,7 @@ end;
 Function GetUserGroup(Const UserName : String) : String;
 
 begin
-  GetGroupName(GetUserGid(UserName));
+  Result := GetGroupName(GetUserGid(UserName));
 end;