diff --git a/gap/structure.gi b/gap/structure.gi
index 4b5e735..f458838 100644
--- a/gap/structure.gi
+++ b/gap/structure.gi
@@ -600,6 +600,8 @@ InstallOtherMethod(DirectProductOp, "for a list and non-quasigroup magma",
       genfunc := GeneratorsOfRightQuasigroup;
     elif "HasGeneratorsOfMagma" in jof then
       genfunc := GeneratorsOfMagma;
+    elif "HasGeneratorsOfDomain" in jof then
+      genfunc := GeneratorsOfDomain;
     else
       Info(InfoRAQ,1, "RAQ: Unusual product, each of ", list,
            " has generators, but not sure what kind; trying next method.");