tim Rowledge uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-tpr.514.mcz
==================== Summary ====================
Name: Tools-tpr.514
Author: tpr
Time: 31 December 2013, 4:59:20.482 pm
UUID: 4746cd0e-0db1-4fb1-b658-47e324f72349
Ancestors: Tools-fbs.513
remove an unsent method as tagged by isThisEverCalled
=============== Diff against Tools-fbs.513 ===============
Item was removed:
- ----- Method: FileList2>>dropDestinationDirectory:event: (in category 'drag''n''drop') -----
- dropDestinationDirectory: dest event: evt
- "Answer a FileDirectory representing the drop destination in the directory hierarchy morph dest"
- self isThisEverCalled.
- ^ (dest itemFromPoint: evt position) withoutListWrapper!
tim Rowledge uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-tpr.514.mcz
==================== Summary ====================
Name: Tools-tpr.514
Author: tpr
Time: 31 December 2013, 4:59:20.482 pm
UUID: 4746cd0e-0db1-4fb1-b658-47e324f72349
Ancestors: Tools-fbs.513
remove an unsent method as tagged by isThisEverCalled
=============== Diff against Tools-fbs.513 ===============
Item was removed:
- ----- Method: FileList2>>dropDestinationDirectory:event: (in category 'drag''n''drop') -----
- dropDestinationDirectory: dest event: evt
- "Answer a FileDirectory representing the drop destination in the directory hierarchy morph dest"
- self isThisEverCalled.
- ^ (dest itemFromPoint: evt position) withoutListWrapper!
tim Rowledge uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-tpr.514.mcz
==================== Summary ====================
Name: Tools-tpr.514
Author: tpr
Time: 31 December 2013, 4:59:20.482 pm
UUID: 4746cd0e-0db1-4fb1-b658-47e324f72349
Ancestors: Tools-fbs.513
remove an unsent method as tagged by isThisEverCalled
=============== Diff against Tools-fbs.513 ===============
Item was removed:
- ----- Method: FileList2>>dropDestinationDirectory:event: (in category 'drag''n''drop') -----
- dropDestinationDirectory: dest event: evt
- "Answer a FileDirectory representing the drop destination in the directory hierarchy morph dest"
- self isThisEverCalled.
- ^ (dest itemFromPoint: evt position) withoutListWrapper!
tim Rowledge uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-tpr.654.mcz
==================== Summary ====================
Name: System-tpr.654
Author: tpr
Time: 31 December 2013, 4:48:00.451 pm
UUID: cbacd566-fabe-4c17-b05c-de4ee3d4c334
Ancestors: System-fbs.653
remove some unsent methods as tagged by isThisEverCalled
=============== Diff against System-fbs.653 ===============
Item was removed:
- ----- Method: AbstractLauncher>>numericParameterAtOneOf:ifAbsent: (in category 'private') -----
- numericParameterAtOneOf: alternateParameterNames ifAbsent: aBlock
- "Return the parameter named using one of the alternate names or an empty string"
-
- | parameterValue |
- self isThisEverCalled.
- parameterValue := self parameterAtOneOf: alternateParameterNames.
- parameterValue isEmpty
- ifTrue: [^aBlock value].
- ^[Number readFrom: parameterValue] ifError: aBlock
-
- !
Item was removed:
- ----- Method: AbstractLauncher>>parameterAtOneOf: (in category 'private') -----
- parameterAtOneOf: alternateParameterNames
- | parameterName |
- "Return the parameter named using one of the alternate names or an empty string"
- self isThisEverCalled.
- parameterName := self determineParameterNameFrom: alternateParameterNames.
- ^parameterName isNil
- ifTrue: ['']
- ifFalse: [self parameterAt: parameterName ifAbsent: ['']]!
tim Rowledge uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-tpr.654.mcz
==================== Summary ====================
Name: System-tpr.654
Author: tpr
Time: 31 December 2013, 4:48:00.451 pm
UUID: cbacd566-fabe-4c17-b05c-de4ee3d4c334
Ancestors: System-fbs.653
remove some unsent methods as tagged by isThisEverCalled
=============== Diff against System-fbs.653 ===============
Item was removed:
- ----- Method: AbstractLauncher>>numericParameterAtOneOf:ifAbsent: (in category 'private') -----
- numericParameterAtOneOf: alternateParameterNames ifAbsent: aBlock
- "Return the parameter named using one of the alternate names or an empty string"
-
- | parameterValue |
- self isThisEverCalled.
- parameterValue := self parameterAtOneOf: alternateParameterNames.
- parameterValue isEmpty
- ifTrue: [^aBlock value].
- ^[Number readFrom: parameterValue] ifError: aBlock
-
- !
Item was removed:
- ----- Method: AbstractLauncher>>parameterAtOneOf: (in category 'private') -----
- parameterAtOneOf: alternateParameterNames
- | parameterName |
- "Return the parameter named using one of the alternate names or an empty string"
- self isThisEverCalled.
- parameterName := self determineParameterNameFrom: alternateParameterNames.
- ^parameterName isNil
- ifTrue: ['']
- ifFalse: [self parameterAt: parameterName ifAbsent: ['']]!
tim Rowledge uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-tpr.654.mcz
==================== Summary ====================
Name: System-tpr.654
Author: tpr
Time: 31 December 2013, 4:48:00.451 pm
UUID: cbacd566-fabe-4c17-b05c-de4ee3d4c334
Ancestors: System-fbs.653
remove some unsent methods as tagged by isThisEverCalled
=============== Diff against System-fbs.653 ===============
Item was removed:
- ----- Method: AbstractLauncher>>numericParameterAtOneOf:ifAbsent: (in category 'private') -----
- numericParameterAtOneOf: alternateParameterNames ifAbsent: aBlock
- "Return the parameter named using one of the alternate names or an empty string"
-
- | parameterValue |
- self isThisEverCalled.
- parameterValue := self parameterAtOneOf: alternateParameterNames.
- parameterValue isEmpty
- ifTrue: [^aBlock value].
- ^[Number readFrom: parameterValue] ifError: aBlock
-
- !
Item was removed:
- ----- Method: AbstractLauncher>>parameterAtOneOf: (in category 'private') -----
- parameterAtOneOf: alternateParameterNames
- | parameterName |
- "Return the parameter named using one of the alternate names or an empty string"
- self isThisEverCalled.
- parameterName := self determineParameterNameFrom: alternateParameterNames.
- ^parameterName isNil
- ifTrue: ['']
- ifFalse: [self parameterAt: parameterName ifAbsent: ['']]!
tim Rowledge uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-tpr.714.mcz
==================== Summary ====================
Name: Morphic-tpr.714
Author: tpr
Time: 31 December 2013, 4:45:38.484 pm
UUID: 76e61735-1670-45a9-baef-d5bfd9a2d6b8
Ancestors: Morphic-fbs.713
remove some unsent methods as tagged by isThisEverCalled
=============== Diff against Morphic-fbs.713 ===============
Item was changed:
----- Method: AlternatePluggableListMorphOfMany>>list: (in category 'initialization') -----
list: listOfStrings
+ self isThisEverCalled .
scroller removeAllMorphs.
list := listOfStrings ifNil: [Array new].
list isEmpty ifTrue: [^ self selectedMorph: nil].
super list: listOfStrings.
"At this point first morph is sensitized, and all morphs share same handler."
scroller firstSubmorph on: #mouseEnterDragging
send: #mouseEnterDragging:onItem:
to: self.
scroller firstSubmorph on: #mouseUp
send: #mouseUp:onItem:
to: self.
"This should add this behavior to the shared event handler thus affecting all items"!
Item was changed:
----- Method: HaloMorph>>dismiss (in category 'private') -----
dismiss
+ "Remove my target from the world Seems to be EToy specific."
- "Remove my target from the world."
| w |
- self isThisEverCalled. "Seemingly no longer enfranchised"
w := self world.
w ifNotNil: [w stopStepping: target].
self delete.
target dismissViaHalo!
Item was changed:
----- Method: PluggableListMorph>>selectedMorph: (in category 'selection') -----
selectedMorph: aMorph
+ "this shouldn't be used any longer. Only sent by implemetations of #list: such as PluggableListMorph, SimpleHierarchicalListMorph etc"
- "this shouldn't be used any longer"
self isThisEverCalled .
true ifTrue: [^self]!
Item was removed:
- ----- Method: TransferMorph>>dropNotifyRecipient (in category 'accessing') -----
- dropNotifyRecipient
- self isThisEverCalled.
- ^dropNotifyRecipient!
Item was removed:
- ----- Method: TransferMorph>>dropNotifyRecipient: (in category 'accessing') -----
- dropNotifyRecipient: anObject
- self isThisEverCalled.
- dropNotifyRecipient := anObject!
Item was removed:
- ----- Method: TransferMorph>>result: (in category 'dropping/grabbing') -----
- result: result
- self isThisEverCalled.
- ^ self result: result from: nil!
Item was removed:
- ----- Method: TransferMorph>>result:from: (in category 'dropping/grabbing') -----
- result: aResult from: aResultGenerator
- "Send aResult of the drop operation computed by aResultGenerator to a resultRecipient, if it exists."
- self isThisEverCalled.
- resultRecipient ifNotNil: [resultRecipient dropResult: aResult from: aResultGenerator]!
tim Rowledge uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-tpr.714.mcz
==================== Summary ====================
Name: Morphic-tpr.714
Author: tpr
Time: 31 December 2013, 4:45:38.484 pm
UUID: 76e61735-1670-45a9-baef-d5bfd9a2d6b8
Ancestors: Morphic-fbs.713
remove some unsent methods as tagged by isThisEverCalled
=============== Diff against Morphic-fbs.713 ===============
Item was changed:
----- Method: AlternatePluggableListMorphOfMany>>list: (in category 'initialization') -----
list: listOfStrings
+ self isThisEverCalled .
scroller removeAllMorphs.
list := listOfStrings ifNil: [Array new].
list isEmpty ifTrue: [^ self selectedMorph: nil].
super list: listOfStrings.
"At this point first morph is sensitized, and all morphs share same handler."
scroller firstSubmorph on: #mouseEnterDragging
send: #mouseEnterDragging:onItem:
to: self.
scroller firstSubmorph on: #mouseUp
send: #mouseUp:onItem:
to: self.
"This should add this behavior to the shared event handler thus affecting all items"!
Item was changed:
----- Method: HaloMorph>>dismiss (in category 'private') -----
dismiss
+ "Remove my target from the world Seems to be EToy specific."
- "Remove my target from the world."
| w |
- self isThisEverCalled. "Seemingly no longer enfranchised"
w := self world.
w ifNotNil: [w stopStepping: target].
self delete.
target dismissViaHalo!
Item was changed:
----- Method: PluggableListMorph>>selectedMorph: (in category 'selection') -----
selectedMorph: aMorph
+ "this shouldn't be used any longer. Only sent by implemetations of #list: such as PluggableListMorph, SimpleHierarchicalListMorph etc"
- "this shouldn't be used any longer"
self isThisEverCalled .
true ifTrue: [^self]!
Item was removed:
- ----- Method: TransferMorph>>dropNotifyRecipient (in category 'accessing') -----
- dropNotifyRecipient
- self isThisEverCalled.
- ^dropNotifyRecipient!
Item was removed:
- ----- Method: TransferMorph>>dropNotifyRecipient: (in category 'accessing') -----
- dropNotifyRecipient: anObject
- self isThisEverCalled.
- dropNotifyRecipient := anObject!
Item was removed:
- ----- Method: TransferMorph>>result: (in category 'dropping/grabbing') -----
- result: result
- self isThisEverCalled.
- ^ self result: result from: nil!
Item was removed:
- ----- Method: TransferMorph>>result:from: (in category 'dropping/grabbing') -----
- result: aResult from: aResultGenerator
- "Send aResult of the drop operation computed by aResultGenerator to a resultRecipient, if it exists."
- self isThisEverCalled.
- resultRecipient ifNotNil: [resultRecipient dropResult: aResult from: aResultGenerator]!
tim Rowledge uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-tpr.714.mcz
==================== Summary ====================
Name: Morphic-tpr.714
Author: tpr
Time: 31 December 2013, 4:45:38.484 pm
UUID: 76e61735-1670-45a9-baef-d5bfd9a2d6b8
Ancestors: Morphic-fbs.713
remove some unsent methods as tagged by isThisEverCalled
=============== Diff against Morphic-fbs.713 ===============
Item was changed:
----- Method: AlternatePluggableListMorphOfMany>>list: (in category 'initialization') -----
list: listOfStrings
+ self isThisEverCalled .
scroller removeAllMorphs.
list := listOfStrings ifNil: [Array new].
list isEmpty ifTrue: [^ self selectedMorph: nil].
super list: listOfStrings.
"At this point first morph is sensitized, and all morphs share same handler."
scroller firstSubmorph on: #mouseEnterDragging
send: #mouseEnterDragging:onItem:
to: self.
scroller firstSubmorph on: #mouseUp
send: #mouseUp:onItem:
to: self.
"This should add this behavior to the shared event handler thus affecting all items"!
Item was changed:
----- Method: HaloMorph>>dismiss (in category 'private') -----
dismiss
+ "Remove my target from the world Seems to be EToy specific."
- "Remove my target from the world."
| w |
- self isThisEverCalled. "Seemingly no longer enfranchised"
w := self world.
w ifNotNil: [w stopStepping: target].
self delete.
target dismissViaHalo!
Item was changed:
----- Method: PluggableListMorph>>selectedMorph: (in category 'selection') -----
selectedMorph: aMorph
+ "this shouldn't be used any longer. Only sent by implemetations of #list: such as PluggableListMorph, SimpleHierarchicalListMorph etc"
- "this shouldn't be used any longer"
self isThisEverCalled .
true ifTrue: [^self]!
Item was removed:
- ----- Method: TransferMorph>>dropNotifyRecipient (in category 'accessing') -----
- dropNotifyRecipient
- self isThisEverCalled.
- ^dropNotifyRecipient!
Item was removed:
- ----- Method: TransferMorph>>dropNotifyRecipient: (in category 'accessing') -----
- dropNotifyRecipient: anObject
- self isThisEverCalled.
- dropNotifyRecipient := anObject!
Item was removed:
- ----- Method: TransferMorph>>result: (in category 'dropping/grabbing') -----
- result: result
- self isThisEverCalled.
- ^ self result: result from: nil!
Item was removed:
- ----- Method: TransferMorph>>result:from: (in category 'dropping/grabbing') -----
- result: aResult from: aResultGenerator
- "Send aResult of the drop operation computed by aResultGenerator to a resultRecipient, if it exists."
- self isThisEverCalled.
- resultRecipient ifNotNil: [resultRecipient dropResult: aResult from: aResultGenerator]!
tim Rowledge uploaded a new version of Installer-Core to project The Trunk:
http://source.squeak.org/trunk/Installer-Core-tpr.388.mcz
==================== Summary ====================
Name: Installer-Core-tpr.388
Author: tpr
Time: 31 December 2013, 4:44:28.775 pm
UUID: c1f6039a-22f6-4024-97c4-0d5e7d6a53ac
Ancestors: Installer-Core-cmm.387
remove an unsent method as tagged by isThisEverCalled
=============== Diff against Installer-Core-cmm.387 ===============
Item was removed:
- ----- Method: Installer>>rememberAs: (in category 'custom names') -----
- rememberAs: symbol
- self isThisEverCalled.
- self class remembered at: symbol asSymbol put: self!