Merge pull request #70 from pharo-graphics/deprecations

Fix deprecated usages

src/Roassal-Pharo/StInspectorPresenter.class.st

@@ -0,0 +1,5 @@
+Class {
+	#name : #StInspectorPresenter,
+	#superclass : #StInspector,
+	#category : #'Roassal-Pharo'
+}

src/Roassal/RSCamera.class.st

@@ -55,7 +55,7 @@ RSCamera class >> example [
 	canvas := RSCanvas new.
 	camera canvas: canvas.
 	canvas camera: camera.
-	^ StInspector openOn: camera
+	^ StInspectorPresenter openOn: camera
 ]
 
 { #category : 'utilities' }

src/Roassal/RSObjectWithProperty.class.st

@@ -27,15 +27,15 @@ RSObjectWithProperty class >> exampleCanvas [
 	| c |
 	c := RSCanvas new.
 	c propertyAt: #rick put: #morty.
-	^ StInspector openOn: c properties
+	^ StInspectorPresenter openOn: c properties
 ]
 
 { #category : 'examples' }
 RSObjectWithProperty class >> exampleShapeBox [
 	| shape |
 	shape := RSBox new.
 	shape propertyAt: #randy put: #stan.
-	^ StInspector openOn: shape properties
+	^ StInspectorPresenter openOn: shape properties
 ]
 
 { #category : 'interactions' }

src/Roassal/RSShape.class.st

@@ -53,21 +53,21 @@ Class {
 RSShape class >> exampleBox [
 	| box |
 	box := RSBox new.
-	^ StInspector openOn: box
+	^ StInspectorPresenter openOn: box
 ]
 
 { #category : 'examples' }
 RSShape class >> exampleLabel [
 	| lb |
 	lb := RSLabel text: 'Roassal'.
-	^ StInspector openOn: lb
+	^ StInspectorPresenter openOn: lb
 ]
 
 { #category : 'examples' }
 RSShape class >> exampleLine [
 	| l |
 	l := RSLine new controlPoints: {10@10. 20@20}.
-	^ StInspector openOn: l
+	^ StInspectorPresenter openOn: l
 ]
 
 { #category : 'accessing' }