- Pharo-users - lists.pharo.org

Re: [Pharo-users] How can the main window title in Squeak and Pharo be set?

by Esteban Lorenzano

DisplayScreen hostWindowTitle: 'My Title'. On Jan 10, 2013, at 5:40 PM, Frank Church <vfclists(a)gmail.com> wrote: > How can the main window title in Squeak and Pharo be set? > > In Pharo I thought it could be set in the System -> Settings Menu but > couldn't find anything there. > > Can it be set only in code? > > > -- > Frank Church > > ======================= > http://devblog.brahmancreations.com >

Jan. 10, 2013

How can the main window title in Squeak and Pharo be set?

by Frank Church

How can the main window title in Squeak and Pharo be set? In Pharo I thought it could be set in the System -> Settings Menu but couldn't find anything there. Can it be set only in code? -- Frank Church ======================= http://devblog.brahmancreations.com

Jan. 10, 2013

Re: [Pharo-users] How do I save contents of Workspace into a collection?

by Frank Church

On 9 January 2013 21:08, Paul DeBruicker <pdebruic(a)gmail.com> wrote: > On 01/09/2013 12:39 PM, Frank Church wrote: > > > > On 9 January 2013 19:30, Paul DeBruicker <pdebruic(a)gmail.com > > <mailto:pdebruic@gmail.com>> wrote: > > > > On 01/09/2013 11:18 AM, Frank Church wrote: > > > > > > When I print it returns an empty array #(), but I expect to get > subset > > > of TextMorphForEditView allInstances. > > > > > > What is the likely purpose of the notNil? > > > > > > -- > > > Frank Church > > > > > > The #firstOwnerSuchThat: method either returns the morph that meets > the > > criteria specified in the block sent to it (in this instance that the > > owner is a SystemWindow and its model is a Workspace) or nil. The > > #select: block needs the code inside it to return a boolean, so the > > #notNil converts the response from the #firstOwnerSuchThat: method > into > > a boolean rather than leaving it as either nil or the morph. > > > > > > If you right click on a method and choose Implementors you can see > how > > each class that implements the method defines it. You can also right > > click the method and choose Senders to see examples of how the > method is > > used. > > > > > > Is there some reason why the expression is returning an empty > collection? > > > > Isn't the select: meant to return the whole list? > > > No the #select: returns only those elements for which the select block > returns true. The reason why you're getting an empty collection is > because the select block for every element returns false. The criteria > in the #firstOwnerSuchThat: block needs to be adjusted to be more > permissive. Or the starting collection is wrong. > > In this instance its an issue of the criteria in the > #firstOwnerSuchThat: block being wrong. > > This one you want is this: > > TextMorphForEditView allInstances > select: [ :morph | (morph firstOwnerSuchThat: [ :owner | > (owner > isKindOf: SystemWindow) and: [ owner model isKindOf: Workspace ] ]) notNil > ] > > (I changed 'owner class isKindOf: SystemWindow' to 'owner isKindOf: > SystemWindow') > > > I'm on linux and you can shift-click (it may be option-click or > commanc-click on other platforms I have no idea) the title bar of a > Workspace and click 'explore' to see that workspace's instance > variables. In the bottom pane of the explorer window you can test your > select block's criteria to ensure it works for your desired objects. > > > > > Another way to find a workspace is first close all windows then open a > workspace and run > > Smalltalk garbageCollect > > > then highlight the following, right click it, and choose 'explore' > > > TextMorphForEditView allInstances > > The only thing in the array in the explorer window is the morph for the > workspace. You can then start looking through the owners by clicking > the triangle next to the #owner instance variable until you find one > who's model is 'a Workspace'. That's the workspace object. > > > > > > > Thanks for the last answer which lists all the workspaces. My initial desire was to label my Workspaces and then copy the contents of those which match some label and organize them into a kind of collection. Similar to ScriptManager. So essentially I want to list all Workspaces whose titles or contents match a substring, parse the contents further for some criteria and put those matching into a list for review. Then from there put the right ones into a permanent persisted collection. My intention is to do something like. | workSpaces textMorphs | workSpaces := OrderedCollection new. textMorphs := TextMorphForEditView allInstances select: [ :morph | (morph firstOwnerSuchThat: [ :owner | (owner isKindOf: SystemWindow) and: [ owner model isKindOf: Workspace ] ]) notNil ] I want to capture all the matching Workspaces into the workSpaces variable, by some method such as 'workSpaces[i] := textMorphs[i] getWorkspace' and get the labelString of the Workspace, but it seems that firstOwnerSuchThat returns a nil or notNil, rather than the actual Workspace and it also seems redundant to get the list of Workspaces into the workSpaces through iterating over the textMorphs variable as the owner variable in the loop captures them at some point. So this question breaks down into 2 parts. 1. How can copy add the owner if it turns out to be a Workspace to the workSpaces variable inside the loop (what is syntax) 2. How would I write a method such as : workSpace := textMorph getWorkspace, with or without using firstOwnerSuchThat, ie a general method of parsing the inheritance/ownership chain. -- Frank Church ======================= http://devblog.brahmancreations.com

