Multiple file uploads

>
> On Feb 18, 2009, at 12:59 PM, Carl Gundel wrote:
>
>> I'm using Async with my Run BASIC project.  I am still using  
>> Seaside 2.6, but I plan to migrate forward as soon as I can get my  
>> Ajax stuff working okay.  have a dynamically generated form with a  
>> couple of listboxes and an anchor.  When the link is clicked I am  
>> expecting the values to get scraped from the controls and assigned  
>> to my model, but it doesn't seem to be happening.  The form is  
>> getting built and rendered correctly as far as I can tell.
>
> Okay, here is a complete tiny class that seems to exhibit the same  
> behavior.  The counter increments when the anchor is clicked, but  
> the value of selection is always nil.
>
> Any ideas?
>
> -Carl
>
> Smalltalk defineClass: #AsyncTest
> superclass: #{Seaside.WAComponent}
> indexedType: #none
> private: false
> instanceVariableNames: 'list selection counter '
> classInstanceVariableNames: ''
> imports: ''
> category: 'Run BASIC'!
>
> !AsyncTest class methodsFor: 'as yet unclassified'!
>
> canBeRoot
> ^ true!
>
> initialize
> self registerAsApplication: 'asyncTest'.! !
>
> !AsyncTest methodsFor: 'rendering'!
>
> renderContentOn: html
> self renderOnHtml: html!
>
> rendererClass
> ^Seaside.WARenderCanvas!
>
> renderOnHtml: html
> | select anchor |
> html
> text: 'Async test';
> break.
> (html form)
> id: 'testForm';
> with:
> [html
> text: 'Counter = ' , self counter asString;
> break.
> (html div)
> id: 'section';
> with:
> [select := html select.
> select list: self list.
> select on: #selection of: self.
> anchor := html anchor.
> anchor
> liveCallback:
> [:h |
> self counter: counter + 1.
> self renderOnHtml: h];
> submitFormNamed: 'testForm';
> text: 'test'.
> html break.
> html text: self selection]]! !
>
> !AsyncTest methodsFor: 'accessing'!
>
> counter
> counter isNil ifTrue: [ counter := 0 ].
> ^counter!
>
> counter: anObject
> counter := anObject!
>
> list
> list isNil ifTrue: [ list := OrderedCollection with: '1' with:  
> 'one' with: 'won' with: 'Juan' ].
> ^list!
>
> list: anObject
> list := anObject!
>
> selection
> ^selection!
>
> selection: anObject
> selection := anObject! !
>
> #{AsyncTest} initialize!
>

