Monday, November 08, 2010 at 12:04 AM.

---

system.verbs.builtins.mainResponder.adminSite.prefs.numberPopup

on numberPopup (prompt, adrpref, min, max) {
	<<Changes
		<<6/27/02; 2:43:59 PM by JES
			<<Created.
	local (pta = html.getPageTableAddress ());
	local (htmltext = "");
	on add (s) {
		htmltext = htmltext + (s + "\r");};
	
	if pta^.method == "POST" {
		adrpref^ = number (pta^.postArgs.[string.popFileFromAddress (adrpref)] )};
	
	add ("<tr>");
	bundle { //prompt
		if prompt != "" {prompt = prompt + ":"};
		add ("<td>" + prompt + "</td>")};
	bundle { //popup
		add ("<td>");
		add ("<select name=\"" + string.popFileFromAddress (adrpref) + "\">");
		local (i);
		for i = min to max {
			if i == adrpref^ {
				add ("<option value=\"" + i + "\" selected>" + i + "</option>")}
			else {
				add ("<option value=\"" + i + "\">" + i + "</option>")}};
		add ("</select>");
		add ("</td>")};
	add ("</tr>");
	
	return (htmltext)}

---

This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.