Merge pull request #636 from MarcusDenker/248-Definition-pane-on-clas…

…s-inspector-should-let-the-user-edit-the-text-and-the-context-should-be-the-class- 248-Definition-pane-on-class-inspector-should-let-the-user-edit-the-text-and-the-context-should-be-the-class-
pharo-spec · Dec 14, 2023 · 10a107a · 10a107a
2 parents 00c51ee + 9ad516e
commit 10a107a
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/src/NewTools-Inspector-Extensions/Class.extension.st b/src/NewTools-Inspector-Extensions/Class.extension.st
@@ -46,7 +46,7 @@ Class >> inspectionClassDefinition [
 
 	<inspectorPresentationOrder: 915 title: 'Definition'>
 	^ SpCodePresenter new
-		  beForScripting;
+		  beForObject: self;
 		  text: self definitionString;
-		  beNotEditable
+		  whenSubmitDo: [ :code | (Smalltalk compiler evaluate: code) fluidInstall ]
 ]
diff --git a/...nspector-Extensions/RPackage.extension.st → ...Inspector-Extensions/Package.extension.st b/...nspector-Extensions/RPackage.extension.st → ...Inspector-Extensions/Package.extension.st
@@ -1,7 +1,7 @@
-Extension { #name : 'RPackage' }
+Extension { #name : 'Package' }
 
 { #category : '*NewTools-Inspector-Extensions' }
-RPackage >> baselineInspector [
+Package >> baselineInspector [
 
 	<inspectorPresentationOrder: 2 title: 'Belongs to Baselines'>
 	| items |
@@ -12,7 +12,7 @@ RPackage >> baselineInspector [
 ]
 
 { #category : '*NewTools-Inspector-Extensions' }
-RPackage >> overwiew [
+Package >> overwiew [
 
 	<inspectorPresentationOrder: 1 title: 'Overwiew'>
 	| items |