> I tried this with Seaside 2.8 with the same results.  :-/  I also noticed
> that my renderOnHtml: method was rendering the form again, so I put the form
> code in the renderContentOn: method.  No difference.
>
> Okay, I can see that this can be made to work (sort of) by assigning the
> liveCallback to the selectTag, but this just doesn't meet my needs.  Isn't
> there some way to force a form's contents to be submitted when an anchor has
> a liveCallback?  Shouldn't an Ajax action be able to use all the contents of
> a form?
>
> -Carl
>
> On Feb 18, 2009, at 2:42 PM, Carl Gundel wrote:
>
>>
>> On Feb 18, 2009, at 12:59 PM, Carl Gundel wrote:
>>
>>> I'm using Async with my Run BASIC project.  I am still using Seaside 2.6,
>>> but I plan to migrate forward as soon as I can get my Ajax stuff working
>>> okay.  have a dynamically generated form with a couple of listboxes and an
>>> anchor.  When the link is clicked I am expecting the values to get scraped
>>> from the controls and assigned to my model, but it doesn't seem to be
>>> happening.  The form is getting built and rendered correctly as far as I can
>>> tell.
>>
>> Okay, here is a complete tiny class that seems to exhibit the same
>> behavior.  The counter increments when the anchor is clicked, but the value
>> of selection is always nil.
>>
>> Any ideas?
>>
>> -Carl
>>
>> Smalltalk defineClass: #AsyncTest
>>        superclass: #{Seaside.WAComponent}
>>        indexedType: #none
>>        private: false
>>        instanceVariableNames: 'list selection counter '
>>        classInstanceVariableNames: ''
>>        imports: ''
>>        category: 'Run BASIC'!
>>
>> !AsyncTest class methodsFor: 'as yet unclassified'!
>>
>> canBeRoot
>>        ^ true!
>>
>> initialize
>>        self registerAsApplication: 'asyncTest'.! !
>>
>> !AsyncTest methodsFor: 'rendering'!
>>
>> renderContentOn: html
>>        self renderOnHtml: html!
>>
>> rendererClass
>>        ^Seaside.WARenderCanvas!
>>
>> renderOnHtml: html
>>        | select anchor |
>>        html
>>                text: 'Async test';
>>                break.
>>        (html form)
>>                id: 'testForm';
>>                with:
>>                                [html
>>                                        text: 'Counter = ' , self counter
>> asString;
>>                                        break.
>>                                (html div)
>>                                        id: 'section';
>>                                        with:
>>                                                        [select := html
>> select.
>>                                                        select list: self
>> list.
>>                                                        select on:
>> #selection of: self.
>>                                                        anchor := html
>> anchor.
>>                                                        anchor
>>
>>  liveCallback:
>>
>>      [:h |
>>
>>      self counter: counter + 1.
>>
>>      self renderOnHtml: h];
>>
>>  submitFormNamed: 'testForm';
>>                                                                text:
>> 'test'.
>>                                                        html break.
>>                                                        html text: self
>> selection]]! !
>>
>> !AsyncTest methodsFor: 'accessing'!
>>
>> counter
>>        counter isNil ifTrue: [ counter := 0 ].
>>        ^counter!
>>
>> counter: anObject
>>        counter := anObject!
>>
>> list
>>        list isNil ifTrue: [ list := OrderedCollection with: '1' with:
>> 'one' with: 'won' with: 'Juan' ].
>>        ^list!
>>
>> list: anObject
>>        list := anObject!
>>
>> selection
>>        ^selection!
>>
>> selection: anObject
>>        selection := anObject! !
>>
>> #{AsyncTest} initialize!
>>
>
> _______________________________________________
> seaside mailing list
> [hidden email]
> http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside
>

