From 09162b74af0f82af5067ea992f5199ee95ea4a57 Mon Sep 17 00:00:00 2001
From: Nyan11 <y.legoff97@gmail.com>
Date: Thu, 18 Jan 2024 16:31:03 +0100
Subject: [PATCH] Fix tests + plugin for tests

---
 src/Pyramid-Tests/PyramidFakePlugin.class.st  | 6 ++++++
 src/Pyramid-Tests/PyramidFakePluginA.class.st | 6 ++++++
 src/Pyramid-Tests/PyramidFakePluginB.class.st | 6 ++++++
 src/Pyramid-Tests/PyramidFakePluginC.class.st | 6 ++++++
 src/Pyramid-Tests/PyramidFakePluginD.class.st | 6 ++++++
 src/Pyramid-Tests/PyramidFakePluginE.class.st | 6 ++++++
 src/Pyramid-Tests/PyramidFakePluginF.class.st | 6 ++++++
 src/Pyramid-Tests/PyramidFakePluginG.class.st | 6 ++++++
 src/Pyramid/PyramidMessageItem.class.st       | 6 ++++++
 src/Pyramid/PyramidPluginManager.class.st     | 4 ++--
 src/Pyramid/TPyramidPlugin.trait.st           | 6 ++++++
 11 files changed, 62 insertions(+), 2 deletions(-)

diff --git a/src/Pyramid-Tests/PyramidFakePlugin.class.st b/src/Pyramid-Tests/PyramidFakePlugin.class.st
index 57652232..7152cfe6 100644
--- a/src/Pyramid-Tests/PyramidFakePlugin.class.st
+++ b/src/Pyramid-Tests/PyramidFakePlugin.class.st
@@ -16,6 +16,12 @@ PyramidFakePlugin class >> initialize [
 
 ]
 
