Merge pull request #1452 from TKuh/cat_first_product

Category as first argument for `ProductCategory`
homalg-project · Aug 29, 2023 · a4afcea · a4afcea
2 parents e3e6f04 + b6e5365
commit a4afcea
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/CAP/gap/ProductCategory.gi b/CAP/gap/ProductCategory.gi
@@ -157,7 +157,7 @@ BindGlobal( "CAP_INTERNAL_INSTALL_PRODUCT_ADDS_FROM_CATEGORY",
 
         create_func := function( current_name )
 
-            return function( arg )
+            return function( cat, arg... )
                 local product_args, result_list;
 
                 product_args := CAP_INTERNAL_CREATE_PRODUCT_ARGUMENT_LIST( arg );
@@ -208,7 +208,7 @@ InstallMethodWithCrispCache( ProductOp,
 
     product_category := CreateCapCategory( namestring );
 
-    product_category!.category_as_first_argument := false;
+    product_category!.category_as_first_argument := true;
 
     SetComponents( product_category, category_list );