Jan. 10, 2013

Rendering text to bitmap buffer then paintImage to a canvas

by Ben Coman

I need to improve the performance of a lot of text that drawn on screen while the screen is being dragged around and would like to experiment with rendering the text to a bitmap buffer then painting that onto a canvas. How might that be achieved? And from Workspace can I test this? I have been searching for a couple of hours already so thought I'd just ask. cheers -ben

Jan. 10, 2013

Re: [Pharo-users] Question about alias in traits

by Damien Cassou

On Thu, Jan 10, 2013 at 1:21 PM, Hernan Wilkinson <hernan.wilkinson(a)10pines.com> wrote: > Was my interpretation of Alias incorrect? or is the current implementation > of alias incorrect? (maybe due to some implementation problems?) @ is an Alias operator, not a Rename operator. That means when you alias { #m3 -> #m1 } you get a new name for the same method. So what you see is the expected behavior, as defined in the paper. And the direction of the arrow makes sense: #m3 -> #m1 is read as "m3 is a new name for m1", whereas for a Rename operator, we would probably have something like "#m1 -> #m3", i.e., m1 is renamed to m3. In a fully dynamic language, a Rename operator would be quite hard to implement I guess, IIRC Eiffel has a rename operator. -- Damien Cassou http://damiencassou.seasidehosting.st "Success is the ability to go from one failure to another without losing enthusiasm." Winston Churchill

Jan. 10, 2013

Question about alias in traits

by Hernan Wilkinson

Hi, I may have understood incorrectly the idea behind and alias when using traits, but I was expecting that when using an alias, the aliased method would be removed and all the sender of that message would be change to the new one (the alias), but I don't see that happening. Here is some code: Trait named: #SomeTrait uses: {} SomeTrait>>m1 ^ 1 SomeTrait>>m2 self m1 Object subclass: #SomeClass uses: SomeTrait @ { #m3 -> #m1} It generates: SomeClass>>m1 ^ 1 SomeClass>>m2 self m1 SomeClass>>m3 ^1 But I was specting: SomeClass>>m2 self m3 SomeClass>>m3 ^1 and the method SomeClass>>m1 removed. Was my interpretation of Alias incorrect? or is the current implementation of alias incorrect? (maybe due to some implementation problems?) Thanks! Hernan. -- *HernÃ¡n Wilkinson Agile Software Development, Teaching & Coaching* *Phone: +54 - 011 - *6091 - 3125* Mobile: +54 - 911 - 4470 - 7207 email: hernan.wilkinson(a)10Pines.com site: http://www.10Pines.com <http://www.10pines.com/>* Address: Alem 693, Floor 5 B, Buenos Aires, Argentina

Jan. 10, 2013

Re: [Pharo-users] PharoConf 2013 @ Bern?

by Sabine KnÃ¶fel

I would appreciate it, too! -- View this message in context: http://forum.world.st/PharoConf-2013-Bern-tp4658114p4662723.html Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

Jan. 10, 2013

Re: [Pharo-users] How do I save contents of Workspace into a collection?

by Paul DeBruicker

On 01/09/2013 12:39 PM, Frank Church wrote: > > On 9 January 2013 19:30, Paul DeBruicker <pdebruic(a)gmail.com > <mailto:pdebruic@gmail.com>> wrote: > > On 01/09/2013 11:18 AM, Frank Church wrote: > > > > When I print it returns an empty array #(), but I expect to get subset > > of TextMorphForEditView allInstances. > > > > What is the likely purpose of the notNil? > > > > -- > > Frank Church > > > The #firstOwnerSuchThat: method either returns the morph that meets the > criteria specified in the block sent to it (in this instance that the > owner is a SystemWindow and its model is a Workspace) or nil. The > #select: block needs the code inside it to return a boolean, so the > #notNil converts the response from the #firstOwnerSuchThat: method into > a boolean rather than leaving it as either nil or the morph. > > > If you right click on a method and choose Implementors you can see how > each class that implements the method defines it. You can also right > click the method and choose Senders to see examples of how the method is > used. > > > Is there some reason why the expression is returning an empty collection? > > Isn't the select: meant to return the whole list? No the #select: returns only those elements for which the select block returns true. The reason why you're getting an empty collection is because the select block for every element returns false. The criteria in the #firstOwnerSuchThat: block needs to be adjusted to be more permissive. Or the starting collection is wrong. In this instance its an issue of the criteria in the #firstOwnerSuchThat: block being wrong. This one you want is this: TextMorphForEditView allInstances select: [ :morph | (morph firstOwnerSuchThat: [ :owner | (owner isKindOf: SystemWindow) and: [ owner model isKindOf: Workspace ] ]) notNil ] (I changed 'owner class isKindOf: SystemWindow' to 'owner isKindOf: SystemWindow') I'm on linux and you can shift-click (it may be option-click or commanc-click on other platforms I have no idea) the title bar of a Workspace and click 'explore' to see that workspace's instance variables. In the bottom pane of the explorer window you can test your select block's criteria to ensure it works for your desired objects. Another way to find a workspace is first close all windows then open a workspace and run Smalltalk garbageCollect then highlight the following, right click it, and choose 'explore' TextMorphForEditView allInstances The only thing in the array in the explorer window is the morph for the workspace. You can then start looking through the owners by clicking the triangle next to the #owner instance variable until you find one who's model is 'a Workspace'. That's the workspace object.

Jan. 9, 2013

Re: [Pharo-users] How do I save contents of Workspace into a collection?

by StÃ©phane Ducasse

Hi frank select: returns the elements that satisfy the argument. If none of them works -> #() (10 20 30) select: [:each | each > 100] -> #() what else could it be? Stef On Jan 9, 2013, at 9:39 PM, Frank Church wrote: > > > On 9 January 2013 19:30, Paul DeBruicker <pdebruic(a)gmail.com> wrote: > On 01/09/2013 11:18 AM, Frank Church wrote: > > > > When I print it returns an empty array #(), but I expect to get subset > > of TextMorphForEditView allInstances. > > > > What is the likely purpose of the notNil? > > > > -- > > Frank Church > > > The #firstOwnerSuchThat: method either returns the morph that meets the > criteria specified in the block sent to it (in this instance that the > owner is a SystemWindow and its model is a Workspace) or nil. The > #select: block needs the code inside it to return a boolean, so the > #notNil converts the response from the #firstOwnerSuchThat: method into > a boolean rather than leaving it as either nil or the morph. > > > If you right click on a method and choose Implementors you can see how > each class that implements the method defines it. You can also right > click the method and choose Senders to see examples of how the method is > used. > > > Is there some reason why the expression is returning an empty collection? > > Isn't the select: meant to return the whole list? > > -- > Frank Church > > ======================= > http://devblog.brahmancreations.com

Jan. 9, 2013

Re: [Pharo-users] How do I save contents of Workspace into a collection?

by Frank Church

On 9 January 2013 19:30, Paul DeBruicker <pdebruic(a)gmail.com> wrote: > On 01/09/2013 11:18 AM, Frank Church wrote: > > > > When I print it returns an empty array #(), but I expect to get subset > > of TextMorphForEditView allInstances. > > > > What is the likely purpose of the notNil? > > > > -- > > Frank Church > > > The #firstOwnerSuchThat: method either returns the morph that meets the > criteria specified in the block sent to it (in this instance that the > owner is a SystemWindow and its model is a Workspace) or nil. The > #select: block needs the code inside it to return a boolean, so the > #notNil converts the response from the #firstOwnerSuchThat: method into > a boolean rather than leaving it as either nil or the morph. > > > If you right click on a method and choose Implementors you can see how > each class that implements the method defines it. You can also right > click the method and choose Senders to see examples of how the method is > used. > > Is there some reason why the expression is returning an empty collection? Isn't the select: meant to return the whole list? -- Frank Church ======================= http://devblog.brahmancreations.com

Jan. 9, 2013