View/Edit #10:clearall

Name(s): clearall

1:  "WIZARDLY"
2:  this:is_writable_by(caller_perms()) || raise(E_PERM)
3:  if (args && (d = args[1]) in {3, 4})
4:    this.data = d
5:  endif
6:  for p in (properties(this))
7:    if (p[1] == " " && p != " ")
8:      delete_property(this, p)
9:    endif
10:   "... there should be a better way...."
11:   "...This is bad as it leaves the db in an inconsistent state..."
12:   $command_utils:suspend_if_needed()
13: endfor
14: this:set_node("", "", "", {}, @this.data > 3 ? {{}} | {})
15: "Last modified by Dax (#789) on Sat May 21 03:39:50 2005 MDT."

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

You are not logged in.