3a9
@verb #76:"user_disconnected user_client_disconnected" this none this rxdo #55
@program #76:"user_disconnected user_client_disconnected" this none this
{user} = args
if (user < #0)
  return
elseif (valid(caller_perms()) && caller != this)
  raise(E_PERM)
endif
user:isa(this.connection_class) || raise(E_PERM)
user.daemon == this || raise(E_PERM)
"OK, enough paranoid security checks, already... (OK, not so paranoid, we are about to toad someone, after all"
user:_disfunc()
set_player_flag(user, 0)
if (length(this.available) < this.min_free_connections)
  for x in (user:all_properties())
    try
      clear_property(user, x)
    except (E_PERM)
      break
    endtry
  endfor
  this.available = {@this.available, user}
  user:set_name(user.recycled_name)
else
  $recycler:recycle(user)
endif
this.in_use = setremove(this.in_use, user)
"Last modified by manta (#7165) on Tue Jul 23 11:09:46 2002 MDT."
.

0