/*
t_pascal@oxy.edu
6-2-92  Whisper verb updated to give to others round 'bout.

@verb $player:whisper any to this
*/
if (this.location == player.location)
  this:tell(player.name, " whispers, \"", dobjstr, "\"");
  player:tell("You whisper, \"", dobjstr, "\" to ", this.name, ".");
  if ($object_utils:isa($room,this.location))
    this.location:announce_all_but({player, this}, player.name, " whispers something to ", this.name);
  endif
else
  player:tell("Sorry, you may only whisper to things in the same room.");
endif