View/Edit #2279:tell_www_body

Switch to edit mode.

Name(s): tell_www_body
1:  {sort, update} = $www:parse_get("sort", "update")
2:  if (update != E_PROPNF)
3:    player:tell("Please wait...")
4:    this:_kick()
5:  endif
6:  sort == E_PROPNF && (sort = "PTS")
7:  if (sort == "playoffs")
8:  else
9:    east = $list_utils:sort_alist(this.east, sort in this.headings)
10:   west = $list_utils:sort_alist(this.west, sort in this.headings)
11: endif
12: if (!(sort in {"Team", "division", "l", "OTL", "GA"}))
13:   east = $list_utils:reverse(east)
14:   west = $list_utils:reverse(west)
15: endif
16: headings = this.www_headings
17: headings[sort in this.headings] = this.headings[sort in this.headings]
18: player:tell("<Table><TR><TH>Eastern Conference</TH><TH>Western Conference</TH><TR><TD>")
19: player:tellcolumns({12, 8, 10, 3, 3, 3, 3, 3, 3, 3, 3}, headings, @east)
20: player:tell("</TD><TD>")
21: player:tellcolumns({12, 8, 10, 3, 3, 3, 3, 3, 3, 3, 3}, headings, @west)
22: player:tell("</TD></TR></Table>")
23: player:tell("<a href=\"nhl?update=ayup&sort=", sort, "\">Click here to update from nhl.com</a>.  Last updated: ", ctime(this.last_kick_time))
24: "Last modified by manta (#7165) on Wed Apr  4 18:48:24 2001 MDT."

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

You are not logged in.

[home | help | who | search | setup | code]