@verb #1:"all_nonclear_properties" this none this rxd #55
@program #1:"all_nonclear_properties" this none this
set_task_perms(caller_perms())
r = this:all_properties()
for x in (r)
  if (x in $code_utils.builtin_props)
    break
  elseif (is_clear_property(this, x))
    r = setremove(r, x)
  endif
endfor
return r
"Last modified by Slacker (#55) on Mon Jun 21 05:46:05 1999 MDT."
"This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:04 2002 MDT)."
"Last modified by Dax (#789) on Sat Aug 17 14:50:04 2002 MDT."
.