diff --git a/gap/digraph.gi b/gap/digraph.gi
index de263fddf..df6ce9051 100644
--- a/gap/digraph.gi
+++ b/gap/digraph.gi
@@ -1635,7 +1635,7 @@ end);
InstallMethod(RandomDigraphCons,
"for IsStronglyConnectedDigraph, a positive integer, and a float",
[IsStronglyConnectedDigraph, IsPosInt, IsFloat],
-function(filt, n, p)
+function(_, n, p)
local d, adjMatrix, stronglyConnectedComponents,
scc_a, scc_b, i, random_u, random_v;
diff --git a/tst/standard/oper.tst b/tst/standard/oper.tst
index 87d6adde6..99fa35aad 100644
--- a/tst/standard/oper.tst
+++ b/tst/standard/oper.tst
@@ -2859,7 +2859,7 @@ gap> res := DigraphCycleBasis(D);
[ , ,
, ,
, ] ]
-gap> List(res[2], x -> List(x));
+gap> List(res[2], List);
[ [ Z(2)^0, 0*Z(2), 0*Z(2), Z(2)^0, 0*Z(2), 0*Z(2), Z(2)^0, 0*Z(2), 0*Z(2),
0*Z(2) ],
[ 0*Z(2), Z(2)^0, 0*Z(2), Z(2)^0, 0*Z(2), 0*Z(2), 0*Z(2), 0*Z(2), Z(2)^0,
@@ -2883,7 +2883,7 @@ gap> res := DigraphCycleBasis(D);
[ [ [ 6 ], [ 1, 3, 6 ], [ ], [ 5, 6 ], [ 2, 3, 6 ], [ ] ],
[ , ,
, ] ]
-gap> List(res[2], x -> List(x));
+gap> List(res[2], List);
[ [ Z(2)^0, Z(2)^0, 0*Z(2), Z(2)^0, 0*Z(2), 0*Z(2), 0*Z(2), 0*Z(2), 0*Z(2) ],
[ 0*Z(2), 0*Z(2), Z(2)^0, 0*Z(2), 0*Z(2), 0*Z(2), Z(2)^0, Z(2)^0, 0*Z(2) ],
[ Z(2)^0, Z(2)^0, 0*Z(2), 0*Z(2), 0*Z(2), 0*Z(2), Z(2)^0, 0*Z(2), Z(2)^0 ],
@@ -2893,7 +2893,7 @@ gap> D := DigraphDisjointUnion(CycleGraph(3), CycleGraph(4));
gap> res := DigraphCycleBasis(D);
[ [ [ 2, 3 ], [ 3 ], [ ], [ 5, 7 ], [ 6 ], [ 7 ], [ ] ],
[ , ] ]
-gap> List(res[2], x -> List(x));
+gap> List(res[2], List);
[ [ Z(2)^0, Z(2)^0, Z(2)^0, 0*Z(2), 0*Z(2), 0*Z(2), 0*Z(2) ],
[ 0*Z(2), 0*Z(2), 0*Z(2), Z(2)^0, Z(2)^0, Z(2)^0, Z(2)^0 ] ]