From 4a7e52f808946bb1618dba18c6f54b5119253953 Mon Sep 17 00:00:00 2001
From: Laurent Destailleur <eldy@destailleur.fr>
Date: Sat, 5 Aug 2023 14:26:57 +0200
Subject: [PATCH] Debug v18

---
 htdocs/admin/stocktransfer.php                | 4 ++--
 htdocs/modulebuilder/template/admin/setup.php | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/htdocs/admin/stocktransfer.php b/htdocs/admin/stocktransfer.php
index c518639ce02..c62e286adfd 100644
--- a/htdocs/admin/stocktransfer.php
+++ b/htdocs/admin/stocktransfer.php
@@ -227,7 +227,7 @@ print '<span class="opacitymedium">'.$langs->trans("StockTransferSetupPage").'</
 
 $moduledir = 'stocktransfer';
 $myTmpObjects = array();
-$myTmpObjects[$moduledir]=array('includerefgeneration'=>1, 'includedocgeneration'=>1);
+$myTmpObjects[$moduledir]=array('includerefgeneration'=>1, 'includedocgeneration'=>1, 'class'=>'StockTransfer');
 
 foreach ($myTmpObjects as $myTmpObjectKey => $myTmpObjectArray) {
 	if ($myTmpObjectKey == 'MyObject') continue;
@@ -294,7 +294,7 @@ foreach ($myTmpObjects as $myTmpObjectKey => $myTmpObjectArray) {
 								}
 								print '</td>';
 
-								$nameofclass = ucfirst($myTmpObjectKey);
+								$nameofclass = $myTmpObjectArray['class'];
 								$mytmpinstance = new $nameofclass($db);
 								$mytmpinstance->initAsSpecimen();
 
diff --git a/htdocs/modulebuilder/template/admin/setup.php b/htdocs/modulebuilder/template/admin/setup.php
index 1c89e159e2c..68f55f65195 100644
--- a/htdocs/modulebuilder/template/admin/setup.php
+++ b/htdocs/modulebuilder/template/admin/setup.php
@@ -316,7 +316,7 @@ if ($action == 'edit') {
 $moduledir = 'mymodule';
 $myTmpObjects = array();
 // TODO Scan list of objects
-$myTmpObjects['myobject'] = array('label'=>'MyObject', 'includerefgeneration'=>0, 'includedocgeneration'=>0);
+$myTmpObjects['myobject'] = array('label'=>'MyObject', 'includerefgeneration'=>0, 'includedocgeneration'=>0, 'class'=>'MyObject');
 
 
 foreach ($myTmpObjects as $myTmpObjectKey => $myTmpObjectArray) {
@@ -392,7 +392,7 @@ foreach ($myTmpObjects as $myTmpObjectKey => $myTmpObjectArray) {
 								}
 								print '</td>';
 
-								$nameofclass = ucfirst($myTmpObjectKey);
+								$nameofclass = $myTmpObjectArray['class'];
 								$mytmpinstance = new $nameofclass($db);
 								$mytmpinstance->initAsSpecimen();