View/Edit #116:tell_www_body

Name(s): tell_www_body

1:  "Copied from Generic Letter (#155):tell_www_body by Hacker (#60)Jul 21 12:04:02 2002"
2:  caller == this && player:isa($webber) || raise(E_PERM)
3:  if ($www:parse_GET("burn"))
4:    player:tell("<B>")
5:    $msg:mtell(this:do_burn() ? "burn_succeeded" | "burn_failed")
6:    player:tell("</B><P>Back to ", $www:link(this.location), ".")
7:  else
8:    pass(@args)
9:    if (this:can_burn(player.user))
10:     player:tell("<P><FORM ACTION='/", toint(this), "'><INPUT TYPE='submit' NAME='burn' VALUE='Burn!'></FORM></P>")
11:   endif
12: endif
13: "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.