- Pharo-dev - lists.pharo.org

Re: [Pharo-dev] printString of fileReference sucks!

by Esteban A. Maringolo

Hi Stef, all, I've seen this "inconsistency" as well. The current printSting tries to be descriptive but isn't handy to work with. I would go one step further and have no #asFileReference suffix nor File @ prefix, it is: '/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/_result' asFileReference printString >>> '/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/_result' If for some reason the option chosen is to keep the current printString then the printString should be: >>> 'File @ ''/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/_result''' It is, a string with three tokens, the class name, the @ symbol and a string as an argument, that way you can evaluate the result back. I prefer the first one, it enables you to work with files on workspaces, if you're using inspectors the printString doesn't matter much, since you're dealing with a specialized tool and there is no way you can confuse a FileReference with a regular String instance Best regards, Esteban A. Maringolo 2018-02-02 16:12 GMT-03:00 Stephane Ducasse <stepharo.self(a)gmail.com>: > Hi > > '/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/_result' > asFileReference printString >>>> "File @ /Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/_result" > > so either we add @ one File or we redefine printString one reference to be > > '/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/_result' > asFileReference so that we can do something with the printString > result. > > What do you think? > Guille is it what we talked together? > > Setf >

Feb. 2, 2018

Re: [Pharo-dev] Change Pharo window icon

by Stephane Ducasse

Would it be possible to change the icon without having to compile a new VM? To me the current setup looks so monolithic and dated. I would expect that somebody can deploy a application with its own logo by just providing some new resources. Stef On Wed, Jan 31, 2018 at 11:17 PM, Eliot Miranda <eliot.miranda(a)gmail.com> wrote: > Hi Vincent, > > On Wed, Jan 31, 2018 at 12:07 PM, <Vincent.Blondeau(a)lamresearch.com> wrote: >> >> Hi, >> >> I would like to know how to change the main Pharo window icon. I saw that >> there is a primitive for the title: >> DisplayScreen class >> primitiveWindowTitle:string: ; primitive: >> 'primitiveHostWindowTitle' module:'HostWindowPlugin' >> but I cannot find one for the icon. >> Should another primitive need to be implemented? > > > The icon is baked into the VM executable. So to change it one has to build > a VM with a different icon. > > On Windows it is in > {build.win32x86,build.win64x64}/pharo.cog.spur/Pharo.ico > and the file that specifies to use Pharo.ico is > {build.win32x86,build.win64x64}/pharo.cog.spur/Pharo.rc > > On Mac OS X it is in > platforms/iOS/vm/OSX/Pharo.icns > (alongside three others such as PharoImage.icns) > and the file that specifies to use Pharo.icns is > {build.macos32x86,build.macos64x64}/pharo.cog.spur/Makefile > in setting the VM variable. The file that associates the other icons with > specific file types is > platforms/iOS//vm/OSX/Pharo-Info.plist > > If you're changing the Pharo icon let me suggest you update the icon files > themselves in the opensmalltalk-vm source tree. > > If you're creating a new variant of the VM for some new purpose (say a > special Lam VM) then let me suggest you add the icons to the > opensmalltalk-vm source tree, creating special build directories for these > VMs, such as {build.macos32x86,build.macos64x64}/lam.pharo.cog.spur/ > > If you want to do this privately, then take either of the approaches above > and simply don't publish the edits. You can write a script that takes an > updated checked-out opensmalltalk-vm source tree and edits it with files > from a specific repository. I have such scripts and can help you with them. > Hint, pax is a very convenient directory hierarchy copying tool available at > least on Mac OS X. pax -rwlk will copy the trees under a sequence of > directories into their corresponding places in a target tree. > >> >> Thanks! >> >> Vincent >> >> > > > > -- > _,,,^..^,,,_ > best, Eliot

Feb. 2, 2018

another file reference question

by Stephane Ducasse

HI I have the following scenario: '/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/_result' asFileReference / 'book.pillar' >>> "File @ /Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/_result/book.pillar" ok it works. I want to update the contents of a target folder only if a file is missing or too old compared to a source. The idea is that I have a target folder and I need to know if a file located in the source tree should be copied under the target. So I compute the difference from the root of the source to the file and I want to apply this path to the target to check some file properties. now I do not understand how I can get the following working: '/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/_result' asFileReference / ('/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/book.pillar' asFileReference path) relativeTo: ('/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo' asFileReference path) Stef

