View/Edit #9:is_readable_by

Switch to edit mode.

Name(s): is_readable_by
1:  {who} = args
2:  key = this.encryption_key
3:  if ($perm_utils:controls(who, this))
4:    return 1
5:  elseif (key == 0)
6:    return 1
7:  else
8:    return $lock_utils:eval_key(key, who)
9:  endif
10: "Last modified by Dax (#789) on Mon Jul 15 11:30:54 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]