Merge Pharo12

pharo-spec · Dec 12, 2023 · ad523b0 · ad523b0
1 parent 58522aa
commit ad523b0
Show file tree

Hide file tree

Showing 6 changed files with 20 additions and 20 deletions.
diff --git a/...Tools-CodeCritiques/RPackage.extension.st → ...wTools-CodeCritiques/Package.extension.st b/...Tools-CodeCritiques/RPackage.extension.st → ...wTools-CodeCritiques/Package.extension.st
@@ -1,7 +1,7 @@
-Extension { #name : 'RPackage' }
+Extension { #name : 'Package' }
 
 { #category : '*NewTools-CodeCritiques' }
-RPackage >> criticNameOn: aStream [
+Package >> criticNameOn: aStream [
 	"This behavior may be folded later by changing the name of this method or using another one."
 
 	aStream << self packageName

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 |

diff --git a/src/NewTools-Scopes-Editor/Package.extension.st b/src/NewTools-Scopes-Editor/Package.extension.st
@@ -0,0 +1,6 @@
+Extension { #name : 'Package' }
+
+{ #category : '*NewTools-Scopes-Editor' }
+Package >> scopesIconName [
+	^ #package
+]
diff --git a/src/NewTools-Scopes-Editor/RPackage.extension.st b/src/NewTools-Scopes-Editor/RPackage.extension.st
diff --git a/...-Spotter-Extensions/RPackage.extension.st → ...s-Spotter-Extensions/Package.extension.st b/...-Spotter-Extensions/RPackage.extension.st → ...s-Spotter-Extensions/Package.extension.st
@@ -1,7 +1,7 @@
-Extension { #name : 'RPackage' }
+Extension { #name : 'Package' }
 
 { #category : '*NewTools-Spotter-Extensions' }
-RPackage >> spotterClassesFor: aStep [
+Package >> spotterClassesFor: aStep [
 	<stSpotterOrder: 20>
 	aStep listProcessor
 			allCandidates: [ self definedClasses sorted: [ :a :b | a name < b name ] ];
@@ -10,7 +10,7 @@ RPackage >> spotterClassesFor: aStep [
 ]
 
 { #category : '*NewTools-Spotter-Extensions' }
-RPackage >> spotterExtensionMethodsFor: aStep [
+Package >> spotterExtensionMethodsFor: aStep [
 	<stSpotterOrder: 30>
 	aStep listProcessor
 			allCandidates: [ self extensionMethods ];
@@ -19,7 +19,7 @@ RPackage >> spotterExtensionMethodsFor: aStep [
 ]
 
 { #category : '*NewTools-Spotter-Extensions' }
-RPackage >> spotterMonticelloPackageFor: aStep [
+Package >> spotterMonticelloPackageFor: aStep [
 	<stSpotterOrder: 41>
 
 	aStep listProcessor
@@ -32,7 +32,7 @@ RPackage >> spotterMonticelloPackageFor: aStep [
 ]
 
 { #category : '*NewTools-Spotter-Extensions' }
-RPackage >> spotterMonticelloWorkingCopyFor: aStep [
+Package >> spotterMonticelloWorkingCopyFor: aStep [
 	<stSpotterOrder: 42>
 	aStep listProcessor
 		title: 'Monticello Working Copy';
@@ -44,7 +44,7 @@ RPackage >> spotterMonticelloWorkingCopyFor: aStep [
 ]
 
 { #category : '*NewTools-Spotter-Extensions' }
-RPackage >> spotterTagsFor: aStep [
+Package >> spotterTagsFor: aStep [
 	<stSpotterOrder: 20>
 	self classTags size <= 1 ifTrue: [ ^ self ].
 	aStep listProcessor
@@ -55,7 +55,7 @@ RPackage >> spotterTagsFor: aStep [
 ]
 
 { #category : '*NewTools-Spotter-Extensions' }
-RPackage >> stActDefault [
+Package >> stActDefault [
 
 	^ Smalltalk tools browser openOnPackage: self
 ]
diff --git a/...otter-Extensions/RPackageTag.extension.st → ...potter-Extensions/PackageTag.extension.st b/...otter-Extensions/RPackageTag.extension.st → ...potter-Extensions/PackageTag.extension.st
@@ -1,7 +1,7 @@
-Extension { #name : 'RPackageTag' }
+Extension { #name : 'PackageTag' }
 
 { #category : '*NewTools-Spotter-Extensions' }
-RPackageTag >> spotterClassesFor: aStep [
+PackageTag >> spotterClassesFor: aStep [
 	<stSpotterOrder: 20>
 	aStep listProcessor
 			allCandidates: [ self classes sorted: [ :a :b | a name < b name ] ];