View/Edit #52:input_radio

Name(s): input_radio

1: "Returns an HTML form radio button set built as follows:"
2: ":input_radio(name, value-list [,current-value [,desc-list]])"
3: {name, values, ?current = E_NONE, ?descs = values} = args
4: text = {}
5: for x in [1..length(values)]
6:   text = {@text, tostr("<INPUT TYPE=\"radio\" NAME=\"", this:literal_text(name), "\" VALUE=\"", this:literal_text(values[x]), "\"", values[x] == current ? "CHECKED" | "", "> ", descs[x])}
7: endfor
8: return text
9: "Last modified by Dax (#789) on Mon Dec 10 21:01:49 2001 MST."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Hacker (#60)

You are not logged in.