diff --git a/tst/testinstall.tst b/tst/testinstall.tst
index 721d2441b..fbf44f2a0 100644
--- a/tst/testinstall.tst
+++ b/tst/testinstall.tst
@@ -455,9 +455,8 @@ gap> DigraphEdges(C);
 # Issue #704 SubdigraphsMonomorphisms bug
 gap> d := Digraph([[2, 3, 4, 5], [1, 3, 4], [1, 2, 4, 5], [1, 2, 3, 5], 
 > [1, 3, 4]]);;
-gap> SubdigraphsMonomorphisms(CompleteMultipartiteDigraph([2, 3]), d);
-[ Transformation( [ 1, 3, 2 ] ), Transformation( [ 2, 5, 1, 3, 4 ] ), 
-  Transformation( [ 1, 4, 2, 3 ] ), Transformation( [ 3, 4, 2, 1 ] ) ]
+gap> Length(SubdigraphsMonomorphisms(CompleteMultipartiteDigraph([2, 3]), d));
+4
 
 #  DIGRAPHS_UnbindVariables
 gap> Unbind(C);