25f
@verb #12:"moveable" this none this rxdo #8084
@program #12:"moveable" this none this
"Moveable if target is a room, perms controls the location of here, we're doing some variety of a snarf, or else we control the object (pass)."
{target} = args
set_task_perms(caller_perms())
if (!`target:isa($room) ! E_INVIND => 0')
  "#-XXXX is not a room. Suprised?"
  return 0
elseif (caller_perms():controls(this.location))
  return 1
elseif (target.location == this.location && player == this)
  return 1
endif
return pass(@args)
"Last modified by Lao-Tzu (#8084) on Sun Aug 16 22:15:42 1998 EDT."
.

0