From be55c39f408e16ea865be72e753902fc8e7c72e7 Mon Sep 17 00:00:00 2001
From: lsafina <safinalrr@gmail.com>
Date: Fri, 24 Feb 2023 16:32:08 +0100
Subject: [PATCH] fixed by creating undefinedName on MooseObject returning
 #noname.

---
 src/Moose-Core/MooseModel.class.st  | 2 +-
 src/Moose-Core/MooseObject.class.st | 8 +++++++-
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/src/Moose-Core/MooseModel.class.st b/src/Moose-Core/MooseModel.class.st
index ab6cf2bd..56708756 100644
--- a/src/Moose-Core/MooseModel.class.st
+++ b/src/Moose-Core/MooseModel.class.st
@@ -644,7 +644,7 @@ MooseModel >> inferNamespaceParentsBasedOnNames [
 { #category : #initialization }
 MooseModel >> initialize [
 	super initialize.
-	name := #noname.
+	name := self class undefinedName. 
 	self metamodel: self class metamodel
 ]
 
diff --git a/src/Moose-Core/MooseObject.class.st b/src/Moose-Core/MooseObject.class.st
index 637b7fb8..7e656946 100644
--- a/src/Moose-Core/MooseObject.class.st
+++ b/src/Moose-Core/MooseObject.class.st
@@ -179,6 +179,12 @@ MooseObject class >> superclassesAndFamixTraits [
 	^ self cache directAt: #superclassesAndFamixTraits
 ]
 
+{ #category : #accessing }
+MooseObject class >> undefinedName [
+
+	^ #noname
+]
+
 { #category : #testing }
 MooseObject class >> usedStatefulTraits [
 	^ self cache directAt: #usedStatefulTraits
@@ -426,7 +432,7 @@ MooseObject >> mooseNameOn: aStream [
 
 { #category : #accessing }
 MooseObject >> name [
-	^ #noname
+	^ self class undefinedName
 ]
 
 { #category : #accessing }