- Pharo-users - lists.pharo.org

Re: [Pharo-users] Phaas - anyone interested in setting up Pharo as a Service?
by Andy Burnett Jan. 26, 2013

Jan. 26, 2013

<I am merging my responses to Bernat and Stephane> I agree that there are probably too few webdevs to make this viable - yet :-). However, we may be able to build on other people's work. For example, I have been quite impressed by OpenShift. I wondered if someone could create a Pharo (or gemstone) cartridge. That would then give us access to the rest if their system. It might then allow anyone to set up their own system, just by using that cartridge. Obviously, someone would need to keep the cartridge up to date etc, and maybe a first step would be to adapt the work on Harbour to make image uploading easier. At this point, as I am sure you can tell, I am way beyond my expertise, so I am just guessing. However, it does seem as though people - such as redhat - are doing a lot if the work for us, and it could be smart to build on their structures. Has anyone tried creating a cartridge? Or would someone like to try? I am happy to sponsor part of this, if that helps. Cheers Andy

2 1

Spec: how to select contents of TextModel on focus
by Sean P. DeNigris Jan. 25, 2013

Jan. 25, 2013

As the user tabs through the text fields of my Spec dialog, I'd like for the text to be selected in the currently active field. How do I do this? I played with #readSelectionBlock:, which seems to be sent during initialization but not navigation, and #whenReadSelectionIsChanged:, the purpose of which I can't figure out. Thanks, Sean -- View this message in context: http://forum.world.st/Spec-how-to-select-contents-of-TextModel-on-focus-tp4… Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

2 2

Memory Leak with Zodiac?
by CHRIS BAILEY Jan. 25, 2013

Jan. 25, 2013

I'm having a little trouble with a possible memory leak with Zodiac. I'm running Pharo 1.4 Summer on Centos 6.3/Fedora 18 for deploy/dev. The plugin is using libssl.so.0.9.8, and I also seem to have another version kicking about which uses libssl.so.6 and am not really sure where I got that from. It may be an older one from the http://code.google.com/p/squeakssl/ site. Both have the same effect, i.e. when running 100 timesRepeat: [ ZnClient new url: 'https://www.google.com'; get ] VIRT and RES memory both go up about 70mb, but just using http doesn't accumulate any. I tried it in Pharo 2.0 which was the same, but the new NBCog doesn't include the libSqueaKSSL.so so I was only copying it over. Has anyone used it successfully in the same environment? I'll try it on Ubuntu when I get a chance. Thanks Chris

3 5

SmalltalkInspect: Progressing with Pharo, an Interview with Stephane Ducasse
by Marcus Denker Jan. 25, 2013

Jan. 25, 2013

"We start the fresh year 2013 with an interview with Stephane Ducasse from Inria, who started the Pharo Smalltalk project with a bunch of Smalltalkers [â¦] Aside from the product evolution of Pharo, we cover the new Pharo Consortium and Pharo Association, two organizations that were founded last year" http://smalltalkinspect.podspot.de/post/023-en-progressing-with-pharo-an-in…

1 0

Is there a platform independent way to launch a web browser from Pharo?
by Andy Burnett Jan. 23, 2013

Jan. 23, 2013

I want to use Pharo's new OAuth capabilities to access google's spreadsheets. However, I don't want to build a webapp, I just want to authenticate, and then pull the data down into Pharo. In order to do this, I need to initiate a session, with a web browser. Do I have to use OSProcess for this, or is there a mechanism already built in? Cheers Andy

4 3

Try PharoBoids :)
by MartinW Jan. 23, 2013

Jan. 23, 2013

Hi, i adopted a Ruby implementation (taken from Exploring Everyday Things with R and Ruby by Sau Sheong Chang) of Craig Raynolds Boids Simulation in Pharo Smalltalk using Athens Canvas. Have a look: http://smalltalkhub.com/#!/~MartinWalk/Boids <http://forum.world.st/file/n4664291/PharoBoids.png> -- View this message in context: http://forum.world.st/Try-PharoBoids-tp4664291.html Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

6 11

StHub code browser feature
by Bernat Romagosa Jan. 22, 2013

Jan. 22, 2013

Hi! I remember the first time we could take a peek at SmalltalkHub there was a beautiful online code browser in it. Is re-adding it planned in the future? I found it really useful to take a look at projects before installing them in my image. Cheers! Bernat. -- Bernat Romagosa.

3 2

TTCFont and Pharo 2.0
by Sean P. DeNigris Jan. 21, 2013

Jan. 21, 2013

