brew-aspell-dictionaries: make a developer command

This commit is contained in:
Mike McQuaid 2014-09-20 14:33:59 +01:00
parent ce6d76ed1c
commit af8a9ff502
2 changed files with 40 additions and 36 deletions

View File

@ -1,36 +0,0 @@
require 'open-uri'
require 'resource'
require 'formula'
dict_url = "http://ftpmirror.gnu.org/aspell/dict"
dict_mirror = "http://ftp.gnu.org/gnu/aspell/dict"
languages = {}
open("#{dict_url}/0index.html") do |content|
content.each_line do |line|
break if %r{^</table} === line
next unless /^<tr><td><a/ === line
fields = line.split('"')
lang, path = fields[1], fields[3]
lang.gsub!("-", "_")
languages[lang] = path
end
end
languages.inject([]) do |resources, (lang, path)|
r = Resource.new(lang)
r.owner = Formulary.factory("aspell")
r.url "#{dict_url}/#{path}"
r.mirror "#{dict_mirror}/#{path}"
resources << r
end.each(&:fetch).each do |r|
puts <<-EOS
resource "#{r.name}" do
url "#{r.url}"
mirror "#{r.mirrors.first}"
sha1 "#{r.cached_download.sha1}"
end
EOS
end

View File

@ -0,0 +1,40 @@
require 'open-uri'
require 'resource'
require 'formula'
module Homebrew
def aspell_dictionaries
dict_url = "http://ftpmirror.gnu.org/aspell/dict"
dict_mirror = "http://ftp.gnu.org/gnu/aspell/dict"
languages = {}
open("#{dict_url}/0index.html") do |content|
content.each_line do |line|
break if %r{^</table} === line
next unless /^<tr><td><a/ === line
fields = line.split('"')
lang, path = fields[1], fields[3]
lang.gsub!("-", "_")
languages[lang] = path
end
end
languages.inject([]) do |resources, (lang, path)|
r = Resource.new(lang)
r.owner = Formulary.factory("aspell")
r.url "#{dict_url}/#{path}"
r.mirror "#{dict_mirror}/#{path}"
resources << r
end.each(&:fetch).each do |r|
puts <<-EOS
resource "#{r.name}" do
url "#{r.url}"
mirror "#{r.mirrors.first}"
sha1 "#{r.cached_download.sha1}"
end
EOS
end
end
end