[squeak-dev] The Inbox: EToys-ct.346.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Aug 15 15:42:36 UTC 2019


A new version of EToys was added to project The Inbox:
http://source.squeak.org/inbox/EToys-ct.346.mcz

==================== Summary ====================

Name: EToys-ct.346
Author: ct
Time: 15 August 2019, 5:42:28.043735 pm
UUID: 7a1f0f8c-14fd-4140-b3b6-ec51e2da52e8
Ancestors: EToys-mt.345

Deprecate methods

=============== Diff against EToys-mt.345 ===============

Item was changed:
  ----- Method: CurrentProjectRefactoring class>>currentInterruptName: (in category 'revectoring to current') -----
  currentInterruptName: aString
  "
  CurrentProjectRefactoring currentInterruptName:
  "
+ 	^Project current interruptName: aString!
- 	^Project interruptName: aString!

Item was removed:
- ----- Method: DisplayScreen class>>hostWindowSize: (in category '*Etoys-Squeakland-host window access') -----
- hostWindowSize: aPoint 
- 	self primitiveWindowSize: self hostWindowIndex width: aPoint x heigth: aPoint y
- !

Item was removed:
- ----- Method: Number>>cubed (in category '*Etoys-Squeakland-mathematical functions') -----
- cubed
- 	"Answer the cube of the receiver."
- 
- 	^ self * self * self!

Item was removed:
- ----- Method: SystemProgressMorph>>label:min:max: (in category '*Etoys-Squeakland-private') -----
- label: shortDescription min: minValue max: maxValue
- 	| slot range newBarSize barSize lastRefresh index |
- 	((range := maxValue - minValue) <= 0 or: [(slot := self nextSlotFor: shortDescription) = 0])
- 		ifTrue: [^[:barVal| 0 ]].
- 	self openInWorld.
- 	activeSlots <= 1
- 		ifTrue: [self align: self fullBounds center with: Display boundingBox center].
- 	barSize := -1. "Enforces a inital draw of the morph"
- 	lastRefresh := 0.
- 	index := Preferences unifyNestedProgressBars ifFalse: [slot] ifTrue: [1].
- 	^[:barVal | 
- 		(barVal between: minValue and: maxValue) ifTrue: [
- 			newBarSize := (barVal - minValue / range * BarWidth) truncated.
- 			newBarSize > barSize ifTrue: [
- 				barSize := newBarSize.
- 				(bars at: index) barSize: barSize.
- 				Time primMillisecondClock - lastRefresh > 25 ifTrue: [
- 					self currentWorld displayWorld.
- 					lastRefresh := Time primMillisecondClock]]].
- 		slot]
- !



More information about the Squeak-dev mailing list