%
dropDown: aCollection
response writeTag: 'select name="select"'.
aCollection do: [:each |
response
cr;
writeTag: 'option';
print: each;
writeTag: '/option'].
response cr; writeTag: '/select'.
%>
A page with a method
This is just a dynamically created list, built by calling a method that was
defined within this page.