+{ #category : #testing }
+PyramidFakePlugin class >> isTestPlugin [
+
+	^ true
+]
+
 { #category : #adding }
 PyramidFakePlugin >> addPanelsOn: aPyramidSimpleWindow [
 
diff --git a/src/Pyramid-Tests/PyramidFakePluginA.class.st b/src/Pyramid-Tests/PyramidFakePluginA.class.st
index 6cbf0296..82f53a51 100644
--- a/src/Pyramid-Tests/PyramidFakePluginA.class.st
+++ b/src/Pyramid-Tests/PyramidFakePluginA.class.st
@@ -19,3 +19,9 @@ PyramidFakePluginA class >> initialize [
 	<script>
 
 ]
+
+{ #category : #testing }
+PyramidFakePluginA class >> isTestPlugin [
+
+	^ true
+]
diff --git a/src/Pyramid-Tests/PyramidFakePluginB.class.st b/src/Pyramid-Tests/PyramidFakePluginB.class.st
index 94dce1f9..2379ab02 100644
--- a/src/Pyramid-Tests/PyramidFakePluginB.class.st
+++ b/src/Pyramid-Tests/PyramidFakePluginB.class.st
@@ -19,3 +19,9 @@ PyramidFakePluginB class >> initialize [
 	<script>
 
 ]
+
+{ #category : #testing }
+PyramidFakePluginB class >> isTestPlugin [
+
+	^ true
+]
diff --git a/src/Pyramid-Tests/PyramidFakePluginC.class.st b/src/Pyramid-Tests/PyramidFakePluginC.class.st
index aebab9c9..d9770777 100644
--- a/src/Pyramid-Tests/PyramidFakePluginC.class.st
+++ b/src/Pyramid-Tests/PyramidFakePluginC.class.st
@@ -19,3 +19,9 @@ PyramidFakePluginC class >> initialize [
 	<script>
 
 ]
+
+{ #category : #testing }
+PyramidFakePluginC class >> isTestPlugin [
+
+	^ true
+]
diff --git a/src/Pyramid-Tests/PyramidFakePluginD.class.st b/src/Pyramid-Tests/PyramidFakePluginD.class.st
index d790eaa5..508c03b7 100644
--- a/src/Pyramid-Tests/PyramidFakePluginD.class.st
+++ b/src/Pyramid-Tests/PyramidFakePluginD.class.st
@@ -19,3 +19,9 @@ PyramidFakePluginD class >> initialize [
 	<script>
 
 ]
+
+{ #category : #testing }
+PyramidFakePluginD class >> isTestPlugin [
+
+	^ true
+]
diff --git a/src/Pyramid-Tests/PyramidFakePluginE.class.st b/src/Pyramid-Tests/PyramidFakePluginE.class.st
index d47fd9d8..f3618f8b 100644
--- a/src/Pyramid-Tests/PyramidFakePluginE.class.st
+++ b/src/Pyramid-Tests/PyramidFakePluginE.class.st
@@ -19,3 +19,9 @@ PyramidFakePluginE class >> initialize [
 	<script>
 
 ]
+
+{ #category : #testing }
+PyramidFakePluginE class >> isTestPlugin [
+
+	^ true
+]
diff --git a/src/Pyramid-Tests/PyramidFakePluginF.class.st b/src/Pyramid-Tests/PyramidFakePluginF.class.st
index f0d30341..551725a1 100644
--- a/src/Pyramid-Tests/PyramidFakePluginF.class.st
+++ b/src/Pyramid-Tests/PyramidFakePluginF.class.st
@@ -19,3 +19,9 @@ PyramidFakePluginF class >> initialize [
 	<script>
 
 ]
+
+{ #category : #testing }
+PyramidFakePluginF class >> isTestPlugin [
+
+	^ true
+]
diff --git a/src/Pyramid-Tests/PyramidFakePluginG.class.st b/src/Pyramid-Tests/PyramidFakePluginG.class.st
index 62e76f6f..aac0be45 100644
--- a/src/Pyramid-Tests/PyramidFakePluginG.class.st
+++ b/src/Pyramid-Tests/PyramidFakePluginG.class.st
@@ -19,3 +19,9 @@ PyramidFakePluginG class >> initialize [
 	<script>
 
 ]
+
+{ #category : #testing }
+PyramidFakePluginG class >> isTestPlugin [
+
+	^ true
+]
diff --git a/src/Pyramid/PyramidMessageItem.class.st b/src/Pyramid/PyramidMessageItem.class.st
index ae46608c..49bcc518 100644
--- a/src/Pyramid/PyramidMessageItem.class.st
+++ b/src/Pyramid/PyramidMessageItem.class.st
@@ -4,6 +4,12 @@ Class {
 	#category : #'Pyramid-views'
 }
 
+{ #category : #comparing }
+PyramidMessageItem >> <= aPyramidMessageItems [
+
+	^ true.
+]
+
 { #category : #adding }
 PyramidMessageItem >> addOnLayout: aLayout [
 
diff --git a/src/Pyramid/PyramidPluginManager.class.st b/src/Pyramid/PyramidPluginManager.class.st
index 75c46268..53270dad 100644
--- a/src/Pyramid/PyramidPluginManager.class.st
+++ b/src/Pyramid/PyramidPluginManager.class.st
@@ -26,9 +26,9 @@ PyramidPluginManager class >> cleanUp: anObject [
 
 { #category : #initialization }
 PyramidPluginManager class >> imagePluginClasses [
-	<script: 'self imagePluginClasses inspect'>
 
-	^ TPyramidPlugin users
+	<script: 'self imagePluginClasses inspect'>
+	^ TPyramidPlugin users reject: [ :each | each isTestPlugin ]
 ]
 
 { #category : #initialization }
diff --git a/src/Pyramid/TPyramidPlugin.trait.st b/src/Pyramid/TPyramidPlugin.trait.st
index 95e848c0..99965626 100644
--- a/src/Pyramid/TPyramidPlugin.trait.st
+++ b/src/Pyramid/TPyramidPlugin.trait.st
@@ -32,6 +32,12 @@ TPyramidPlugin classSide >> install [
 	"Do some stuff here when the plugin used class oriented behavior"
 ]
 
+{ #category : #testing }
+TPyramidPlugin classSide >> isTestPlugin [
+
+	^ false
+]
+
 { #category : #initialization }
 TPyramidPlugin classSide >> reset [