View/Edit #236:p_heat

Name(s): p_heat

1:  caller == this || raise(E_PERM)
2:  {targ} = args
3:  act = verb[3..$]
4:  if (!`targ:phase(act) ! E_VERBNF')
5:    $recycler:valid(targ) && targ == this.targ ? $msg:mtell(targ, "heat", targ) | targ:sub_tell(this:msg_heat())
6:    for object in (targ:contents())
7:      $command_utils:suspend_if_needed()
8:      this:(verb)(object)
9:    endfor
10: endif
11: "Last modified by manta (#7165) on Fri Sep 14 09:08:48 2001 MDT."

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

You are not logged in.