Feb. 2, 2018

printString of fileReference sucks!

by Stephane Ducasse

Hi '/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/_result' asFileReference printString >>> "File @ /Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/_result" so either we add @ one File or we redefine printString one reference to be '/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/_result' asFileReference so that we can do something with the printString result. What do you think? Guille is it what we talked together? Setf

Feb. 2, 2018

Re: [Pharo-dev] about diff paths

by Stephane Ducasse

'/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/Chapters/Scheme.pillar' asFileReference path relativeToPath: '/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/Chapters/' asFileReference path In fact / should split or raise an exception. Stef On Fri, Feb 2, 2018 at 12:51 PM, Stephane Ducasse <stepharo.self(a)gmail.com> wrote: > Hi > > I want to know the path from a given point in a path > for example > > '/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/Chapters/Scheme.pillar' > asFileReference path > relativeToPath: (Path / > '/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/') > > should give me 'Chapters/Scheme.pillar' > > as in the example in the method > > (Path / 'griffle' / 'plonk' / 'nurp') > relativeToPath: (Path / 'griffle') > returns plonk/nurp > > But I got > > Path * '..' / 'Users' / 'ducasse' / 'Workspace' / 'FirstCircle' / > 'MyBooks' / 'Bk-Writing' / 'PharoBooks' / 'Booklet-AMiniSchemeInPharo' > / 'Chapters' / 'Scheme.pillar' > > and I do not understand. I can do it doing string manipulation but it defeats > the purpose to have a nice library. > > Any hints? > > Stef

Feb. 2, 2018

Disabling a MenuGroupModel

by HernÃ¡n Morales Durand

