Photo gallery?
by Damien Cassou
Hi,
is there any photo gallery available for Pier? I mean a widget where I
could upload pictures and they are rendered in a nice way. I started
one 4 years ago but I abandoned it.
Bye
--
Damien Cassou
http://damiencassou.seasidehosting.st
5 years, 10 months
pier2?
by merlyn＠stonehenge.com
Did I miss an announcement? Does this mean we have a Pier that works
(or nearly works) with Seaside 3?
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn(a)stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Smalltalk/Perl/Unix consulting, Technical writing, Comedy, etc. etc.
See http://methodsandmessages.vox.com/ for Smalltalk and Seaside discussion
13 years, 6 months
MADescription beHidden don't update model
by dtrussardi＠tiscali.it
Hi,
i have a model with some descriptions.
One of it, descriptionMap, is set with beHidden property because i think to use it only for update the relative cache description into descriptionContainer.
The relative code is :
^( super descriptionContainer )
addCondition:[ : memento|
memento cache at: self descriptionOK
ifTrue: [ memento cache at: self descriptionMap put: 'xyz'. true ]
ifFalse:[ false ].
]
labelled: 'Error is not ok;
yourself
The cache is right update.
The problem is to update the model relative to the descriptionMap cache.
When confirm the form other instances model is right update but descriptionMap not.
Any idea?
Thanks,
Dario
13 years, 8 months
How to update PRInternalLink?
by Norbert Hartl
I'm still experimenting with Templating and things like that. I tried to create a page with
+comp+
as content. I thought taking that page and adding a child named comp would be sufficient but it isn't. Everything is resolved on save time or better when the document gets parsed. I can achieve what I want by doing.
structure := (PRPathLookup start: self context structure path: '/mytemplate') copy.
structure addChild: ((PRComponent named: 'comp')
componentClass: MyComponent ).
structure document: (PRDocumentParser parse: (PRWikiWriter write: structure document)).
But I think there more elaborate versions of doing this. I'm not sure if update on the internal link will help. Then a visitor could probably do the job.
thanks,
Norbert
13 years, 8 months
PUSecurity
by Nick Ager
Hi,
I'm struggling to understand how to use Pier Security. I have a number of
different types of users (registeredUsers, projectOwners, AdminUsers, ....).
I'd like to enable user specific options on the main pages, and restrict
access to specific pages and commands to groups of users. I've grouped my
users into different PUGroup s . Then without entirely understanding the
intent of the code in PRDistribution>>root :
self rootPage enumerator
with;
all;
do:
[ :each |
each securityDecoration owner: self kernel users anyOne.
each securityDecoration group: self kernel groups anyOne ].
self makePrivate: self systemPage.
I modified my own configuration code to read:
self homePage enumerator
with;
all;
do:
[ :each |
each securityDecoration owner: self kernel users anyOne.
each securityDecoration group: self kernel groups anyOne.
each securityDecoration group: self kernel registeredUserGroup.
each securityDecoration group: self kernel projectUserGroup.
each securityDecoration group: self kernel adminUserGroup.
].
I can see that PUSecurity>>hasPermission:for: and
PRStructure>>isAllowedCommand:in: should reveal the secrets of how security
is designed to work, however the following code assumes all decorations
satisfy the conditions
PRStructure>>isAllowedCommand:in:
^ self decorations allSatisfy: [ :each |
each
isAllowedCommand: aCommandClass
in: aContext ]
In my case this tests fails as not all decorations are allowed. For example
if a user is in the group "projectOwners", isAllowedCommand:in: fails for
the security decorator for "registeredUserGroup" and "adminUserGroup". With
my limited understanding I would have expect the above loop to read
"anySatisfy:" rather than "allSatisfy" .
Clearly I've a misunderstanding about how Pier security is designed to
function. Any pointers gratefully received.
Thanks
Nick
13 years, 8 months
error starting pier2
by Tudor Girba
Hi,
I get an error when starting Pier2. It seems to be due to ByteArray
not understanding isByteString.
How to reproduce:
- Get the latest Pier2 from hudson.lukas-renggli.ch
- Execute: PRDistribution new register
- Go to: http://localhost:8080/pier
Any idea of what is wrong?
Cheers,
Doru
-----------------
VM: Mac OS - intel - 1058 - Squeak3.8.1 of '28 Aug 2006' [latest
update: #6747] Squeak VM 4.2.2b1
Image: PharoCore1.0rc3 [Latest update: #10515]
SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir /Users/girba/Desktop/pier2-1
Trusted Dir /foobar/tooBar/forSqueak/bogus
Untrusted Dir /Users/girba/Library/Preferences/Squeak/Internet/My Squeak
ByteArray(Object)>>doesNotUnderstand: #isByteString
Receiver: #[47 42 32 72 69 65 68 69 82 32 42 47 13 46 105 99 111 110
32 97 32 123 111 117 116 108 10...etc...
Arguments and temporary variables:
aMessage: isByteString
exception: MessageNotUnderstood: ByteArray>>isByteString
resumeValue: nil
Receiver's instance variables:
#[47 42 32 72 69 65 68 69 82 32 42 47 13 46 105 99 111 110 32 97 32
123 111 117 116 108 10...etc...
GRPharoUtf8CodecStream>>nextPutAll:
Receiver: a GRPharoUtf8CodecStream
Arguments and temporary variables:
aString: #[47 42 32 72 69 65 68 69 82 32 42 47 13 46 105 99 111 110
32 97 32 12...etc...
Receiver's instance variables:
stream: a WriteStream ''
converter: an UTF8TextConverter
binary: false
WABufferedResponse(WAResponse)>>nextPutAll:
Receiver: a WABufferedResponse status: 200 message: 'OK'
Arguments and temporary variables:
aStringOrByteArray: #[47 42 32 72 69 65 68 69 82 32 42 47 13 46 105
99 111 110 ...etc...
Receiver's instance variables:
headers: a WAHeaderFields
cookies: an OrderedCollection()
status: 200
message: 'OK'
contentsStream: a GRPharoUtf8CodecStream
MAFileModelHandler>>handleFiltered:
Receiver: a MAFileModelHandler
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
response: a WABufferedResponse status: 200 message: 'OK'
mimeType: a WAMimeType(text/css)
Receiver's instance variables:
filter: a WAValueHolder contents: a MAFileModelHandler
parent: a WAApplication
configuration: a WAUserConfiguration
model: a MAExternalFileModel
[] in MAFileModelHandler(WARequestHandler)>>handle:
Receiver: a MAFileModelHandler
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Receiver's instance variables:
filter: a WAValueHolder contents: a MAFileModelHandler
parent: a WAApplication
configuration: a WAUserConfiguration
model: a MAExternalFileModel
BlockClosure>>on:do:
Receiver: [closure] in MAFileModelHandler(WARequestHandler)>>handle:
Arguments and temporary variables:
exception: WACurrentRequestContext
handlerAction: [closure] in WACurrentRequestContext
class(WADynamicVariable cla...etc...
handlerActive: true
Receiver's instance variables:
outerContext: MAFileModelHandler(WARequestHandler)>>handle:
startpc: 32
numArgs: 0
WACurrentRequestContext class(WADynamicVariable class)>>use:during:
Receiver: WACurrentRequestContext
Arguments and temporary variables:
anObject: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
aBlock: [closure] in MAFileModelHandler(WARequestHandler)>>handle:
Receiver's instance variables:
superclass: WADynamicVariable
methodDict: a MethodDictionary()
format: 140
instanceVariables: nil
organization: ('as yet unclassified')
subclasses: nil
name: #WACurrentRequestContext
classPool: nil
sharedPools: nil
environment: Smalltalk
category: #'Seaside-Core-RequestHandling'
traitComposition: {}
localSelectors: nil
[] in WARequestContext>>push:while:
Receiver: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Arguments and temporary variables:
aBlock: [closure] in MAFileModelHandler(WARequestHandler)>>handle:
Receiver's instance variables:
handlers: an OrderedCollection(a MAFileModelHandler a WAApplication
a WADispatc...etc...
request: a WARequest method: GET uri: /pier?_s=uYjuOEMpjSerCpLd
version: HTTP/1...etc...
response: a WABufferedResponse status: 200 message: 'OK'
codec: a GRPharoUtf8Codec name: 'utf-8'
consumer: a WAPathConsumer
properties: nil
BlockClosure>>ensure:
Receiver: [closure] in WARequestContext>>push:while:
Arguments and temporary variables:
aBlock: [closure] in WARequestContext>>push:while:
returnValue: nil
b: nil
Receiver's instance variables:
outerContext: WARequestContext>>push:while:
startpc: 42
numArgs: 0
WARequestContext>>push:while:
Receiver: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Arguments and temporary variables:
aRequestHandler: a MAFileModelHandler
aBlock: [closure] in MAFileModelHandler(WARequestHandler)>>handle:
Receiver's instance variables:
handlers: an OrderedCollection(a MAFileModelHandler a WAApplication
a WADispatc...etc...
request: a WARequest method: GET uri: /pier?_s=uYjuOEMpjSerCpLd
version: HTTP/1...etc...
response: a WABufferedResponse status: 200 message: 'OK'
codec: a GRPharoUtf8Codec name: 'utf-8'
consumer: a WAPathConsumer
properties: nil
MAFileModelHandler(WARequestHandler)>>handle:
Receiver: a MAFileModelHandler
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Receiver's instance variables:
filter: a WAValueHolder contents: a MAFileModelHandler
parent: a WAApplication
configuration: a WAUserConfiguration
model: a MAExternalFileModel
WAApplication(WARegistry)>>dispatch:to:
Receiver: a WAApplication
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
aRequestHandler: a MAFileModelHandler
Receiver's instance variables:
filter: a WAValueHolder contents: a WAExceptionFilter
parent: a WADispatcher
configuration: a WAUserConfiguration
cache: a WACache
WAApplication(WARegistry)>>handleKeyed:with:
Receiver: a WAApplication
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
aRequestHandler: a MAFileModelHandler
Receiver's instance variables:
filter: a WAValueHolder contents: a WAExceptionFilter
parent: a WADispatcher
configuration: a WAUserConfiguration
cache: a WACache
WAApplication(WARegistry)>>handleFiltered:
Receiver: a WAApplication
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
cookie: nil
key: 'uYjuOEMpjSerCpLd'
handler: a MAFileModelHandler
urlKey: 'uYjuOEMpjSerCpLd'
Receiver's instance variables:
filter: a WAValueHolder contents: a WAExceptionFilter
parent: a WADispatcher
configuration: a WAUserConfiguration
cache: a WACache
WAApplication>>handleFiltered:
Receiver: a WAApplication
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Receiver's instance variables:
filter: a WAValueHolder contents: a WAExceptionFilter
parent: a WADispatcher
configuration: a WAUserConfiguration
cache: a WACache
WAExceptionFilter(WARequestFilter)>>handleFiltered:
Receiver: a WAExceptionFilter
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Receiver's instance variables:
next: a WAValueHolder contents: a WAApplication
configuration: a WAUserConfiguration
[] in WAExceptionFilter>>handleFiltered:
Receiver: a WAExceptionFilter
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Receiver's instance variables:
next: a WAValueHolder contents: a WAApplication
configuration: a WAUserConfiguration
BlockClosure>>on:do:
Receiver: [closure] in WAExceptionFilter>>handleFiltered:
Arguments and temporary variables:
exception: a WAWalkbackErrorHandler
handlerAction: [closure] in
WAWalkbackErrorHandler(WAExceptionHandler)>>handleE...etc...
handlerActive: false
Receiver's instance variables:
outerContext: WAExceptionFilter>>handleFiltered:
startpc: 32
numArgs: 0
WAWalkbackErrorHandler(WAExceptionHandler)>>handleExceptionsDuring:
Receiver: a WAWalkbackErrorHandler
Arguments and temporary variables:
aBlock: [closure] in WAExceptionFilter>>handleFiltered:
Receiver's instance variables:
requestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
WAWalkbackErrorHandler class(WAExceptionHandler
class)>>handleExceptionsDuring:context:
Receiver: WAWalkbackErrorHandler
Arguments and temporary variables:
aBlock: [closure] in WAExceptionFilter>>handleFiltered:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Receiver's instance variables:
superclass: WADebugErrorHandler
methodDict: a MethodDictionary(#open:->a CompiledMethod(1906:
WAWalkbackErrorHa...etc...
format: 132
instanceVariables: nil
organization: ('private' open:)
subclasses: nil
name: #WAWalkbackErrorHandler
classPool: nil
sharedPools: nil
environment: Smalltalk
category: #'Seaside-Development-Core'
traitComposition: {}
localSelectors: nil
WAExceptionFilter>>handleFiltered:
Receiver: a WAExceptionFilter
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Receiver's instance variables:
next: a WAValueHolder contents: a WAApplication
configuration: a WAUserConfiguration
[] in WAApplication(WARequestHandler)>>handle:
Receiver: a WAApplication
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Receiver's instance variables:
filter: a WAValueHolder contents: a WAExceptionFilter
parent: a WADispatcher
configuration: a WAUserConfiguration
cache: a WACache
BlockClosure>>on:do:
Receiver: [closure] in WAApplication(WARequestHandler)>>handle:
Arguments and temporary variables:
exception: WACurrentRequestContext
handlerAction: [closure] in WACurrentRequestContext
class(WADynamicVariable cla...etc...
handlerActive: true
Receiver's instance variables:
outerContext: WAApplication(WARequestHandler)>>handle:
startpc: 32
numArgs: 0
WACurrentRequestContext class(WADynamicVariable class)>>use:during:
Receiver: WACurrentRequestContext
Arguments and temporary variables:
anObject: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
aBlock: [closure] in WAApplication(WARequestHandler)>>handle:
Receiver's instance variables:
superclass: WADynamicVariable
methodDict: a MethodDictionary()
format: 140
instanceVariables: nil
organization: ('as yet unclassified')
subclasses: nil
name: #WACurrentRequestContext
classPool: nil
sharedPools: nil
environment: Smalltalk
category: #'Seaside-Core-RequestHandling'
traitComposition: {}
localSelectors: nil
[] in WARequestContext>>push:while:
Receiver: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Arguments and temporary variables:
aBlock: [closure] in WAApplication(WARequestHandler)>>handle:
Receiver's instance variables:
handlers: an OrderedCollection(a MAFileModelHandler a WAApplication
a WADispatc...etc...
request: a WARequest method: GET uri: /pier?_s=uYjuOEMpjSerCpLd
version: HTTP/1...etc...
response: a WABufferedResponse status: 200 message: 'OK'
codec: a GRPharoUtf8Codec name: 'utf-8'
consumer: a WAPathConsumer
properties: nil
BlockClosure>>ensure:
Receiver: [closure] in WARequestContext>>push:while:
Arguments and temporary variables:
aBlock: [closure] in WARequestContext>>push:while:
returnValue: nil
b: nil
Receiver's instance variables:
outerContext: WARequestContext>>push:while:
startpc: 42
numArgs: 0
WARequestContext>>push:while:
Receiver: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Arguments and temporary variables:
aRequestHandler: a WAApplication
aBlock: [closure] in WAApplication(WARequestHandler)>>handle:
Receiver's instance variables:
handlers: an OrderedCollection(a MAFileModelHandler a WAApplication
a WADispatc...etc...
request: a WARequest method: GET uri: /pier?_s=uYjuOEMpjSerCpLd
version: HTTP/1...etc...
response: a WABufferedResponse status: 200 message: 'OK'
codec: a GRPharoUtf8Codec name: 'utf-8'
consumer: a WAPathConsumer
properties: nil
WAApplication(WARequestHandler)>>handle:
Receiver: a WAApplication
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Receiver's instance variables:
filter: a WAValueHolder contents: a WAExceptionFilter
parent: a WADispatcher
configuration: a WAUserConfiguration
cache: a WACache
WADispatcher>>handleFiltered:named:
Receiver: a WADispatcher
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
aString: 'pier'
Receiver's instance variables:
filter: a WAValueHolder contents: a WADispatcher
parent: nil
configuration: a WAUserConfiguration
defaultName: 'browse'
handlers: a Dictionary('browse'->a WAApplication 'comet'->a
WADispatcher 'confi...etc...
WADispatcher>>handleFiltered:
Receiver: a WADispatcher
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
handlerName: 'pier'
consumer: a WAPathConsumer
Receiver's instance variables:
filter: a WAValueHolder contents: a WADispatcher
parent: nil
configuration: a WAUserConfiguration
defaultName: 'browse'
handlers: a Dictionary('browse'->a WAApplication 'comet'->a
WADispatcher 'confi...etc...
[] in WADispatcher(WARequestHandler)>>handle:
Receiver: a WADispatcher
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Receiver's instance variables:
filter: a WAValueHolder contents: a WADispatcher
parent: nil
configuration: a WAUserConfiguration
defaultName: 'browse'
handlers: a Dictionary('browse'->a WAApplication 'comet'->a
WADispatcher 'confi...etc...
BlockClosure>>on:do:
Receiver: [closure] in WADispatcher(WARequestHandler)>>handle:
Arguments and temporary variables:
exception: WACurrentRequestContext
handlerAction: [closure] in WACurrentRequestContext
class(WADynamicVariable cla...etc...
handlerActive: true
Receiver's instance variables:
outerContext: WADispatcher(WARequestHandler)>>handle:
startpc: 32
numArgs: 0
WACurrentRequestContext class(WADynamicVariable class)>>use:during:
Receiver: WACurrentRequestContext
Arguments and temporary variables:
anObject: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
aBlock: [closure] in WADispatcher(WARequestHandler)>>handle:
Receiver's instance variables:
superclass: WADynamicVariable
methodDict: a MethodDictionary()
format: 140
instanceVariables: nil
organization: ('as yet unclassified')
subclasses: nil
name: #WACurrentRequestContext
classPool: nil
sharedPools: nil
environment: Smalltalk
category: #'Seaside-Core-RequestHandling'
traitComposition: {}
localSelectors: nil
[] in WARequestContext>>push:while:
Receiver: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Arguments and temporary variables:
aBlock: [closure] in WADispatcher(WARequestHandler)>>handle:
Receiver's instance variables:
handlers: an OrderedCollection(a MAFileModelHandler a WAApplication
a WADispatc...etc...
request: a WARequest method: GET uri: /pier?_s=uYjuOEMpjSerCpLd
version: HTTP/1...etc...
response: a WABufferedResponse status: 200 message: 'OK'
codec: a GRPharoUtf8Codec name: 'utf-8'
consumer: a WAPathConsumer
properties: nil
BlockClosure>>ensure:
Receiver: [closure] in WARequestContext>>push:while:
Arguments and temporary variables:
aBlock: [closure] in WARequestContext>>push:while:
returnValue: nil
b: nil
Receiver's instance variables:
outerContext: WARequestContext>>push:while:
startpc: 42
numArgs: 0
WARequestContext>>push:while:
Receiver: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Arguments and temporary variables:
aRequestHandler: a WADispatcher
aBlock: [closure] in WADispatcher(WARequestHandler)>>handle:
Receiver's instance variables:
handlers: an OrderedCollection(a MAFileModelHandler a WAApplication
a WADispatc...etc...
request: a WARequest method: GET uri: /pier?_s=uYjuOEMpjSerCpLd
version: HTTP/1...etc...
response: a WABufferedResponse status: 200 message: 'OK'
codec: a GRPharoUtf8Codec name: 'utf-8'
consumer: a WAPathConsumer
properties: nil
WADispatcher(WARequestHandler)>>handle:
Receiver: a WADispatcher
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Receiver's instance variables:
filter: a WAValueHolder contents: a WADispatcher
parent: nil
configuration: a WAUserConfiguration
defaultName: 'browse'
handlers: a Dictionary('browse'->a WAApplication 'comet'->a
WADispatcher 'confi...etc...
[] in WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
Receiver: a WAComancheAdaptor
Arguments and temporary variables:
aRequestContext: a WARequestContext url: '/pier?_s=uYjuOEMpjSerCpLd'
Receiver's instance variables:
manager: a WAServerManager
port: 8080
requestHandler: nil
codec: a GRPharoUtf8Codec name: 'utf-8'
streamUploads: false
service: seaside-8080 [running] port: 8080
BlockClosure>>on:do:
Receiver: [closure] in
WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
Arguments and temporary variables:
exception: WAResponseNotification
handlerAction: [closure] in
WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
handlerActive: true
Receiver's instance variables:
outerContext: WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
startpc: 34
numArgs: 0
--- The full stack ---
ByteArray(Object)>>doesNotUnderstand: #isByteString
GRPharoUtf8CodecStream>>nextPutAll:
WABufferedResponse(WAResponse)>>nextPutAll:
MAFileModelHandler>>handleFiltered:
[] in MAFileModelHandler(WARequestHandler)>>handle:
BlockClosure>>on:do:
WACurrentRequestContext class(WADynamicVariable class)>>use:during:
[] in WARequestContext>>push:while:
BlockClosure>>ensure:
WARequestContext>>push:while:
MAFileModelHandler(WARequestHandler)>>handle:
WAApplication(WARegistry)>>dispatch:to:
WAApplication(WARegistry)>>handleKeyed:with:
WAApplication(WARegistry)>>handleFiltered:
WAApplication>>handleFiltered:
WAExceptionFilter(WARequestFilter)>>handleFiltered:
[] in WAExceptionFilter>>handleFiltered:
BlockClosure>>on:do:
WAWalkbackErrorHandler(WAExceptionHandler)>>handleExceptionsDuring:
WAWalkbackErrorHandler class(WAExceptionHandler
class)>>handleExceptionsDuring:context:
WAExceptionFilter>>handleFiltered:
[] in WAApplication(WARequestHandler)>>handle:
BlockClosure>>on:do:
WACurrentRequestContext class(WADynamicVariable class)>>use:during:
[] in WARequestContext>>push:while:
BlockClosure>>ensure:
WARequestContext>>push:while:
WAApplication(WARequestHandler)>>handle:
WADispatcher>>handleFiltered:named:
WADispatcher>>handleFiltered:
[] in WADispatcher(WARequestHandler)>>handle:
BlockClosure>>on:do:
WACurrentRequestContext class(WADynamicVariable class)>>use:during:
[] in WARequestContext>>push:while:
BlockClosure>>ensure:
WARequestContext>>push:while:
WADispatcher(WARequestHandler)>>handle:
[] in WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
BlockClosure>>on:do:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
WAComancheAdaptor(WAServerAdaptor)>>handle:
[] in WAComancheAdaptor(WAServerAdaptor)>>process:
BlockClosure>>ensure:
WAComancheAdaptor(WAServerAdaptor)>>process:
WAComancheAdaptor>>processHttpRequest:
HttpService>>processHttpRequest:
[] in HttpAdaptor>>dispatchRequest:
BlockClosure>>on:do:
HttpService>>handleDispatchErrorsIn:
HttpAdaptor>>dispatchRequest:
[] in [] in HttpAdaptor>>beginConversation
BlockClosure>>on:do:
BlockClosure>>valueWithBindingsContext:
BlockClosure>>valueWithBindings:
BindingsAccessor>>clamp:
[] in HttpAdaptor>>beginConversation
BlockClosure>>ensure:
HttpAdaptor>>beginConversation
HttpAdaptor class>>readAndWriteTo:service:
HttpAdaptor class>>readAndWriteToSocket:service:
HttpService>>serve:
[] in HttpService(TcpService)>>value:
BlockClosure>>on:do:
BlockClosure>>valueWithBindingsContext:
BlockClosure>>valueWithBindings:
BindingsAccessor>>clamp:
[] in BlockClosure>>newProcessWithClampedBindings:
BlockClosure>>on:do:
BlockClosure>>valueWithBindingsContext:
BlockClosure>>valueWithBindings:
[] in BlockClosure>>newProcessWithBindings:
[] in BlockClosure>>newProcess
--
www.tudorgirba.com
"Relationships are of two kinds: those we choose and those that
happen. They both matter."
13 years, 8 months
Re: RFBServer on Pier2
by Reza RAZAVI
At 10:25 27/02/2010, Lukas Renggli wrote:
>Load the latest Seaside-Pharo-Tools-Web and the latest RBF server. I
>fixed various minor problems, but it basically worked already before.
Hi Lukas,
This is to confirm that it works perfectly. I just tried it
successfully both under OSX by Chicken of the VNC and under Vista by
TightVNC. The issue was basically related to my firewall configuration.
Thank you again, and my apologies for the delayed feedback due to
other obligations.
Regards,
Reza
13 years, 8 months
Dynamic pages and something like WATask for pier
by Norbert Hartl
Hi,
I'm experimenting at the moment with "dynamic pages". I just need to extend the static pages by one level. I did a subclass of PRPage that answers true on hasChildren call so that PRPathLookup does accept the path being requested. If the page is really requested the last path component is taken as query for an object. I then take a "template page" copy its document and set the parent to the right page. Beside having the need for returning a dummy page on a children call this works out pretty good. If you understand that rather cryptic description :) you may have some hints about that.
The second approach is to have something like WATask in pier style. The pages shouldn't be directly accessible via URL. The task should work on editabel pier pages that pass/inject the right objects into page. Let's say there is a three steps task I want to solve. I would start by taking on template page (copying its document) and embedding the first form. On answer it will take the next template page and injects the results from the previous step into the new page. This would lead to a task where the textual decoration and such could be changed by editors and the task by programmers.
I'm sorry but I don't know how I can explain that in a more understandable fashion. But maybe you understand it and have some hints or pointers how to approach that use case.
Norbert
13 years, 8 months
MAInternalEditorComponent error
by dtrussardi＠tiscali.it
Hi,
i work with Magritte-Model-lr.394 on pharo.
I have a MAAccountModel with descriptionCodice and descriptionIndirizzoMemo.
The last is defined as:
descriptionIndirizzoMemo
^ (MAToOneRelationDescription new)
componentClass: MAInternalEditorComponent ;
classes: (Array with: MAIndirizzoModel);
selectorAccessor: 'indirizzoMemo';
label: 'Indirizzo';
comment: 'Indirizzo di riferimento';
priority: 220;
"beReadonly;"
yourself
Now MAIndirizzoMemoModel is defined with some other description:
descrptionCitta
descriptionNumero
and other description.
( You can load the file mcz. )
Now when open: MAAccountModel new asComponent
i found the error:
MessageNotUnderstood: receiver of "isMultipart" is nil
isMultipart
^ self children anySatisfy: [ :each | each isMultipart ]
The error is erase only with componentClass set to : MAInternalEditorComponent.
Any considerations ?
Thanks,
Dario
13 years, 8 months
Magritte import an existing project
by stan shepherd
Hi, is there a utility to automate the 'Magritte-ising' of an existing
project? I imagine it would scan the classes, and create the class side
descriptors and missing accessors automatically. It would seem useful for
quickly evaluating/prototyping what Magritte could add to the current
project.
I thought I read about this before, but I can't find a reference or any
class that seems to do it.
Thanks, ...Stan
13 years, 8 months
