View/Edit #12:_clear_props_after_disfunc

Switch to edit mode.

Name(s): _clear_props_after_disfunc
1:  if (!caller_perms().wizard)
2:    raise(E_PERM, "Uhuhuh, you didn't say the magic word!")
3:  elseif (this:connected())
4:    return
5:  endif
6:  for x in (this.animated)
7:    boot_player(x)
8:  endfor
9:  if ((z = this:_animator()) != 0)
10:   z.animated = setremove(z.animated, this)
11: endif
12: zap = {"responsible", "last_commands", "animated", "spied", "env_context"}
13: if (this:isa($guest))
14:   `this.last_commands = {@this.last_commands, "--disconnected--"} ! ANY'
15:   zap = setremove(zap, "last_commands")
16: endif
17: for x in (zap)
18:   `clear_property(this, x) ! ANY'
19: endfor
20: "Last modified by whiz (#3135) on Thu Apr 18 17:22:33 2002 MDT."

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

You are not logged in.

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