class Player
  def cmd_create cte, arg
    if arg.is_a? String
      f = format_generator 5
      text_to_player "Syntax:  create <type>" + ENDL
      text_to_player "Valid types: " + ENDL
      $editable_classes.each_pair do |k, v|
        text_to_player "#{k} "
        text_to_player f.resume
      end
      text_to_player ENDL
      return
    end

    if arg.respond_to? :create
      obj = arg.create(self)
    else
      text_to_player "Error:  No method to create from that class." + ENDL
      return
    end

    @editing=@editing || []
    @editing.unshift obj
    text_to_player "Created.  You're currently editing #{@editing[0]}." + ENDL
    execute_command("show")
  end
end