View/Edit #12:get_current_message

Switch to edit mode.

Name(s): get_current_message
1:  ":get_current_message([recipient])"
2:  " => {msg_num, last_read_date} for the given recipient."
3:  " => 0 if we have no record of that recipient."
4:  if (caller != this && !$perm_utils:controls(caller_perms(), this))
5:    raise(E_PERM)
6:  elseif (!args || args[1] == this)
7:    return this.current_message[1..2]
8:  elseif (a = listassoc(this.current_message, args[1]))
9:    return a[2..3]
10: else
11:   return 0
12: endif
13: "Last modified by whiz (#3135) on Wed Jan 24 00:27:52 2007 EST."

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]