View/Edit #300:_set_description

Name(s): _set_description

1:  "When the description is changed, recompile the page."
2:  $perm_utils:can_hack() || raise(E_PERM)
3:  {code} = args
4:  if (index(code ? code[$] | "", "<!-- Last modified by ", 1) == 1)
5:    code = listdelete(code, length(code))
6:  endif
7:  dude = player:isa($webber) ? player.user | player
8:  code = {@code, tostr("<!-- Last modified by ", dude.name, " (", dude, ") on ", ctime(), ". -->")}
9:  this:filewrite("description", code)
10: this:compile(code, "page")
11: "Last modified by Dax (#789) on Wed Jun  2 18:02:11 1999 MDT."

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

You are not logged in.