View/Edit #2237:notify_record

Name(s): notify_record

1:  if (caller_perms() != $eve)
2:    raise(E_PERM)
3:  endif
4:  baddies = {#100}
5:  buffer = this.notify_buffer
6:  if ($modes:flag_on(this, "record_con"))
7:    this.notify_con = {@this.notify_con, @args}
8:    if (length(this.notify_con) > buffer[1])
9:      this.notify_con = {@this.notify_con[$ - (buffer[1] - 1)..$]}
10:   endif
11: else
12:   this.notify_con = {}
13: endif
14: if (callers()[$][4] in baddies || $eve:connected())
15:   return
16: elseif ($modes:flag_on(this, "record_dis"))
17:   notify = this:notify_time(@args)
18:   this.notify_dis = {@this.notify_dis, @args}
19:   if (length(this.notify_dis) > buffer[2])
20:     this.notify_dis = {@this.notify_dis[$ - (buffer[2] - 1)..$]}
21:   endif
22: else
23:   this.notify_dis = {}
24: endif
25: return
26: "Last modified by Janette (#2633) on Thu Aug  9 00:58:03 2001 MDT."

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

You are not logged in.