diff --git a/gap/oper.gi b/gap/oper.gi index 97a5d2270..af45e5712 100644 --- a/gap/oper.gi +++ b/gap/oper.gi @@ -410,7 +410,7 @@ function(arg) if not IsList(arg) or IsEmpty(arg) or not ForAll(arg, IsDigraphByOutNeighboursRep) then ErrorNoReturn("the arguments must be digraphs by out-neighbours, or a ", - "single list of digraphs by out-neighbours,"); + "single non-empty list of digraphs by out-neighbours,"); fi; D := arg[1]; diff --git a/tst/standard/oper.tst b/tst/standard/oper.tst index 986ecfc7c..095ef5eba 100644 --- a/tst/standard/oper.tst +++ b/tst/standard/oper.tst @@ -876,14 +876,14 @@ gap> gr2 := CompleteDigraph(100); gap> DigraphDisjointUnion(gr) = gr; true gap> DigraphDisjointUnion([[]]); -Error, the arguments must be digraphs by out-neighbours, or a single list of d\ -igraphs by out-neighbours, +Error, the arguments must be digraphs by out-neighbours, or a single non-empty\ + list of digraphs by out-neighbours, gap> DigraphDisjointUnion([gr], [gr]); -Error, the arguments must be digraphs by out-neighbours, or a single list of d\ -igraphs by out-neighbours, +Error, the arguments must be digraphs by out-neighbours, or a single non-empty\ + list of digraphs by out-neighbours, gap> DigraphDisjointUnion(gr, Group(())); -Error, the arguments must be digraphs by out-neighbours, or a single list of d\ -igraphs by out-neighbours, +Error, the arguments must be digraphs by out-neighbours, or a single non-empty\ + list of digraphs by out-neighbours, gap> DigraphDisjointUnion(gr, gr); gap> DigraphDisjointUnion([gr2, gr2]);