#
# file::    cmd_pardon.rb

# This source code copyright (C) 2009 Craig Smith
# All rights reserved.
#
# Released under the terms of the TeensyMUD Public License
# See LICENSE file for additional information.
#

module Cmd

  bindtextdomain("cmd")

  # The pardons a player that was marked as a player killer
  def cmd_pardon(args)
	case args
	when nil, ""
		sendto _("Pardon whom?")
	else
		ppl = peopleinroom(args)
		case ppl.size
		when 0
			sendto _("You do not seem them here.")
		when 1
			p = ppl[0]
			if p.is_a? Character and p.has_attribute? :PK
				p.del_attribute(:PK)
				sendto _("You have pardoned them.")
				msg = Msg.new _("^p1 has pardoned you.")
				msg.p1 = name
				add_event(id, p.id, :show, msg)
			else
				sendto _("They are not a player killer.")
			end
		else
			sendto _("Which one?")
		end
	end
  end

end