class RDoc::RI::Driver

def list_known_classes
  classes = []
  stores.each do |store|
    classes << store.modules
  end
  classes = classes.flatten.uniq.sort
  page do |io|
    if paging? or io.tty? then
      io.puts "Classes and Modules known to ri:"
      io.puts
    end
    io.puts classes.join("\n")
  end
end