> Hi Carl you can do this with Scriptaculous as follows
> just change the anchor to
>
> anchor
>  onClick: (html updater
>                     triggerForm: 'testForm';
>                     id: '' " You need a id fro the html element Id
> that you are updating with the render "
>                     callback: [:r |
>                              self counter: counter + 1.
>                              self renderOnHtml: r]);
>  with: 'test'.
>
> This is from 2.8 though, never worked on 2.6 :)
>
> Ryan
>
> 2009/2/18 Carl Gundel <[hidden email]>:
>> I tried this with Seaside 2.8 with the same results.  :-/  I also noticed
>> that my renderOnHtml: method was rendering the form again, so I put the form
>> code in the renderContentOn: method.  No difference.
>>
>> Okay, I can see that this can be made to work (sort of) by assigning the
>> liveCallback to the selectTag, but this just doesn't meet my needs.  Isn't
>> there some way to force a form's contents to be submitted when an anchor has
>> a liveCallback?  Shouldn't an Ajax action be able to use all the contents of
>> a form?
>>
>> -Carl
>>
>> On Feb 18, 2009, at 2:42 PM, Carl Gundel wrote:
>>
>>>
>>> On Feb 18, 2009, at 12:59 PM, Carl Gundel wrote:
>>>
>>>> I'm using Async with my Run BASIC project.  I am still using Seaside 2.6,
>>>> but I plan to migrate forward as soon as I can get my Ajax stuff working
>>>> okay.  have a dynamically generated form with a couple of listboxes and an
>>>> anchor.  When the link is clicked I am expecting the values to get scraped
>>>> from the controls and assigned to my model, but it doesn't seem to be
>>>> happening.  The form is getting built and rendered correctly as far as I can
>>>> tell.
>>>
>>> Okay, here is a complete tiny class that seems to exhibit the same
>>> behavior.  The counter increments when the anchor is clicked, but the value
>>> of selection is always nil.
>>>
>>> Any ideas?
>>>
>>> -Carl
>>>
>>> Smalltalk defineClass: #AsyncTest
>>>        superclass: #{Seaside.WAComponent}
>>>        indexedType: #none
>>>        private: false
>>>        instanceVariableNames: 'list selection counter '
>>>        classInstanceVariableNames: ''
>>>        imports: ''
>>>        category: 'Run BASIC'!
>>>
>>> !AsyncTest class methodsFor: 'as yet unclassified'!
>>>
>>> canBeRoot
>>>        ^ true!
>>>
>>> initialize
>>>        self registerAsApplication: 'asyncTest'.! !
>>>
>>> !AsyncTest methodsFor: 'rendering'!
>>>
>>> renderContentOn: html
>>>        self renderOnHtml: html!
>>>
>>> rendererClass
>>>        ^Seaside.WARenderCanvas!
>>>
>>> renderOnHtml: html
>>>        | select anchor |
>>>        html
>>>                text: 'Async test';
>>>                break.
>>>        (html form)
>>>                id: 'testForm';
>>>                with:
>>>                                [html
>>>                                        text: 'Counter = ' , self counter
>>> asString;
>>>                                        break.
>>>                                (html div)
>>>                                        id: 'section';
>>>                                        with:
>>>                                                        [select := html
>>> select.
>>>                                                        select list: self
>>> list.
>>>                                                        select on:
>>> #selection of: self.
>>>                                                        anchor := html
>>> anchor.
>>>                                                        anchor
>>>
>>>  liveCallback:
>>>
>>>      [:h |
>>>
>>>      self counter: counter + 1.
>>>
>>>      self renderOnHtml: h];
>>>
>>>  submitFormNamed: 'testForm';
>>>                                                                text:
>>> 'test'.
>>>                                                        html break.
>>>                                                        html text: self
>>> selection]]! !
>>>
>>> !AsyncTest methodsFor: 'accessing'!
>>>
>>> counter
>>>        counter isNil ifTrue: [ counter := 0 ].
>>>        ^counter!
>>>
>>> counter: anObject
>>>        counter := anObject!
>>>
>>> list
>>>        list isNil ifTrue: [ list := OrderedCollection with: '1' with:
>>> 'one' with: 'won' with: 'Juan' ].
>>>        ^list!
>>>
>>> list: anObject
>>>        list := anObject!
>>>
>>> selection
>>>        ^selection!
>>>
>>> selection: anObject
>>>        selection := anObject! !
>>>
>>> #{AsyncTest} initialize!
>>>
>>
>> _______________________________________________
>> seaside mailing list
>> [hidden email]
>> http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside
>>
>

