diff --git a/gap/bytable.gi b/gap/bytable.gi
index 2b95de8..f24de40 100644
--- a/gap/bytable.gi
+++ b/gap/bytable.gi
@@ -40,11 +40,12 @@ end);
 ## And now create them from multiplication tables
 
 #First a helper function
-FiniteMagmaCreator@ := function(tbl, const, filts)
+FiniteMagmaCreator@ := function(tbl, cnstr, filts)
   local M;
   M := MagmaByMultiplicationTableCreatorNC(
-         tbl, const, filts and IsMagmaByMultiplicationTableObj);
-  SetIsFinite(ElementsFamily(FamilyObject(M)));
+         tbl, cnstr, filts and IsMagmaByMultiplicationTableObj);
+  # Is there such a thing as a non-finite table in GAP? Anyhow...
+  SetIsFinite(ElementsFamily(FamilyObj(M)), IsFinite(tbl));
   return M;
 end;