1ec
@verb #9677:"getall" any none none rdo #9677
@program #9677:"getall" any none none
container = player:my_match_object(dobjstr)
if (container == #-3 || container == #-2)
  return player:tell("Sorry, couldn't find that container")
endif
for item in (container.contents)
  try
    item:moveto(this)
  except error (ANY)
    player:tell(item.name, " doesn't want to be moved to ", this.name, ".")
  endtry
endfor
"Last modified by Blair (#9677) on Sun Jul 28 10:31:40 2002 MDT."
.

0