View/Edit #302:tell_www_page

Switch to edit mode.

1:  "Checks to see if the webber is allowed access to your page."
2:  p = $su:explode(prepstr, "/")
3:  if (!p)
4:    p = {"page"}
5:  elseif (p == {"edit"})
6:    p = {"page", "edit"}
7:  endif
8:  if (!player:isa($webber) || !(caller in {$www, this, this.owner}))
9:    raise(E_PERM)
10: elseif (!$ticketmaster:authorized())
11:   return $www.error:unauthorized()
12: elseif (p == {"setup", "children"} || p == {"setup", "contents"})
13:   return pass(@args)
14: elseif (length(p) == 2 && p[2] == "edit")
15:   if (player.user:controls(this))
16:     return this:edit_msp(p[1])
17:   else
18:     return $www.error:unauthorized()
19:   endif
20: elseif (this:has_verb("_render_" + p[1]))
21:   return this:("_render_" + p[1])(@args)
22: else
23:   $www.error:not_found()
24: endif
25: "Last modified by Raptor (#6319) on Wed Jun 16 20:16:41 1999 MDT."

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