@verb #12:"_disfunc" this none this rxdo #55
@program #12:"_disfunc" this none this
if (!$perm_utils:is_called_from($login, "user_disconnected") && !$perm_utils:is_called_from($login, "user_client_disconnected"))
  return E_PERM
endif
this:expunge_rmm()
for editor in ({$mail_editor, $note_editor, $verb_editor})
  if (who = this in editor.active)
    if (editor.times[who] > time() + 7 * 86400)
      "Clean out any editors that contain stuff that is over a week old."
      editor:kill_session(who)
    endif
  endif
endfor
for spy in (this.spied)
  spy:notify(tostr("[", this, "]: *** Disconnected ***"))
endfor
pass(@args)
"Last modified by Raptor (#6319) on Sat Jun 26 23:14:51 1999 MDT."
.