Merge pull request #708 from hungaborhorvath/SylowHallFix

Fixes #707
gap-system · Apr 8, 2016 · 3deeeac · 3deeeac
2 parents a04b0d9 + e4254dd
commit 3deeeac
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/grp.gi b/lib/grp.gi
@@ -2932,7 +2932,7 @@ InstallMethod( HallSubgroupOp,
     for p in pi do
       AddSet(smallpi, p);
       S := ClosureSubgroupNC(S, SylowSubgroup(G, p));
-      SetHallSubgroup(G, smallpi, S);
+      SetHallSubgroup(G, ShallowCopy(smallpi), S);
     od;
     return S;
     end );