From 2de31c4c4bf11c2f069b33d361618b5f1c47c014 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Mart=C3=ADn=20Dias?= <tinchodias@gmail.com>
Date: Mon, 1 Feb 2021 13:44:23 -0300
Subject: [PATCH] Fix an issue when merging into P9.0

Remove extension to Iceberg-Plugin-Calypso... It's fixed in other way in
https://github.com/pharo-project/pharo/pull/8461/
---
 ...lyIcebergShowMethodVersionCommand.extension.st | 13 -------------
 .../IceTipVersionHistoryBrowser.class.st          | 15 ---------------
 2 files changed, 28 deletions(-)
 delete mode 100644 Iceberg-Plugin-Calypso/ClyIcebergShowMethodVersionCommand.extension.st

diff --git a/Iceberg-Plugin-Calypso/ClyIcebergShowMethodVersionCommand.extension.st b/Iceberg-Plugin-Calypso/ClyIcebergShowMethodVersionCommand.extension.st
deleted file mode 100644
index 0399d706dd..0000000000
--- a/Iceberg-Plugin-Calypso/ClyIcebergShowMethodVersionCommand.extension.st
+++ /dev/null
@@ -1,13 +0,0 @@
-Extension { #name : #ClyIcebergShowMethodVersionCommand }
-
-{ #category : #'*Iceberg-Plugin-Calypso' }
-ClyIcebergShowMethodVersionCommand >> execute [
-
-	| browserClass |
-	browserClass := #IceTipVersionHistoryBrowser
-		asClassInEnvironment: self class environment
-		ifAbsent: [ #IceTipExtendedVersionBrowser asClass ].
-		
-	(browserClass repository: repository method: method) open
-
-]
diff --git a/Iceberg-TipUI/IceTipVersionHistoryBrowser.class.st b/Iceberg-TipUI/IceTipVersionHistoryBrowser.class.st
index 3a0e60c95d..ddc02ddafc 100644
--- a/Iceberg-TipUI/IceTipVersionHistoryBrowser.class.st
+++ b/Iceberg-TipUI/IceTipVersionHistoryBrowser.class.st
@@ -53,13 +53,6 @@ IceTipVersionHistoryBrowser class >> onRepository: aRepository method: aMethod [
 		beCached
 ]
 
-{ #category : #'backward compatibility' }
-IceTipVersionHistoryBrowser class >> repository: repository method: method [ 
-	"The Calypso command uses this selector to instantiate the browser."
-
-	^ self onRepository: repository method: method
-]
-
 { #category : #accessing }
 IceTipVersionHistoryBrowser >> commitList [
 
@@ -191,14 +184,6 @@ IceTipVersionHistoryBrowser >> newVersionInfoPresenter [
 	^ IceTipReadOnlyFormBuilder newBuiltFor: selectedModel info
 ]
 
-{ #category : #'backward compatibility' }
-IceTipVersionHistoryBrowser >> open [
-	"Calypso's ClyIcebergShowMethodVersionCommand uses this selector to open the browser."
-	<deprecated>
-
-	^ self openWithSpec
-]
-
 { #category : #accessing }
 IceTipVersionHistoryBrowser >> refresh [