diff --git a/Iceberg-Libgit/TIceRepositoryReader.trait.st b/Iceberg-Libgit/TIceRepositoryReader.trait.st
index 452e058883..c046025405 100644
--- a/Iceberg-Libgit/TIceRepositoryReader.trait.st
+++ b/Iceberg-Libgit/TIceRepositoryReader.trait.st
@@ -8,11 +8,6 @@ Trait {
 	#tag : 'Writing'
 }
 
-{ #category : 'accessing' }
-TIceRepositoryReader classSide >> id [
-	^ self required
-]
-
 { #category : 'testing' }
 TIceRepositoryReader classSide >> isLegacyDefault [
 	^ false
diff --git a/Iceberg-Libgit/TIceRepositoryWriter.trait.st b/Iceberg-Libgit/TIceRepositoryWriter.trait.st
index ae87f6b5d8..7bd3adf887 100644
--- a/Iceberg-Libgit/TIceRepositoryWriter.trait.st
+++ b/Iceberg-Libgit/TIceRepositoryWriter.trait.st
@@ -8,11 +8,6 @@ Trait {
 	#tag : 'Writing'
 }
 
-{ #category : 'accessing' }
-TIceRepositoryWriter classSide >> id [
-	^ self required
-]
-
 { #category : 'testing' }
 TIceRepositoryWriter classSide >> isDefault [
 	"Indicates when this is default when create new repositories"
diff --git a/Iceberg-TipUI/IceTipInspectCommand.class.st b/Iceberg-TipUI/IceTipInspectCommand.class.st
index f5ef0d83c4..4449299ed3 100644
--- a/Iceberg-TipUI/IceTipInspectCommand.class.st
+++ b/Iceberg-TipUI/IceTipInspectCommand.class.st
@@ -38,13 +38,3 @@ IceTipInspectCommand >> iconName [
 
 	^ #glamorousInspect
 ]
-
-{ #category : 'accessing' }
-IceTipInspectCommand >> item [
-
-	| maybeCachedObject |
-	maybeCachedObject := super item.
-	
-	^ (maybeCachedObject respondsTo: #realObject)
-		ifTrue: [ maybeCachedObject realObject ] ifFalse: [ maybeCachedObject ]
-]
diff --git a/Iceberg-TipUI/IceTipPackageModel.class.st b/Iceberg-TipUI/IceTipPackageModel.class.st
index 62d562d8de..3d1eaba349 100644
--- a/Iceberg-TipUI/IceTipPackageModel.class.st
+++ b/Iceberg-TipUI/IceTipPackageModel.class.st
@@ -12,7 +12,7 @@ Class {
 	#tag : 'Model'
 }
 
-{ #category : 'as yet unclassified' }
+{ #category : 'instance creation' }
 IceTipPackageModel class >> workingCopyModel: aWorkingCopyModel on: aPackage [
 
 	^ (self