Hi guys, If you develop an application window with multiple grouped menu items, you will certainly be able to enable/disable menu groups at once. Currently it is not possible with MenuGroupModel (Morphic). - A menu (item or group) model manages its state using enabledHolder instance variable (the enabledHolder is configured in its superclass' initialize) -- Being a value holder, one might think there is a propagation of state (enabled/disabled) changes to subwidgets, but it does not happen currently. --- Longer explanation: On static menu building, MenuGroupModel does not propagate #enable: state changes to its widget because "widget" i.v. is nil. The reason is a MenuGroupModel #enabled: is evaluated BEFORE its widget is built. How to reproduce: | mm | mm := MenuModel new addGroup: [ :group | group addItem: [ :item | item name: 'File'; icon: #openIcon asIcon; subMenu: (MenuModel new addGroup: [ : gp | gp disable; " <------ HERE we disable the group " addItem: [ : it | it name: 'Open'; icon: #openIcon asIcon; shortcut: $o meta; action: [ self inform: 'Open' ] ]; addItem: [ : it | it name: 'Save'; icon: #smallSaveIcon asIcon; shortcut: $s meta; action: [ self inform: 'Save' ] ] ]) ] ]; yourself. mm extent: 200 @ 100. mm openWithSpec. mm inspect. (it doesn't matter if #disable is sent after the #addItem: block evaluation) - Even after all MenuGroupModel widgets were built, if you try to disable a menu group dinamically: mm menuGroups anyOne menuItems anyOne subMenu menuGroups anyOne disable. you would get "Instance of OrderedCollection did not understand #enabled:" (the widget of a MenuGroupModel is an OrderedCollection!!). - However disabling/enabling MenuItemModel works: mm menuGroups anyOne menuItems anyOne subMenu menuGroups anyOne menuItems first disable. - MenuItemModel gets actually disabled in the ToggleMenuItemMorph/UpdatingMenuMorph (#isEnabled:) when the Canvas draws it. - Incredibly, all disabled groups are re-enabled from several places in the image. -- When the menu is clicked, a ToolDockingBarMorph triggers re-enablement of the MenuMorph in #removeMatchString/#displayFiltered:. This is presumably the code triggered when a menu is displayed and you type to filter the menu items. Something like this: "As initially there is no matchString in the activeSubMenu, then enable all menu items". Obviously it cleans disabled items. The message flow is: DockingBarMorph>>activeSubmenu: -> MenuMorph>>removeMatchString -> MenuMorph>>displayFiltered: --> m isEnabled: isMatch - Another place where menu items are automatically disabled is this flow: FormCanvas>>draw: -> ToggleMenuItemMorph>>drawOn: --> ToggleMenuItemMorph>>isEnabled --> ToggleMenuItemMorph>>isEnabled: !!! --> MorphicMenuItemAdapter>>enabled (This actually CHANGES the enabled state on the Model, disconnecting enabled state between the morph and the model adapter) This seem to have multiple paths of resolution. I'm going to propose a fix that I tested in Pharo 6.1 and Pharo 7. I don't know yet how to fix the menu search auto-enable on key-press but would be glad to read a solution to distinguish between both uses. My idea for now is to have a Morphic property which sets #doNotAutoReEnableItems. However I will open an issue and let people check. You can test it with " Disable the group " mm menuGroups anyOne menuItems anyOne subMenu menuGroups anyOne disable. " Enable the group " mm menuGroups anyOne menuItems anyOne subMenu menuGroups anyOne enable. Cheers, HernÃ¡n

Feb. 2, 2018

Re: [Pharo-dev] [ANN] Updating Consultants Listing

by Marcus Denker

> On 17 Jan 2018, at 17:27, Marcus Denker <marcus.denker(a)inria.fr> wrote: > > Hi, > > We have http://consultants.pharo.org <http://consultants.pharo.org/> > > I want to change it to > - not be a forward to files.pharo.org <http://files.pharo.org/> DONE: http://consultants.pharo.org <http://consultants.pharo.org/> TBD: > - be auto-generated from the https://association.pharo.org <https://association.pharo.org/> > Marcus

Feb. 2, 2018

[Pharo 7.0-dev] Build #493: 21230-revert-tearDown-order-in-OmSessionStoreTesttearDown

by ci-pharo-ci-jenkins2＠inria.fr

There is a new Pharo build available! The status of the build #493 was: SUCCESS. The Pull Request #791 was integrated: "21230-revert-tearDown-order-in-OmSessionStoreTesttearDown" Pull request url: https://github.com/pharo-project/pharo/pull/791 Issue Url: https://pharo.fogbugz.com/f/cases/21230 Build Url: https://ci.inria.fr/pharo-ci-jenkins2/job/Test%20pending%20pull%20request%2…

Feb. 2, 2018

about diff paths

by Stephane Ducasse

Hi I want to know the path from a given point in a path for example '/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/Chapters/Scheme.pillar' asFileReference path relativeToPath: (Path / '/Users/ducasse/Workspace/FirstCircle/MyBooks/Bk-Writing/PharoBooks/Booklet-AMiniSchemeInPharo/') should give me 'Chapters/Scheme.pillar' as in the example in the method (Path / 'griffle' / 'plonk' / 'nurp') relativeToPath: (Path / 'griffle') returns plonk/nurp But I got Path * '..' / 'Users' / 'ducasse' / 'Workspace' / 'FirstCircle' / 'MyBooks' / 'Bk-Writing' / 'PharoBooks' / 'Booklet-AMiniSchemeInPharo' / 'Chapters' / 'Scheme.pillar' and I do not understand. I can do it doing string manipulation but it defeats the purpose to have a nice library. Any hints? Stef

Feb. 2, 2018

[Pharo 7.0-dev] Build #492: 20953-Gitlab-Private-Project-Support-via-Iceberg

by ci-pharo-ci-jenkins2＠inria.fr

There is a new Pharo build available! The status of the build #492 was: FAILURE. The Pull Request #790 was integrated: "20953-Gitlab-Private-Project-Support-via-Iceberg" Pull request url: https://github.com/pharo-project/pharo/pull/790 Issue Url: https://pharo.fogbugz.com/f/cases/20953 Build Url: https://ci.inria.fr/pharo-ci-jenkins2/job/Test%20pending%20pull%20request%2…

Feb. 2, 2018