class Thor::Runner

def display_klasses(with_modules=false, klasses=Thor.subclasses)
  klasses -= [Thor, Thor::Runner] unless with_modules
  raise Error, "No Thor tasks available" if klasses.empty?
  if with_modules && !thor_yaml.empty?
    info  = []
    labels = ["Modules", "Namespaces"]
    info << labels
    info << [ "-" * labels[0].size, "-" * labels[1].size ]
    thor_yaml.each do |name, hash|
      info << [ name, hash[:namespaces].join(", ") ]
    end
    print_table info
    say ""
  end
  unless klasses.empty?
    klasses.dup.each do |klass|
      klasses -= Thor::Util.thor_classes_in(klass)
    end
    klasses.each { |k| display_tasks(k) }
  else
    say "\033[1;34mNo Thor tasks available\033[0m"
  end
end