contrib/furnace/tools/list.fhtml

   1 <% USING: namespaces kernel html io sequences ; %>
   2
   3 <select name="<% "name" get write %>" style="width: 200px;" size="20"
   4     onchange="JavaScript:document.getElementById('main').submit();">
   5
   6     <%
   7         "options" get [
   8             <option dup "current" get = [ "selected" =selected ] when option>
   9                 write
  10             </option>
  11         ] each
  12     %>
  13
  14 </select>