Fix playground

OpenSmock · Jun 24, 2024 · b6fb3d1 · b6fb3d1
1 parent 6bc246a
commit b6fb3d1
Showing 1 changed file with 14 additions and 7 deletions.
diff --git a/src/Pyramid/PyramidSpCodeObjectInteractionModel.class.st b/src/Pyramid/PyramidSpCodeObjectInteractionModel.class.st
@@ -12,31 +12,38 @@ Class {
 { #category : 'accessing' }
 PyramidSpCodeObjectInteractionModel >> doItReceiver [
 
-	self projectModel selection ifEmpty: [ ^ self projectModel firstLevelElements ].
-	self projectModel selection size = 1 ifTrue: [ ^self projectModel selection first ].
+	self projectModel selection ifEmpty: [
+		^ self projectModel firstLevelElements ].
+	self projectModel selection size = 1 ifTrue: [
+		^ self projectModel selection first ].
 	^ self projectModel selection asArray
 ]
 
 { #category : 'as yet unclassified' }
 PyramidSpCodeObjectInteractionModel >> doItReceiverString [
 
-	self projectModel selection ifEmpty: [ ^ 'the collection of first level elements' ].
+	self projectModel selection ifEmpty: [
+		^ 'the collection of first level elements' ].
 	self projectModel selection size = 1 ifTrue: [
 		^ 'the selected element' ].
 	^ 'an array of <1p> selected elements' expandMacrosWith:
 		  self projectModel selection size
 ]
 
+{ #category : 'as yet unclassified' }
+PyramidSpCodeObjectInteractionModel >> isScripting [
+
+	^ true
+]
+
 { #category : 'accessing' }
 PyramidSpCodeObjectInteractionModel >> projectModel [
 
 	^ projectModel
-
 ]
 
 { #category : 'accessing' }
-PyramidSpCodeObjectInteractionModel >> projectModel: aProjectModel [
-
-	projectModel := aProjectModel.
+PyramidSpCodeObjectInteractionModel >> projectModel: anObject [
 
+	projectModel := anObject
 ]