@verb #9677:"putall" any none none rdo #9677
@program #9677:"putall" 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 (this.contents)
  try
    item:moveto(container)
  except error (ANY)
    player:tell(item.name, " doesn't want to be moved to ", container.name, ".")
  endtry
endfor
"Last modified by Blair (#9677) on Sat Jul 27 13:11:23 2002 MDT."
.