> -----Original Message-----
> From: [hidden email]
> [mailto:[hidden email]] On Behalf
> Of Carl Gundel
> Sent: mercredi, 18. février 2009 20:43
> To: Carl Gundel
> Cc: Seaside - general discussion
> Subject: [Seaside] Re: Seaside Async and form submission
>
>
> On Feb 18, 2009, at 12:59 PM, Carl Gundel wrote:
>
> > I'm using Async with my Run BASIC project.  I am still
> using Seaside
> > 2.6, but I plan to migrate forward as soon as I can get my
> Ajax stuff
> > working okay.  have a dynamically generated form with a couple of
> > listboxes and an anchor.  When the link is clicked I am
> expecting the
> > values to get scraped from the controls and assigned to my
> model, but
> > it doesn't seem to be happening.  The form is getting built and
> > rendered correctly as far as I can tell.
>
> Okay, here is a complete tiny class that seems to exhibit the
> same behavior.  The counter increments when the anchor is
> clicked, but the value of selection is always nil.
>
> Any ideas?
>
> -Carl
>
> Smalltalk defineClass: #AsyncTest
> superclass: #{Seaside.WAComponent}
> indexedType: #none
> private: false
> instanceVariableNames: 'list selection counter '
> classInstanceVariableNames: ''
> imports: ''
> category: 'Run BASIC'!
>
> !AsyncTest class methodsFor: 'as yet unclassified'!
>
> canBeRoot
> ^ true!
>
> initialize
> self registerAsApplication: 'asyncTest'.! !
>
> !AsyncTest methodsFor: 'rendering'!
>
> renderContentOn: html
> self renderOnHtml: html!
>
> rendererClass
> ^Seaside.WARenderCanvas!
>
> renderOnHtml: html
> | select anchor |
> html
> text: 'Async test';
> break.
> (html form)
> id: 'testForm';
> with:
> [html
> text: 'Counter = ' ,
> self counter asString;
> break.
> (html div)
> id: 'section';
> with:
> [select
> := html select.
> select
> list: self list.
> select
> on: #selection of: self.
> anchor
> := html anchor.
> anchor
>
> liveCallback:
>
> [:h |
>
> self counter: counter + 1.
>
> self renderOnHtml: h];
>
> submitFormNamed: 'testForm';
>
> text: 'test'.
> html break.
> html
> text: self selection]]! !
>
> !AsyncTest methodsFor: 'accessing'!
>
> counter
> counter isNil ifTrue: [ counter := 0 ].
> ^counter!
>
> counter: anObject
> counter := anObject!
>
> list
> list isNil ifTrue: [ list := OrderedCollection with:
> '1' with: 'one'  
> with: 'won' with: 'Juan' ].
> ^list!
>
> list: anObject
> list := anObject!
>
> selection
> ^selection!
>
> selection: anObject
> selection := anObject! !
>
> #{AsyncTest} initialize!
>
> _______________________________________________
> seaside mailing list
> [hidden email]
> http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside
>

> The class doesn't do exactly what I want because of the form.
>  I also  
> noticed it was replacing the form and changed it so that it would  
> not.  I mentioned this in a followup post.
>
> However this raises the question of whether there is anything  
> technically wrong with a live component replacing the part of
> the DOM  
> tree it lives in, or even the whole page.  Is this going to cause  
> weird problems?  This is important to me because Run BASIC is a  
> completely open ended programming system.  It helps me if
> Seaside and  
> Async are robust enough to handle this, but I can add Ajax training  
> wheels if needed.

>> The old version of Seaside and Async I am using does not have
>> WAAsyncComponent.
>
> OK, but I think my fix may work because class WAHtmlAttribute has been
> pretty stable if I recall correctly.
>
>
>> This is fix for Seaside?
>
> Yes, the fix is for a Seaside class.
>
>>> With the fix, your tiny class works fine in FF, but not in
>> Safari. I
>>> didn't try in IE.
>>
>> Ah, well it would need to work for all three.  Maybe there is
>> still a
>> way.
>
>
> I tried to figure out why it didn't work for Safari and I succeeded in
> crashing Safari many times when I added breakpoints in the javascript.
>
>
>> The class doesn't do exactly what I want because of the form.
>> I also
>> noticed it was replacing the form and changed it so that it would
>> not.  I mentioned this in a followup post.
>>
>> However this raises the question of whether there is anything
>> technically wrong with a live component replacing the part of
>> the DOM
>> tree it lives in, or even the whole page.  Is this going to cause
>> weird problems?  This is important to me because Run BASIC is a
>> completely open ended programming system.  It helps me if
>> Seaside and
>> Async are robust enough to handle this, but I can add Ajax training
>> wheels if needed.
>
> Beside suggesting you go for Scriptaculous, I cannot help here, sorry.
> (I tried a Scriptaculous version of your tiny class and it worked fine
> in Safari).
>
>>
>> Also, it has taken me some time to really understand the idiom
>> of Async.  It was easy for me to make wrong assumptions about
>> its intended usage.  I have been unable to find any real Async
>> documentation since most of the attention goes to Scriptaculous.
>> I have been trying to avoid that since it relies on Prototype
>> which I've
>> heard is incompatible with toolkits like Dojo and jQuery.
>
> Here is some sort of description of the idiom by Async's author
> http://www.cincomsmalltalk.com/userblogs/avi/blogView?entry=3268075684
>
> _______________________________________________
> seaside mailing list
> [hidden email]
> http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside