Fix brew-leaves

This commit is contained in:
Adam Vandenberg 2010-09-08 07:48:11 -07:00
parent ef1f45fbc3
commit bb3f9c4f3e

View File

@ -1,9 +1,27 @@
# Outputs formulas that are installed but are not a dependency for
# any other installed formula.
# See: http://github.com/mxcl/homebrew/issues/issue/1438
require 'formula'
deps_graph = Formula.get_used_by
formulas = HOMEBREW_CELLAR.children.select { |pn| pn.directory? }.collect { |pn| pn.basename.to_s }
formulas.each do |name|
deps = deps_graph[name] || []
puts name if !deps.any? { |dep| formulas.include?(dep) }
def get_used_by
used_by = {}
Formula.all.each do |f|
next if f.deps == nil
f.deps.each do |dep|
_deps = used_by[dep] || []
_deps << f.name unless _deps.include? f.name
used_by[dep] = _deps
end
end
return used_by
end
deps_graph = get_used_by()
installed = HOMEBREW_CELLAR.children.select { |pn| pn.directory? }.collect { |pn| pn.basename.to_s }
installed.each do |name|
deps = deps_graph[name] || []
puts name unless deps.any? { |dep| installed.include? dep }
end