Bert Freudenberg uploaded a new version of Etoys to project Etoys:
http://source.squeak.org/etoys/Etoys-bf.57.mcz
==================== Summary ====================
Name: Etoys-bf.57
Author: bf
Time: 16 May 2011, 11:55:32 pm
UUID: 79ee4862-8989-44cf-894f-319aa077ff95
Ancestors: Etoys-kfr.56
chooseClickTarget returns topRenderer now, so use renderedMorph to access the actual morph
=============== Diff against Etoys-kfr.56 ===============
Item was changed:
----- Method: Player>>adoptScriptsFrom (in category 'misc') -----
adoptScriptsFrom
"Let the user click on another object form which the receiver should obtain scripts and code"
| aMorph |
Sensor waitNoButton.
aMorph _ ActiveWorld chooseClickTarget.
aMorph ifNil: [^ Beeper beep].
+ (((aMorph renderedMorph isSketchMorph) and: [aMorph player belongsToUniClass]) and: [self belongsToUniClass not])
- (((aMorph isSketchMorph) and: [aMorph player belongsToUniClass]) and: [self belongsToUniClass not])
ifTrue:
[costume acquirePlayerSimilarTo: aMorph player]
ifFalse:
[Beeper beep]!
Bert Freudenberg uploaded a new version of Morphic to project Etoys:
http://source.squeak.org/etoys/Morphic-bf.54.mcz
==================== Summary ====================
Name: Morphic-bf.54
Author: bf
Time: 16 May 2011, 11:51:18 pm
UUID: cc521caa-e0a9-40f0-a1e3-69fa0f792150
Ancestors: Morphic-bf.53
Fix for SQ-867: picking a morph needs to select its topRenderer, to access the right player
=============== Diff against Morphic-bf.53 ===============
Item was changed:
----- Method: PasteUpMorph>>chooseClickTarget (in category 'world state') -----
chooseClickTarget
Cursor crossHair showWhile:
[Sensor waitButton].
Cursor down showWhile:
[Sensor anyButtonPressed].
+ ^ (self morphsAt: Sensor cursorPoint) first topRendererOrSelf!
- ^ (self morphsAt: Sensor cursorPoint) first!
Karl Ramberg uploaded a new version of Etoys to project Etoys:
http://source.squeak.org/etoys/Etoys-kfr.56.mcz
==================== Summary ====================
Name: Etoys-kfr.56
Author: kfr
Time: 16 May 2011, 11:14:32 pm
UUID: d8678646-d96f-af4a-8f7d-fe62cc77d4b5
Ancestors: Etoys-kfr.55
Updated with veryDeepFixupWith:
Fixes http://tracker.squeakland.org/browse/SQ-884
I'm a little unsure about the use of the deep copier and when you do weak copies etc...
=============== Diff against Etoys-kfr.55 ===============
Item was added:
+ ----- Method: WatcherWrapper>>veryDeepFixupWith: (in category 'copying') -----
+ veryDeepFixupWith: deepCopier
+ "If target and arguments fields were weakly copied, fix them here. If they were in the tree being copied, fix them up, otherwise point to the originals!!!!"
+
+ super veryDeepFixupWith: deepCopier.
+ player := deepCopier references at: player ifAbsent: [player].
+ variableName := deepCopier references at: variableName ifAbsent: [variableName].
+ !
Item was changed:
----- Method: WatcherWrapper>>veryDeepInner: (in category 'copying') -----
veryDeepInner: deepCopier
"Copy all of my instance variables. Some need to be not copied at all, but shared. Warning!!!! Every instance variable defined in this class must be handled. We must also implement veryDeepFixupWith:. See DeepCopier class comment."
super veryDeepInner: deepCopier.
player := player.
+ variableName := variableName. !
- variableName := variableName.!
Karl Ramberg uploaded a new version of Etoys to project Etoys:
http://source.squeak.org/etoys/Etoys-kfr.55.mcz
==================== Summary ====================
Name: Etoys-kfr.55
Author: kfr
Time: 16 May 2011, 11:02:53 pm
UUID: 68eef8e4-23ba-3542-bc1a-dab5b8e70a56
Ancestors: Etoys-kfr.54
Fixes http://tracker.squeakland.org/browse/SQ-884
I'm a little unsure about the use of the deep copier and when you do weak copies etc...
=============== Diff against Etoys-kfr.54 ===============
Item was added:
+ ----- Method: WatcherWrapper>>veryDeepInner: (in category 'copying') -----
+ veryDeepInner: deepCopier
+ "Copy all of my instance variables. Some need to be not copied at all, but shared. Warning!!!! Every instance variable defined in this class must be handled. We must also implement veryDeepFixupWith:. See DeepCopier class comment."
+ super veryDeepInner: deepCopier.
+ player := player.
+ variableName := variableName.!
Yeah Karl's back!!!
I loaded Etoys-kfr.52.mcz, but could not find the tile
insertCharactersAtEnd:
In the Text Viewer, how do I access to test?
Stephen
On Sun, May 15, 2011 at 2:05 PM, <commits(a)source.squeak.org> wrote:
> Karl Ramberg uploaded a new version of Etoys to project Etoys:
> http://source.squeak.org/etoys/Etoys-kfr.52.mcz
>
> ==================== Summary ====================
>
> Name: Etoys-kfr.52
> Author: kfr
> Time: 15 May 2011, 8:05:24 pm
> UUID: 0d0637ec-78a2-d749-91af-9ed61030d8e9
> Ancestors: Etoys-kfr.51
>
> Insert characters at end of text.
> Fix SQ-809
>
> =============== Diff against Etoys-kfr.51 ===============
>
> Item was changed:
> ----- Method: TextMorph class>>additionsToViewerCategories (in category
> '*eToys-scripting') -----
> additionsToViewerCategories
> "Answer a list of (<categoryName> <list of category specs>) pairs
> that characterize the phrases this kind of morph wishes to add to various
> Viewer categories."
>
> ^ #(
>
> (#'color' (
> (slot color 'The color of the text' Color readWrite Player getTextColor
> Player setTextColor:)
> (slot backgroundColor 'The color of the background behind the text' Color
> readWrite Player getBackgroundColor Player setBackgroundColor:)
> ))
>
> (text (
> (slot characters 'The characters in my contents' String readWrite
> Player getCharacters Player setCharacters:)
>
> (slot cursor 'The position among my characters that replacement text would
> go' Number readWrite Player getTextCursor Player setCursor:)
> (slot characterAtCursor 'The character at the my cursor position' String
> readWrite Player getCharacterAtCursor Player setCharacterAtCursor:)
> (slot count 'How many characters I have' Number readOnly Player getCount
> unused unused)
>
> (slot firstCharacter 'The first character in my contents' String
> readWrite Player getFirstCharacter Player setFirstCharacter:)
>
> (slot lastCharacter 'The last character in my contents' String readWrite
> Player getLastCharacter Player setLastCharacter:)
> (slot allButFirst 'All my characters except the first one' String
> readWrite Player getAllButFirstCharacter Player setAllButFirstCharacter:)
> (command insertCharacters: 'insert the given string at my cursor position'
> String)
> + (command insertCharactersAtEnd: 'insert the given string at end of
> string' String)
> (command insertContentsOf: 'insert the characters from another object at
> my cursor position' Player)
> (slot numericValue 'The number represented by my contents' Number
> readWrite Player getNumericValue Player setNumericValue:)))
>
> (basic (
> + (slot characters 'The characters in my contents' String readWrite
> Player getCharacters Player setCharacters:))))
> - (slot characters 'The characters in my contents' String readWrite
> Player getCharacters Player setCharacters:))))
>
>
> !
>
> _______________________________________________
> etoys-dev mailing list
> etoys-dev(a)squeakland.org
> http://lists.squeakland.org/mailman/listinfo/etoys-dev
>
Bert Freudenberg uploaded a new version of Etoys to project Etoys:
http://source.squeak.org/etoys/Etoys-bf.53.mcz
==================== Summary ====================
Name: Etoys-bf.53
Author: bf
Time: 16 May 2011, 6:43:20 pm
UUID: 5465beb7-bc6b-4d99-a29c-eb65ddcd6acf
Ancestors: Etoys-kfr.52
- rename insertCharactersAtEnd: to appendCharacters:
=============== Diff against Etoys-kfr.52 ===============
Item was added:
+ ----- Method: Player>>appendCharacters: (in category 'scripts-standard') -----
+ appendCharacters: aString
+ "append the characters from the given player to my end"
+
+ self costume renderedMorph appendCharacters: aString!
Item was changed:
----- Method: TextMorph class>>additionsToViewerCategories (in category '*eToys-scripting') -----
additionsToViewerCategories
"Answer a list of (<categoryName> <list of category specs>) pairs that characterize the phrases this kind of morph wishes to add to various Viewer categories."
^ #(
(#'color' (
(slot color 'The color of the text' Color readWrite Player getTextColor Player setTextColor:)
(slot backgroundColor 'The color of the background behind the text' Color readWrite Player getBackgroundColor Player setBackgroundColor:)
))
(text (
(slot characters 'The characters in my contents' String readWrite Player getCharacters Player setCharacters:)
(slot cursor 'The position among my characters that replacement text would go' Number readWrite Player getTextCursor Player setCursor:)
(slot characterAtCursor 'The character at the my cursor position' String readWrite Player getCharacterAtCursor Player setCharacterAtCursor:)
(slot count 'How many characters I have' Number readOnly Player getCount unused unused)
(slot firstCharacter 'The first character in my contents' String readWrite Player getFirstCharacter Player setFirstCharacter:)
(slot lastCharacter 'The last character in my contents' String readWrite Player getLastCharacter Player setLastCharacter:)
(slot allButFirst 'All my characters except the first one' String readWrite Player getAllButFirstCharacter Player setAllButFirstCharacter:)
(command insertCharacters: 'insert the given string at my cursor position' String)
+ (command appendCharacters: 'append the given string' String)
- (command insertCharactersAtEnd: 'insert the given string at end of string' String)
(command insertContentsOf: 'insert the characters from another object at my cursor position' Player)
(slot numericValue 'The number represented by my contents' Number readWrite Player getNumericValue Player setNumericValue:)))
(basic (
(slot characters 'The characters in my contents' String readWrite Player getCharacters Player setCharacters:))))
!