Re: [Pharo-users] What's wrong with this code?

[Ben Coman]

Friedrich Dominicus wrote: Bernat Romagosa <tibabenfortlapala...@gmail.com> writes: ouch, I added a . in the middle, sorry! elements := #('eins' 'zwei' 'drei' 'vier'). elements do: [ :element | (Delay forSeconds: 2) wait ] displayingProgress: [ :element | 'Working on', element asString ]. 2014-03-18 9:55 GMT+01:00 Bernat Romagosa <tibabenfortlapala...@gmail.com>: Without having tried it, I think you're missing a #wait message in there: elements := #('eins' 'zwei' 'drei' 'vier'). elements do: [ :element | (Delay forSeconds: 2) wait ]. displayingProgress: [ :element | 'Working on', element asString ]. Sorry even with that I do not see the 'Working on ' message. It's just a progress bar with nothing else. No "Working on" anywhere. Regards Friedrich I'm not sure what the expected result is, but if you debug/step into that code a few times you find yourself in...     Array(Collection)>>do:displayingProgress:every: Looking at _expression_...      aStringOrBlock isString I guessed something might be learnt from stepping through...     elements := #('eins' 'zwei' 'drei' 'vier').     elements do: [ :element | (Delay forSeconds: 2) wait ] displayingProgress: 'MyProgress' and indeed progress bar text is updated by the line...     bar label: aStringOrBlock. Now stepping through your original script, #label: never seems to be executed So replacing...     [ProgressNotification signal: '' extra: (oldLabel := newLabel)] with...     [   bar label: newLabel.            ProgressNotification signal: '' extra: (oldLabel := newLabel).     ]. seems to do the trick, although as I said before, I don't know what the expected behaviour is.  Is that what you need? I've not looked at this code before so I've learnt something new today. In particular, for a while I was wondering purpose ProgressNotification served since tracing through it seemed to do nothing, and then I realised it might be used something like this...     elements := #('eins' 'zwei' 'drei' 'vier' ).     [   elements do: [ :element | (Delay forSeconds: 2) wait ]         displayingProgress: [ :element | 'Working on ', element asString ]     ] on: ProgressNotification do:     [     :notice |           self inform: notice extraParam printString.           notice resume     ] I've logged a case https://pharo.fogbugz.com/f/cases/13101/Progress-bar-progressive-text-update-not-working cheers -ben