View/Edit #208:_kick

Name(s): _kick

1:  "Begin generic security check (_kick)"
2:  if (verb == "_kick" && !args[1]:isa(this))
3:    raise(E_INVARG, "Illegal object", args[1])
4:    return E_INVARG
5:  endif
6:  "End generic security check (_kick)"
7:  "Delete any properties belonging to recycled players."
8:  {victim} = args
9:  for p in (properties(victim))
10:   $command_utils:suspend_if_needed()
11:   if (toint(p) > 0 && !is_player(toobj(p)))
12:     player:tell("Deleting expired dataprop ", victim, ".", p)
13:     delete_property(victim, p)
14:   endif
15: endfor
16: "Last modified by Dax (#789) on Tue May  3 14:11:55 2005 MDT."

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

You are not logged in.