diff --git a/Iceberg-Plugin-GitHub/IceGitHubAcceptPullRequestModel.class.st b/Iceberg-Plugin-GitHub/IceGitHubAcceptPullRequestModel.class.st index 718e3cd55b..285fb8896c 100644 --- a/Iceberg-Plugin-GitHub/IceGitHubAcceptPullRequestModel.class.st +++ b/Iceberg-Plugin-GitHub/IceGitHubAcceptPullRequestModel.class.st @@ -61,12 +61,6 @@ IceGitHubAcceptPullRequestModel >> defaultType [ ^ 'merge' ] -{ #category : 'api' } -IceGitHubAcceptPullRequestModel >> initialExtentForWindow [ - - ^ (600 @ 300) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceGitHubAcceptPullRequestModel >> initializeDialogWindow: aDialogWindowPresenter [ diff --git a/Iceberg-Plugin-GitHub/IceGitHubCreatePullRequestModel.class.st b/Iceberg-Plugin-GitHub/IceGitHubCreatePullRequestModel.class.st index 4f6b199839..d9b134fe60 100644 --- a/Iceberg-Plugin-GitHub/IceGitHubCreatePullRequestModel.class.st +++ b/Iceberg-Plugin-GitHub/IceGitHubCreatePullRequestModel.class.st @@ -249,12 +249,6 @@ IceGitHubCreatePullRequestModel >> headRemote [ ^ headRemote ifNil: [ self repository head upstream remote ] ] -{ #category : 'initialization' } -IceGitHubCreatePullRequestModel >> initialExtentForWindow [ - - ^ (700 @ 300) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceGitHubCreatePullRequestModel >> initializeDialogWindow: aWindow [ diff --git a/Iceberg-Plugin-GitHub/IceGitHubNewBranchFromIssuePanel.class.st b/Iceberg-Plugin-GitHub/IceGitHubNewBranchFromIssuePanel.class.st index f4c042fefd..bcd999c8c4 100644 --- a/Iceberg-Plugin-GitHub/IceGitHubNewBranchFromIssuePanel.class.st +++ b/Iceberg-Plugin-GitHub/IceGitHubNewBranchFromIssuePanel.class.st @@ -56,12 +56,6 @@ IceGitHubNewBranchFromIssuePanel >> icon [ ^ (self iconNamed: #github) scaledToSize: 16@16 ] -{ #category : 'initialization' } -IceGitHubNewBranchFromIssuePanel >> initialExtentForWindow [ - - ^ 800 @ 175 -] - { #category : 'initialization' } IceGitHubNewBranchFromIssuePanel >> initialize [ diff --git a/Iceberg-Plugin-GitHub/IceGitHubRejectPullRequestModel.class.st b/Iceberg-Plugin-GitHub/IceGitHubRejectPullRequestModel.class.st index 2b031b6088..94ed43ca93 100644 --- a/Iceberg-Plugin-GitHub/IceGitHubRejectPullRequestModel.class.st +++ b/Iceberg-Plugin-GitHub/IceGitHubRejectPullRequestModel.class.st @@ -57,12 +57,6 @@ IceGitHubRejectPullRequestModel >> defaultType [ ^ 'merge' ] -{ #category : 'api' } -IceGitHubRejectPullRequestModel >> initialExtentForWindow [ - - ^ (500 @ 250) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceGitHubRejectPullRequestModel >> initializeDialogWindow: aDialogWindowPresenter [ diff --git a/Iceberg-Plugin-GitHub/IceGitHubRemoveBranchesModel.class.st b/Iceberg-Plugin-GitHub/IceGitHubRemoveBranchesModel.class.st index 79841ebbb5..af9bf041b3 100644 --- a/Iceberg-Plugin-GitHub/IceGitHubRemoveBranchesModel.class.st +++ b/Iceberg-Plugin-GitHub/IceGitHubRemoveBranchesModel.class.st @@ -38,12 +38,6 @@ IceGitHubRemoveBranchesModel >> displayBlock: aBlock [ displayBlock := aBlock ] -{ #category : 'initialization' } -IceGitHubRemoveBranchesModel >> initialExtentForWindow [ - - ^ 550 @ 500 -] - { #category : 'initialization' } IceGitHubRemoveBranchesModel >> initialize [ diff --git a/Iceberg-Plugin-GitHub/IceGitHubTipPullRequestBrowser.class.st b/Iceberg-Plugin-GitHub/IceGitHubTipPullRequestBrowser.class.st index c7722406bf..bae4d949b6 100644 --- a/Iceberg-Plugin-GitHub/IceGitHubTipPullRequestBrowser.class.st +++ b/Iceberg-Plugin-GitHub/IceGitHubTipPullRequestBrowser.class.st @@ -126,12 +126,6 @@ IceGitHubTipPullRequestBrowser >> diff [ ^ diff ] -{ #category : 'initialization' } -IceGitHubTipPullRequestBrowser >> initialExtentForWindow [ - - ^ (1050 @ 800) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceGitHubTipPullRequestBrowser >> initializeCommitsTable [ diff --git a/Iceberg-Plugin-GitHub/IceTipGitHubPullRequestListBrowser.class.st b/Iceberg-Plugin-GitHub/IceTipGitHubPullRequestListBrowser.class.st index 779ae03307..e81ed49aab 100644 --- a/Iceberg-Plugin-GitHub/IceTipGitHubPullRequestListBrowser.class.st +++ b/Iceberg-Plugin-GitHub/IceTipGitHubPullRequestListBrowser.class.st @@ -100,12 +100,6 @@ IceTipGitHubPullRequestListBrowser >> fetchPullRequests [ yourself ] ] -{ #category : 'initialization' } -IceTipGitHubPullRequestListBrowser >> initialExtentForWindow [ - - ^ (700 @ 700) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipGitHubPullRequestListBrowser >> initializePresenters [ diff --git a/Iceberg-Plugin-Migration/IceTipFiletreeToTonelDialogPresenter.class.st b/Iceberg-Plugin-Migration/IceTipFiletreeToTonelDialogPresenter.class.st index f31a85dbe3..38a0aff50f 100644 --- a/Iceberg-Plugin-Migration/IceTipFiletreeToTonelDialogPresenter.class.st +++ b/Iceberg-Plugin-Migration/IceTipFiletreeToTonelDialogPresenter.class.st @@ -94,14 +94,6 @@ IceTipFiletreeToTonelDialogPresenter >> iconPanel [ ^ iconPanel ] -{ #category : 'initialization' } -IceTipFiletreeToTonelDialogPresenter >> initialExtentForWindow [ - - ^ (500 - @ (self class inputTextHeight * 5 + self class buttonHeight + 50)) - scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipFiletreeToTonelDialogPresenter >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipAddPlaintextCredentialsPresenter.class.st b/Iceberg-TipUI/IceTipAddPlaintextCredentialsPresenter.class.st index 2f8b7bac67..7b7b9f970f 100644 --- a/Iceberg-TipUI/IceTipAddPlaintextCredentialsPresenter.class.st +++ b/Iceberg-TipUI/IceTipAddPlaintextCredentialsPresenter.class.st @@ -43,13 +43,6 @@ IceTipAddPlaintextCredentialsPresenter >> hostnameFromInput [ ^ hostInput text ] -{ #category : 'initialization' } -IceTipAddPlaintextCredentialsPresenter >> initialExtentForWindow [ - - ^ (350 @ (self class inputTextHeight * 5 + self class buttonHeight)) - scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipAddPlaintextCredentialsPresenter >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipAddRemoteDialogPresenter.class.st b/Iceberg-TipUI/IceTipAddRemoteDialogPresenter.class.st index 9b4753b75b..54b5b8c803 100644 --- a/Iceberg-TipUI/IceTipAddRemoteDialogPresenter.class.st +++ b/Iceberg-TipUI/IceTipAddRemoteDialogPresenter.class.st @@ -49,16 +49,6 @@ IceTipAddRemoteDialogPresenter >> defaultLayout [ ] -{ #category : 'initialization' } -IceTipAddRemoteDialogPresenter >> initialExtentForWindow [ - - ^ (500@( - self class inputTextHeight * 2 - + self class buttonHeight - + 50 "Yes, a magic number" - )) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipAddRemoteDialogPresenter >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipAddSSHCredentialsPresenter.class.st b/Iceberg-TipUI/IceTipAddSSHCredentialsPresenter.class.st index 000387af13..9b0e20ade9 100644 --- a/Iceberg-TipUI/IceTipAddSSHCredentialsPresenter.class.st +++ b/Iceberg-TipUI/IceTipAddSSHCredentialsPresenter.class.st @@ -44,13 +44,6 @@ IceTipAddSSHCredentialsPresenter >> hostnameFromInput [ ^ hostInput text ] -{ #category : 'initialization' } -IceTipAddSSHCredentialsPresenter >> initialExtentForWindow [ - - ^ (350 @ (self class inputTextHeight * 7 + self class buttonHeight)) - scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipAddSSHCredentialsPresenter >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipAddTokenCredentialsPresenter.class.st b/Iceberg-TipUI/IceTipAddTokenCredentialsPresenter.class.st index 1213895e5a..34eadcafef 100644 --- a/Iceberg-TipUI/IceTipAddTokenCredentialsPresenter.class.st +++ b/Iceberg-TipUI/IceTipAddTokenCredentialsPresenter.class.st @@ -49,12 +49,6 @@ IceTipAddTokenCredentialsPresenter >> hostnameFromInput [ ^ hostInput text ] -{ #category : 'initialization' } -IceTipAddTokenCredentialsPresenter >> initialExtentForWindow [ - - ^ (350 @ (self class inputTextHeight * 5 + self class buttonHeight)) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipAddTokenCredentialsPresenter >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipAskForPlaintextCredentialsPresenter.class.st b/Iceberg-TipUI/IceTipAskForPlaintextCredentialsPresenter.class.st index 4b2f0a17a5..385e26b492 100644 --- a/Iceberg-TipUI/IceTipAskForPlaintextCredentialsPresenter.class.st +++ b/Iceberg-TipUI/IceTipAskForPlaintextCredentialsPresenter.class.st @@ -51,12 +51,6 @@ IceTipAskForPlaintextCredentialsPresenter >> defaultLayout [ ] -{ #category : 'initialization' } -IceTipAskForPlaintextCredentialsPresenter >> initialExtentForWindow [ - - ^ (450 @ 180) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipAskForPlaintextCredentialsPresenter >> titleForWindow [ diff --git a/Iceberg-TipUI/IceTipAskForPlaintextOtpCredentialsPresenter.class.st b/Iceberg-TipUI/IceTipAskForPlaintextOtpCredentialsPresenter.class.st index a09708da7a..106521be73 100644 --- a/Iceberg-TipUI/IceTipAskForPlaintextOtpCredentialsPresenter.class.st +++ b/Iceberg-TipUI/IceTipAskForPlaintextOtpCredentialsPresenter.class.st @@ -33,12 +33,6 @@ IceTipAskForPlaintextOtpCredentialsPresenter >> defaultLayout [ yourself ] -{ #category : 'initialization' } -IceTipAskForPlaintextOtpCredentialsPresenter >> initialExtentForWindow [ - - ^ (350 @ 210) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipAskForPlaintextOtpCredentialsPresenter >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipBrowser.class.st b/Iceberg-TipUI/IceTipBrowser.class.st index 72180a30b3..e2a7a0523c 100644 --- a/Iceberg-TipUI/IceTipBrowser.class.st +++ b/Iceberg-TipUI/IceTipBrowser.class.st @@ -125,12 +125,6 @@ IceTipBrowser >> iconForWindow [ ^ self iconNamed: #komitterSmalltalkhubRemote ] -{ #category : 'initialization' } -IceTipBrowser >> initialExtentForWindow [ - - ^ (600 @ 400) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipBrowser >> initialize [ diff --git a/Iceberg-TipUI/IceTipCheckoutBranchDialog.class.st b/Iceberg-TipUI/IceTipCheckoutBranchDialog.class.st index 097679579b..b733a47a83 100644 --- a/Iceberg-TipUI/IceTipCheckoutBranchDialog.class.st +++ b/Iceberg-TipUI/IceTipCheckoutBranchDialog.class.st @@ -62,12 +62,6 @@ IceTipCheckoutBranchDialog >> doAccept [ self selectedType doAccept ] -{ #category : 'initialization' } -IceTipCheckoutBranchDialog >> initialExtentForWindow [ - - ^ (600 @ 400) scaledByDisplayScaleFactor -] - { #category : 'accessing' } IceTipCheckoutBranchDialog >> model [ diff --git a/Iceberg-TipUI/IceTipCherrypickPreviewBrowser.class.st b/Iceberg-TipUI/IceTipCherrypickPreviewBrowser.class.st index 798ffdd9cc..556d42b3ce 100644 --- a/Iceberg-TipUI/IceTipCherrypickPreviewBrowser.class.st +++ b/Iceberg-TipUI/IceTipCherrypickPreviewBrowser.class.st @@ -65,12 +65,6 @@ IceTipCherrypickPreviewBrowser >> doCherryPick [ self closeWindow ] -{ #category : 'initialization' } -IceTipCherrypickPreviewBrowser >> initialExtentForWindow [ - - ^ (800 @ 600) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipCherrypickPreviewBrowser >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipCommitBrowser.class.st b/Iceberg-TipUI/IceTipCommitBrowser.class.st index e22cd4ac9b..80ab10a6c1 100644 --- a/Iceberg-TipUI/IceTipCommitBrowser.class.st +++ b/Iceberg-TipUI/IceTipCommitBrowser.class.st @@ -146,12 +146,6 @@ IceTipCommitBrowser >> doExpandSelection [ diffPanel doExpandSelection ] -{ #category : 'initialization' } -IceTipCommitBrowser >> initialExtentForWindow [ - - ^ (800@600) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipCommitBrowser >> initialize [ diff --git a/Iceberg-TipUI/IceTipDiscardAllChangesPreviewBrowser.class.st b/Iceberg-TipUI/IceTipDiscardAllChangesPreviewBrowser.class.st index 5828afca68..755196474e 100644 --- a/Iceberg-TipUI/IceTipDiscardAllChangesPreviewBrowser.class.st +++ b/Iceberg-TipUI/IceTipDiscardAllChangesPreviewBrowser.class.st @@ -28,12 +28,6 @@ IceTipDiscardAllChangesPreviewBrowser >> doDiscardAll [ executeWithContext: self ] -{ #category : 'initialization' } -IceTipDiscardAllChangesPreviewBrowser >> initialExtentForWindow [ - - ^ (900 @ 400) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipDiscardAllChangesPreviewBrowser >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipEditPlaintextCredentialsPresenter.class.st b/Iceberg-TipUI/IceTipEditPlaintextCredentialsPresenter.class.st index 69b089ff0d..0d67bcf9b7 100644 --- a/Iceberg-TipUI/IceTipEditPlaintextCredentialsPresenter.class.st +++ b/Iceberg-TipUI/IceTipEditPlaintextCredentialsPresenter.class.st @@ -32,12 +32,6 @@ IceTipEditPlaintextCredentialsPresenter >> defaultLayout [ yourself ] -{ #category : 'initialization' } -IceTipEditPlaintextCredentialsPresenter >> initialExtentForWindow [ - - ^ (350 @ 160) scaledByDisplayScaleFactor -] - { #category : 'actions' } IceTipEditPlaintextCredentialsPresenter >> refreshCredentialsFromPresenter [ diff --git a/Iceberg-TipUI/IceTipEditProjectDialogPresenter.class.st b/Iceberg-TipUI/IceTipEditProjectDialogPresenter.class.st index 8af8283653..840b938849 100644 --- a/Iceberg-TipUI/IceTipEditProjectDialogPresenter.class.st +++ b/Iceberg-TipUI/IceTipEditProjectDialogPresenter.class.st @@ -202,21 +202,6 @@ IceTipEditProjectDialogPresenter >> hasToShowWarning [ ^ model repository workingCopy packages isNotEmpty ] -{ #category : 'initialization' } -IceTipEditProjectDialogPresenter >> initialExtentForWindow [ - - ^ self hasToShowWarning - ifTrue: [ (475@525) scaledByDisplayScaleFactor ] - ifFalse: [ - (475@( - 200 "Tree" - + (self class inputTextHeight * 3) - + self class buttonHeight - + 75 "Yes, a magic number" - )) scaledByDisplayScaleFactor] - -] - { #category : 'initialization' } IceTipEditProjectDialogPresenter >> initialize [ diff --git a/Iceberg-TipUI/IceTipEditSSHCredentialsPresenter.class.st b/Iceberg-TipUI/IceTipEditSSHCredentialsPresenter.class.st index 1b27b79384..1b576e2127 100644 --- a/Iceberg-TipUI/IceTipEditSSHCredentialsPresenter.class.st +++ b/Iceberg-TipUI/IceTipEditSSHCredentialsPresenter.class.st @@ -34,12 +34,6 @@ IceTipEditSSHCredentialsPresenter >> defaultLayout [ yourself ] -{ #category : 'initialization' } -IceTipEditSSHCredentialsPresenter >> initialExtentForWindow [ - - ^ (500@230) scaledByDisplayScaleFactor -] - { #category : 'actions' } IceTipEditSSHCredentialsPresenter >> refreshCredentialsFromPresenter [ diff --git a/Iceberg-TipUI/IceTipErrorDialogPresenter.class.st b/Iceberg-TipUI/IceTipErrorDialogPresenter.class.st index 48de31e6ed..f4bc6a0cab 100644 --- a/Iceberg-TipUI/IceTipErrorDialogPresenter.class.st +++ b/Iceberg-TipUI/IceTipErrorDialogPresenter.class.st @@ -70,16 +70,6 @@ IceTipErrorDialogPresenter >> iconPanel [ ^ iconPanel ] -{ #category : 'initialization' } -IceTipErrorDialogPresenter >> initialExtentForWindow [ - - ^ (500@( - self class inputTextHeight * 2 - + self class buttonHeight - + 50 "Yes, a magic number" - )) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipErrorDialogPresenter >> initializeDialogWindow: aWindow [ diff --git a/Iceberg-TipUI/IceTipGitUsernameAndEmailDialogPresenter.class.st b/Iceberg-TipUI/IceTipGitUsernameAndEmailDialogPresenter.class.st index 11f1f49c37..4213a3e9d7 100644 --- a/Iceberg-TipUI/IceTipGitUsernameAndEmailDialogPresenter.class.st +++ b/Iceberg-TipUI/IceTipGitUsernameAndEmailDialogPresenter.class.st @@ -80,12 +80,6 @@ IceTipGitUsernameAndEmailDialogPresenter >> globalCheckbox [ ^ globalCheckbox ] -{ #category : 'initialization' } -IceTipGitUsernameAndEmailDialogPresenter >> initialExtentForWindow [ - - ^ (400@200) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipGitUsernameAndEmailDialogPresenter >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipHistoryActionBrowser.class.st b/Iceberg-TipUI/IceTipHistoryActionBrowser.class.st index a123e1659f..c58162546c 100644 --- a/Iceberg-TipUI/IceTipHistoryActionBrowser.class.st +++ b/Iceberg-TipUI/IceTipHistoryActionBrowser.class.st @@ -43,12 +43,6 @@ IceTipHistoryActionBrowser >> commitsPanel: aSpPresenter [ commitsPanel := aSpPresenter ] -{ #category : 'initialization' } -IceTipHistoryActionBrowser >> initialExtentForWindow [ - - ^ (800@600) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipHistoryActionBrowser >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipHistoryBrowser.class.st b/Iceberg-TipUI/IceTipHistoryBrowser.class.st index 04ad0fc5bb..49d431bf9f 100644 --- a/Iceberg-TipUI/IceTipHistoryBrowser.class.st +++ b/Iceberg-TipUI/IceTipHistoryBrowser.class.st @@ -78,12 +78,6 @@ IceTipHistoryBrowser >> defaultLayout [ yourself ] -{ #category : 'initialization' } -IceTipHistoryBrowser >> initialExtentForWindow [ - - ^ (700 @ 700) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipHistoryBrowser >> initializeCommitList [ diff --git a/Iceberg-TipUI/IceTipLocalRepositoryPanel.class.st b/Iceberg-TipUI/IceTipLocalRepositoryPanel.class.st index 055eca89b6..35cb918bbd 100644 --- a/Iceberg-TipUI/IceTipLocalRepositoryPanel.class.st +++ b/Iceberg-TipUI/IceTipLocalRepositoryPanel.class.st @@ -42,16 +42,6 @@ IceTipLocalRepositoryPanel >> iconForWindow [ ^ self iconNamed: #smallOpen ] -{ #category : 'initialization' } -IceTipLocalRepositoryPanel >> initialExtentForWindow [ - - ^ (500@( - self class inputTextHeight * 2 - + self class buttonHeight - + 50 "Yes, a magic number" - )) scaledByDisplayScaleFactor -] - { #category : 'testing' } IceTipLocalRepositoryPanel >> isLocalRepository [ diff --git a/Iceberg-TipUI/IceTipMergeBranchDialogPresenter.class.st b/Iceberg-TipUI/IceTipMergeBranchDialogPresenter.class.st index ebb1d75815..6f8149c75b 100644 --- a/Iceberg-TipUI/IceTipMergeBranchDialogPresenter.class.st +++ b/Iceberg-TipUI/IceTipMergeBranchDialogPresenter.class.st @@ -65,12 +65,6 @@ IceTipMergeBranchDialogPresenter >> doAccept [ self selectedType doAccept ] -{ #category : 'initialization' } -IceTipMergeBranchDialogPresenter >> initialExtentForWindow [ - - ^ (600 @ 400) scaledByDisplayScaleFactor -] - { #category : 'accessing' } IceTipMergeBranchDialogPresenter >> model [ diff --git a/Iceberg-TipUI/IceTipOptionDialogPresenter.class.st b/Iceberg-TipUI/IceTipOptionDialogPresenter.class.st index 5933860b23..241455c79c 100644 --- a/Iceberg-TipUI/IceTipOptionDialogPresenter.class.st +++ b/Iceberg-TipUI/IceTipOptionDialogPresenter.class.st @@ -63,12 +63,6 @@ IceTipOptionDialogPresenter >> doAccept [ self subclassResponsibility ] -{ #category : 'initialization' } -IceTipOptionDialogPresenter >> initialExtentForWindow [ - - ^ (700 @ 300) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipOptionDialogPresenter >> initializeDialogWindow: aWindowPresenter [ diff --git a/Iceberg-TipUI/IceTipPresenter.class.st b/Iceberg-TipUI/IceTipPresenter.class.st index d5f542cff8..3dc38c8cba 100644 --- a/Iceberg-TipUI/IceTipPresenter.class.st +++ b/Iceberg-TipUI/IceTipPresenter.class.st @@ -51,15 +51,6 @@ IceTipPresenter >> iconForWindow [ ^ self iconNamed: #smallWindow ] -{ #category : 'initialization' } -IceTipPresenter >> initialExtentForWindow [ - "Answer either nil or a Point representing the initial extent of this presenter. - It is used during initialization if this presenter is opened inside a SpWindowPresenter. - Answer nil if there is not a suggested extent." - - ^ nil -] - { #category : 'initialization' } IceTipPresenter >> initializeWindow: aSpWindowPresenter [ diff --git a/Iceberg-TipUI/IceTipPreviewBrowser.class.st b/Iceberg-TipUI/IceTipPreviewBrowser.class.st index c31922360e..408921c2a1 100644 --- a/Iceberg-TipUI/IceTipPreviewBrowser.class.st +++ b/Iceberg-TipUI/IceTipPreviewBrowser.class.st @@ -55,12 +55,6 @@ IceTipPreviewBrowser >> diffPanel [ ^ diffPanel ] -{ #category : 'initialization' } -IceTipPreviewBrowser >> initialExtentForWindow [ - - ^ (800 @ 400) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipPreviewBrowser >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipRemovePackageDialogPresenter.class.st b/Iceberg-TipUI/IceTipRemovePackageDialogPresenter.class.st index b6ffefe89f..750c0e493e 100644 --- a/Iceberg-TipUI/IceTipRemovePackageDialogPresenter.class.st +++ b/Iceberg-TipUI/IceTipRemovePackageDialogPresenter.class.st @@ -56,14 +56,6 @@ IceTipRemovePackageDialogPresenter >> iconPanel [ ^ iconPanel ] -{ #category : 'initialization' } -IceTipRemovePackageDialogPresenter >> initialExtentForWindow [ - - ^ (500 - @ (self class inputTextHeight * 2 + self class buttonHeight + 75)) - scaledByDisplayScaleFactor "Yes, a magic number" -] - { #category : 'initialization' } IceTipRemovePackageDialogPresenter >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipRemoveRepositoryDialogPresenter.class.st b/Iceberg-TipUI/IceTipRemoveRepositoryDialogPresenter.class.st index 346aa129a7..43b016227a 100644 --- a/Iceberg-TipUI/IceTipRemoveRepositoryDialogPresenter.class.st +++ b/Iceberg-TipUI/IceTipRemoveRepositoryDialogPresenter.class.st @@ -61,16 +61,6 @@ IceTipRemoveRepositoryDialogPresenter >> iconPanel [ ^ iconPanel ] -{ #category : 'initialization' } -IceTipRemoveRepositoryDialogPresenter >> initialExtentForWindow [ - - ^ (500@( - self class inputTextHeight * 2 - + self class buttonHeight - + 50 "Yes, a magic number" - )) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipRemoveRepositoryDialogPresenter >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipRepairRepositoryDialogPresenter.class.st b/Iceberg-TipUI/IceTipRepairRepositoryDialogPresenter.class.st index 6564781359..2d18beb753 100644 --- a/Iceberg-TipUI/IceTipRepairRepositoryDialogPresenter.class.st +++ b/Iceberg-TipUI/IceTipRepairRepositoryDialogPresenter.class.st @@ -57,12 +57,6 @@ IceTipRepairRepositoryDialogPresenter >> detailPanel [ ^ detailPanel ] -{ #category : 'initialization' } -IceTipRepairRepositoryDialogPresenter >> initialExtentForWindow [ - - ^ (700 @ 500) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipRepairRepositoryDialogPresenter >> initializeDialogWindow: aWindow [ diff --git a/Iceberg-TipUI/IceTipRepositoriesBrowser.class.st b/Iceberg-TipUI/IceTipRepositoriesBrowser.class.st index ab659816e8..0d2894fea4 100644 --- a/Iceberg-TipUI/IceTipRepositoriesBrowser.class.st +++ b/Iceberg-TipUI/IceTipRepositoriesBrowser.class.st @@ -165,12 +165,6 @@ IceTipRepositoriesBrowser >> iconForWindow [ ^ self class iconForWorldMenu ] -{ #category : 'initialization' } -IceTipRepositoriesBrowser >> initialExtentForWindow [ - - ^ (600 @ 500) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipRepositoriesBrowser >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipRepositoryBrowser.class.st b/Iceberg-TipUI/IceTipRepositoryBrowser.class.st index 52d06161f5..34c2ff7b20 100644 --- a/Iceberg-TipUI/IceTipRepositoryBrowser.class.st +++ b/Iceberg-TipUI/IceTipRepositoryBrowser.class.st @@ -105,12 +105,6 @@ IceTipRepositoryBrowser >> historyPanel [ ^ historyPanel ] -{ #category : 'initialization' } -IceTipRepositoryBrowser >> initialExtentForWindow [ - - ^ (1000 @ 700) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipRepositoryBrowser >> initializePresenters [ diff --git a/Iceberg-TipUI/IceTipVersionHistoryBrowser.class.st b/Iceberg-TipUI/IceTipVersionHistoryBrowser.class.st index 74ceda142a..313f922814 100644 --- a/Iceberg-TipUI/IceTipVersionHistoryBrowser.class.st +++ b/Iceberg-TipUI/IceTipVersionHistoryBrowser.class.st @@ -65,12 +65,6 @@ IceTipVersionHistoryBrowser >> defaultLayout [ yourself ] -{ #category : 'initialization' } -IceTipVersionHistoryBrowser >> initialExtentForWindow [ - - ^ (700@700) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipVersionHistoryBrowser >> initializeCommitList [ diff --git a/Iceberg-TipUI/IceTipWorkingCopyBrowser.class.st b/Iceberg-TipUI/IceTipWorkingCopyBrowser.class.st index 7606598728..6402467ac2 100644 --- a/Iceberg-TipUI/IceTipWorkingCopyBrowser.class.st +++ b/Iceberg-TipUI/IceTipWorkingCopyBrowser.class.st @@ -121,12 +121,6 @@ IceTipWorkingCopyBrowser >> iconFor: aPackage [ ^ self iconNamed: #package ] -{ #category : 'initialization' } -IceTipWorkingCopyBrowser >> initialExtentForWindow [ - - ^ (700 @ 500) scaledByDisplayScaleFactor -] - { #category : 'initialization' } IceTipWorkingCopyBrowser >> initializePackagesTable [