diff --git a/gap/quasigroups.gd b/gap/quasigroups.gd
index 5a7cfbf..27ee79a 100644
--- a/gap/quasigroups.gd
+++ b/gap/quasigroups.gd
@@ -102,7 +102,7 @@ DeclareOperation( "LoopByCayleyTable", [ IsMatrix ] );
 DeclareOperation( "SpecifyElmNamePrefix", [ IsCollection, IsString ] );
 DeclareSynonym( "SetQuasigroupElmName", SpecifyElmNamePrefix );
 DeclareSynonym( "SetLoopElmName", SpecifyElmNamePrefix );
-DeclareOperation( "BindElmNames", IsMagma );
+DeclareOperation( "BindElmNames", [ IsMagma ] );
 DeclareAttribute( "ConstructorFromTable", IsMagma );
 DeclareOperation( "CanonicalCopy", [ IsMagma ] );