[Seaside] Patch for WAApplicationEditor>>renderLibrariesOn:

[Conrad Taylor]

Hi, is there a associated unit test for this functionality?
Thanks,

-Conrad

On 8/22/07, Sebastian Sastre <ssastre at seaswork.com> wrote:
>
>  Hi there,
>
>     it's me again talking about libraries :)
>
>     I saw the feature I was asking for already implemented with a minor
> bug which I patched with this method:
>
> renderLibrariesOn: html
>  html heading level2 with: 'Libraries'.
>  self libraryOptions isEmpty ifFalse: [
>   html text: 'Add Library: '.
>   html select
>    list: self libraryOptions;
>    selected: nil;
>    callback: [ :value | library := value ].
>   html space.
>   html submitButton
>    callback: [ self addLibrary ];
>    text: 'Add' ].
>  html unorderedList: [
>   application libraries do: [ :each |
>    html listItem: [
>     html text: each.
>     html space.
>     html anchor
>      callback: [ application removeLibrary: each ];
>      with: '(remove)' ] ] ].
>  html submitButton
>   text: 'write to disk';
>   title: 'writes all the libraries to disk';
>   callback: [ application writeLibrariesToDisk ]
>
> The change is very subtle. In the last line #application instvar is used
> instead of calling it with "self application". That change was making that
> only the config application libraries where writed to disk instead of the
> application being configured.
>
>     cheers,
>
>
> Sebastian Sastre
>
>
> _______________________________________________
> Seaside mailing list
> Seaside at lists.squeakfoundation <Seaside at lists.squeakfoundation.org>.org<Seaside at lists.squeakfoundation.org>
> http://lists.squeakfoundation<http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside>
> .org/cgi-bin/mailman/listinfo/seaside<http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/seaside/attachments/20070822/44cd8985/attachment.htm