What's the replacement for "TTCFont familyName: 'BitstreamVeraSans' pointSize: 11 emphasis: 3" in 2.0? Thanks, Sean -- View this message in context: http://forum.world.st/TTCFont-and-Pharo-2-0-tp4664409.html Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

1 0

PetitMarkdown
by Sven Van Caekenberghe Jan. 20, 2013

Jan. 20, 2013

Hi, I loaded PetitMarkdown from SS3 in Pharo 2.0 using (ConfigurationOfPetitMarkdown project version: #bleedingEdge) load which loaded a MetacelloFetchingMCSpecLoader(linear load : explicit load : 0.1-baseline [ConfigurationOfPetitMarkdown] load : ConfigurationOfPetitParser-TudorGirba.26 linear load : 0.1-baseline [ConfigurationOfPetitMarkdown] atomic load : minimal [ConfigurationOfPetitParser] load : PetitParser-lr.228 load : PetitTests-lr.43 load : PetitAnalyzer-lr.40 load : PetitMarkdown-Nodes-IgorStasenko.12 load : PetitMarkdown-Core-CamilloBruni.20 load : PetitMarkdown-Tests-CamilloBruni.28) I was trying to parse some real files PPMarkdownParser parse: 'http://raw.github.com/svenvc/docs/master/neo/neo-json-paper.md' asZnUrl retrieveContents this works, but gives me empty verbatim elements while PPMarkdownLineParser parse: 'http://raw.github.com/svenvc/docs/master/neo/neo-json-paper.md' asZnUrl retrieveContents give me a MessageNotUnderstood: PPMarkdownVerbatim>>appendIndentLine:in: What am I doing wrong ? What is the difference between the two parsers ? Also, what is the #visit: contract ? I guess I could find out using trial and errorâ¦ Isn't there a simple example doing HTML conversion ? Thx, Sven -- Sven Van Caekenberghe http://stfx.eu Smalltalk is the Red Pill

2 1

Error when trying to commit to SmalltalkHub
by MartinW Jan. 20, 2013

Jan. 20, 2013

Whenever i try to commit to SmalltalkHub i get this Error: Error: Could not save Boids-MartinWalk.9.mcz: ZnHttpUnsuccessful: 400 Bad Request Probably i make something very trivial wrong, as nobody else seems to have problems? THERE_BE_DRAGONS_HERE Error: Could not save Boids-MartinWalk.9.mcz: ZnHttpUnsuccessful: 400 Bad Request 20 January 2013 3:07:44.564 pm VM: Mac OS - intel - 1082 - NBCoInterpreter NativeBoost-CogPlugin-IgorStasenko.15 uuid: 44b6b681-38f1-4a9e-b6ee-8769b499576a Nov 27 2012 NBCogit NativeBoost-CogPlugin-IgorStasenko.15 uuid: 44b6b681-38f1-4a9e-b6ee-8769b499576a Nov 27 2012 https://git.gitorious.org/cogvm/blessed.git Commit: 40ac7e7bdec6fef0e934d2c019b86db996053912 Date: 2012-11-19 18:54:49 +0100 By: Mariano Martinez Peck <marianopeck(a)gmail.com> Jenkins build #146 Image: Pharo2.0a [Latest update: #20468] MCHttpRepository(Object)>>error: Receiver: a MCHttpRepository(http://smalltalkhub.com/mc/MartinWalk/Boids/main) Arguments and temporary variables: aString: 'Could not save Boids-MartinWalk.9.mcz: ZnHttpUnsuccessful: 400 Bad Re...etc... Receiver's instance variables: creationTemplate: 'MCHttpRepository location: ''http://smalltalkhub.com/mc/Mar...etc... storeDiffs: nil cache: nil allFileNames: nil cacheFileNames: nil location: 'http://smalltalkhub.com/mc/MartinWalk/Boids/main' user: 'MartinWalk' password: 'i replaced this for the forum post' readerCache: nil [:exception | self error: 'Could not save ' , aString , ': ' , exception printString] in [self httpClient entity: entity; ifFail: [:exception | self error: 'Could not save ' , aString , ': ' , exception printString]; url: (self urlForFileNamed: aString); put] in MCHttpRepository>>writeStreamForFileNamed:replace:do: Receiver: a MCHttpRepository(http://smalltalkhub.com/mc/MartinWalk/Boids/main) Arguments and temporary variables: aString: 'Boids-MartinWalk.9.mcz' ignoreBoolean: false aBlock: [:s | aVersion fileOutOn: s] entity: a ZnStreamingEntity(application/octet-stream 8341B) exception: ZnHttpUnsuccessful: 400 Bad Request Receiver's instance variables: creationTemplate: 'MCHttpRepository location: ''http://smalltalkhub.com/mc/Mar...etc... storeDiffs: nil cache: nil allFileNames: nil cacheFileNames: nil location: 'http://smalltalkhub.com/mc/MartinWalk/Boids/main' user: 'MartinWalk' password: 'i replaced this for the forum post' readerCache: nil BlockClosure>>cull: Receiver: [:exception | self error: 'Could not save ' , aString , ': ' , exception printString] Arguments and temporary variables: anArg: ZnHttpUnsuccessful: 400 Bad Request Receiver's instance variables: outerContext: [self httpClient entity: entity; ifFail: [:exception | self ...etc... startpc: 95 numArgs: 1 [self exceptionHandlerBlock cull: exception] in MethodContext(ContextPart)>>handleSignal: Receiver: BlockClosure>>on:do: Arguments and temporary variables: exception: ZnHttpUnsuccessful: 400 Bad Request val: nil Receiver's instance variables: sender: [[self executeWithRetriesRemaining: self numberOfRetries] on: Error ...etc... pc: 17 stackp: 3 method: BlockClosure>>#on:do: closureOrNil: nil receiver: [self executeWithRetriesRemaining: self numberOfRetries] BlockClosure>>ensure: Receiver: [self exceptionHandlerBlock cull: exception] Arguments and temporary variables: aBlock: [self exceptionHandlerIsActive: true] complete: nil returnValue: nil Receiver's instance variables: outerContext: MethodContext(ContextPart)>>handleSignal: startpc: 99 numArgs: 0 MethodContext(ContextPart)>>handleSignal: Receiver: BlockClosure>>on:do: Arguments and temporary variables: exception: ZnHttpUnsuccessful: 400 Bad Request val: nil Receiver's instance variables: sender: [[self executeWithRetriesRemaining: self numberOfRetries] on: Error ...etc... pc: 17 stackp: 3 method: BlockClosure>>#on:do: closureOrNil: nil receiver: [self executeWithRetriesRemaining: self numberOfRetries] MethodContext(ContextPart)>>handleSignal: Receiver: BlockClosure>>on:do: Arguments and temporary variables: exception: ZnHttpUnsuccessful: 400 Bad Request val: nil Receiver's instance variables: sender: ZnClient>>executeWithRetriesRemaining: pc: 17 stackp: 3 method: BlockClosure>>#on:do: closureOrNil: nil receiver: [self executeWithRedirectsRemaining: self maxNumberOfRedirects] ZnHttpUnsuccessful(Exception)>>signal Receiver: ZnHttpUnsuccessful: 400 Bad Request Arguments and temporary variables: Receiver's instance variables: messageText: '400 Bad Request' tag: nil signaler: a ZnClient signalContext: ZnHttpUnsuccessful(Exception)>>signal handlerContext: BlockClosure>>on:do: outerContext: nil response: a ZnResponse(400 Bad Request text/html ) ZnClient>>handleResponse Receiver: a ZnClient Arguments and temporary variables: Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport ZnClient>>executeWithRedirectsRemaining: Receiver: a ZnClient Arguments and temporary variables: redirectCount: 3 Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport [self executeWithRedirectsRemaining: self maxNumberOfRedirects] in ZnClient>>executeWithRetriesRemaining: Receiver: a ZnClient Arguments and temporary variables: retryCount: 2 Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport BlockClosure>>on:do: Receiver: [self executeWithRedirectsRemaining: self maxNumberOfRedirects] Arguments and temporary variables: exception: an ExceptionSet handlerAction: [:exception | retryCount > 0 ifTrue: [self handleRetry: except...etc... handlerActive: true Receiver's instance variables: outerContext: ZnClient>>executeWithRetriesRemaining: startpc: 69 numArgs: 0 ZnClient>>executeWithRetriesRemaining: Receiver: a ZnClient Arguments and temporary variables: retryCount: 2 Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport [self executeWithRetriesRemaining: self numberOfRetries] in [[self executeWithRetriesRemaining: self numberOfRetries] on: Error do: self ifFailBlock] in ZnClient>>executeWithTimeout Receiver: a ZnClient Arguments and temporary variables: Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport BlockClosure>>on:do: Receiver: [self executeWithRetriesRemaining: self numberOfRetries] Arguments and temporary variables: exception: Error handlerAction: [:exception | self error: 'Could not save ' , aString , ': ' , e...etc... handlerActive: false Receiver's instance variables: outerContext: [[self executeWithRetriesRemaining: self numberOfRetries] on: E...etc... startpc: 46 numArgs: 0 [[self executeWithRetriesRemaining: self numberOfRetries] on: Error do: self ifFailBlock] in ZnClient>>executeWithTimeout Receiver: a ZnClient Arguments and temporary variables: Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport [^ block value] in ZnClient>>withTimeoutDo: Receiver: a ZnClient Arguments and temporary variables: block: [[self executeWithRetriesRemaining: self numberOfRetries] on: Error ...etc... Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport [p psValueAt: index put: anObject. aBlock value] in ZnConnectionTimeout(DynamicVariable)>>value:during: Receiver: a ZnConnectionTimeout Arguments and temporary variables: anObject: 30 aBlock: [^ block value] p: a Process in nil oldValue: nil Receiver's instance variables: index: 1 BlockClosure>>ensure: Receiver: [p psValueAt: index put: anObject. aBlock value] Arguments and temporary variables: aBlock: [p psValueAt: index put: oldValue] complete: nil returnValue: nil Receiver's instance variables: outerContext: ZnConnectionTimeout(DynamicVariable)>>value:during: startpc: 62 numArgs: 0 ZnConnectionTimeout(DynamicVariable)>>value:during: Receiver: a ZnConnectionTimeout Arguments and temporary variables: anObject: 30 aBlock: [^ block value] p: a Process in nil oldValue: nil Receiver's instance variables: index: 1 ZnConnectionTimeout class(DynamicVariable class)>>value:during: Receiver: ZnConnectionTimeout Arguments and temporary variables: anObject: 30 aBlock: [^ block value] Receiver's instance variables: superclass: DynamicVariable methodDict: a MethodDictionary() format: 132 layout: nil instanceVariables: nil organization: a ClassOrganizer subclasses: nil name: #ZnConnectionTimeout classPool: nil sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Zinc-HTTP-Variables' traitComposition: {} localSelectors: nil hash: 972029952 soleInstance: a ZnConnectionTimeout ZnClient>>withTimeoutDo: Receiver: a ZnClient Arguments and temporary variables: block: [[self executeWithRetriesRemaining: self numberOfRetries] on: Error ...etc... Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport ZnClient>>executeWithTimeout Receiver: a ZnClient Arguments and temporary variables: Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport [result := self executeWithTimeout] in ZnClient>>execute Receiver: a ZnClient Arguments and temporary variables: initialMilliseconds: 121017 result: nil Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport [^ block value] in ZnClient>>withProgressDo: Receiver: a ZnClient Arguments and temporary variables: block: [result := self executeWithTimeout] Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport [p psValueAt: index put: anObject. aBlock value] in ZnSignalProgress(DynamicVariable)>>value:during: Receiver: a ZnSignalProgress Arguments and temporary variables: anObject: false aBlock: [^ block value] p: a Process in nil oldValue: nil Receiver's instance variables: index: 2 BlockClosure>>ensure: Receiver: [p psValueAt: index put: anObject. aBlock value] Arguments and temporary variables: aBlock: [p psValueAt: index put: oldValue] complete: nil returnValue: nil Receiver's instance variables: outerContext: ZnSignalProgress(DynamicVariable)>>value:during: startpc: 62 numArgs: 0 ZnSignalProgress(DynamicVariable)>>value:during: Receiver: a ZnSignalProgress Arguments and temporary variables: anObject: false aBlock: [^ block value] p: a Process in nil oldValue: nil Receiver's instance variables: index: 2 ZnSignalProgress class(DynamicVariable class)>>value:during: Receiver: ZnSignalProgress Arguments and temporary variables: anObject: false aBlock: [^ block value] Receiver's instance variables: superclass: DynamicVariable methodDict: a MethodDictionary() format: 132 layout: nil instanceVariables: nil organization: a ClassOrganizer subclasses: nil name: #ZnSignalProgress classPool: nil sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Zinc-HTTP-Variables' traitComposition: {} localSelectors: nil hash: nil soleInstance: a ZnSignalProgress ZnClient>>withProgressDo: Receiver: a ZnClient Arguments and temporary variables: block: [result := self executeWithTimeout] Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport ZnClient>>execute Receiver: a ZnClient Arguments and temporary variables: initialMilliseconds: 121017 result: nil Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport ZnClient>>put Receiver: a ZnClient Arguments and temporary variables: Receiver's instance variables: request: a ZnRequest(PUT /mc/MartinWalk/Boids/main/Boids-MartinWalk.9.mcz) response: a ZnResponse(400 Bad Request text/html ) connection: nil lastUsed: nil options: a Dictionary(#enforceAcceptContentType->true #enforceHttpSuccess->true...etc... session: nil log: a ZnLogSupport [self httpClient entity: entity; ifFail: [:exception | self error: 'Could not save ' , aString , ': ' , exception printString]; url: (self urlForFileNamed: aString); put] in MCHttpRepository>>writeStreamForFileNamed:replace:do: Receiver: a MCHttpRepository(http://smalltalkhub.com/mc/MartinWalk/Boids/main) Arguments and temporary variables: aString: 'Boids-MartinWalk.9.mcz' ignoreBoolean: false aBlock: [:s | aVersion fileOutOn: s] entity: a ZnStreamingEntity(application/octet-stream 8341B) Receiver's instance variables: creationTemplate: 'MCHttpRepository location: ''http://smalltalkhub.com/mc/Mar...etc... storeDiffs: nil cache: nil allFileNames: nil cacheFileNames: nil location: 'http://smalltalkhub.com/mc/MartinWalk/Boids/main' user: 'MartinWalk' password: 'i replaced this for the forum post' readerCache: nil [workBlock value] in [:bar | [workBlock value] on: HTTPProgress do: [:ex | (ex total ifNil: [true] ifNotNil: [ex amount == nil]) ifFalse: [(nextUpdateTime < Time millisecondClockValue or: [ex total = ex amount]) ifTrue: [bar current: ex amount asFloat / ex total asFloat. nextUpdateTime := Time millisecondClockValue + 100]]. ex resume]] in MCHttpRepository>>displayProgress:during: Receiver: a MCHttpRepository(http://smalltalkhub.com/mc/MartinWalk/Boids/main) Arguments and temporary variables: label: 'Uploading Boids-MartinWalk.9.mcz' workBlock: [self httpClient entity: entity; ifFail: [:exception | self err...etc... nextUpdateTime: 0 bar: a Job Receiver's instance variables: creationTemplate: 'MCHttpRepository location: ''http://smalltalkhub.com/mc/Mar...etc... storeDiffs: nil cache: nil allFileNames: nil cacheFileNames: nil location: 'http://smalltalkhub.com/mc/MartinWalk/Boids/main' user: 'MartinWalk' password: 'i replaced this for the forum post' readerCache: nil BlockClosure>>on:do: Receiver: [workBlock value] Arguments and temporary variables: exception: HTTPProgress handlerAction: [:ex | (ex total ifNil: [true] ifNotNil: [ex amount == ni...etc... handlerActive: true Receiver's instance variables: outerContext: [:bar | [workBlock value] on: HTTPProgress do: [:ex | (ex...etc... startpc: 108 numArgs: 0 [:bar | [workBlock value] on: HTTPProgress do: [:ex | (ex total ifNil: [true] ifNotNil: [ex amount == nil]) ifFalse: [(nextUpdateTime < Time millisecondClockValue or: [ex total = ex amount]) ifTrue: [bar current: ex amount asFloat / ex total asFloat. nextUpdateTime := Time millisecondClockValue + 100]]. ex resume]] in MCHttpRepository>>displayProgress:during: Receiver: a MCHttpRepository(http://smalltalkhub.com/mc/MartinWalk/Boids/main) Arguments and temporary variables: label: 'Uploading Boids-MartinWalk.9.mcz' workBlock: [self httpClient entity: entity; ifFail: [:exception | self err...etc... nextUpdateTime: 0 bar: a Job Receiver's instance variables: creationTemplate: 'MCHttpRepository location: ''http://smalltalkhub.com/mc/Mar...etc... storeDiffs: nil cache: nil allFileNames: nil cacheFileNames: nil location: 'http://smalltalkhub.com/mc/MartinWalk/Boids/main' user: 'MartinWalk' password: 'i replaced this for the forum post' readerCache: nil BlockClosure>>cull: Receiver: [:bar | [workBlock value] on: HTTPProgress do: [:ex | (ex total ifNil: [true]...etc... Arguments and temporary variables: anArg: a Job Receiver's instance variables: outerContext: MCHttpRepository>>displayProgress:during: startpc: 103 numArgs: 1 [result := block cull: self] in [self prepareForRunning. [result := block cull: self] on: JobNotification do: [:notification | notification handle: self]] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [:bar | [workBlock value] on: HTTPProgress do: [:ex | (ex total ...etc... currentValue: 0.0 min: 0.0 max: 1.0 title: 'Uploading Boids-MartinWalk.9.mcz' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil announcer: nil BlockClosure>>on:do: Receiver: [result := block cull: self] Arguments and temporary variables: exception: JobNotification handlerAction: [:notification | notification handle: self] handlerActive: true Receiver's instance variables: outerContext: [self prepareForRunning. [result := block cull: self] on: JobN...etc... startpc: 57 numArgs: 0 -- View this message in context: http://forum.world.st/Error-when-trying-to-commit-to-SmalltalkHub-tp4664285… Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

2 2