[Seaside] More S-Exprs

[Avi Bryant]

On Wed, 29 May 2002, Jim Benson wrote:

> <table>
> <tr repeat="@app/apps">
>  <td><a href="@appLink" target="seasideapp">[app.key]</a></td>
>  <td><a href="@edit:">(edit)</a></td>
>  <td><a href="@remove:">(remove)</a></td>
> </tr>
> </table>
>
> How do you translate this?

#(table
   (tr sea:id: 'app/apps'
      (td (a sea:id: appLink target: seasideapp '[app.key]'))
      (td (a sea:id: edit: '(edit)'))
      (td (a sea:id: remove: '(remove)'))))

Out of curiosity, what was the hard part?