View/Edit #155:tell_www_body

Name(s): tell_www_body

1:  caller == this && player:isa($webber) || raise(E_PERM)
2:  if ($www:parse_GET("burn"))
3:    player:tell("<B>")
4:    $msg:mtell(this:do_burn() ? "burn_succeeded" | "burn_failed")
5:    player:tell("</B><P>Back to ", $www:link(this.location), ".")
6:  else
7:    pass(@args)
8:    if (this:can_burn(player.user))
9:      player:tell("<P><FORM ACTION='/", toint(this), "'><INPUT TYPE='submit' NAME='burn' VALUE='Burn!'></FORM></P>")
10:   endif
11: endif
12: "Last modified by Dax (#789) on Tue May  3 14:09:31 2005 MDT."

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

You are not logged in.