Revision 7238,
1.4 KB
checked in by daisuke, 12 years ago
(diff) |
import emacsen-common
|
Line | |
---|
1 | #!/usr/bin/ruby |
---|
2 | |
---|
3 | action = $0 |
---|
4 | |
---|
5 | if $0 =~ /flavors/ |
---|
6 | then |
---|
7 | $element = "flavors" |
---|
8 | else |
---|
9 | $element = "elisp" |
---|
10 | end |
---|
11 | |
---|
12 | |
---|
13 | |
---|
14 | prefix="/" |
---|
15 | package = ARGV[0] |
---|
16 | |
---|
17 | oldlists = Array.new |
---|
18 | @requires = Array.new |
---|
19 | |
---|
20 | open(prefix+"/var/lib/emacsen-common/installed-"+$element,"r").each{|list| |
---|
21 | list.chomp! |
---|
22 | oldlists.push(list.to_s) |
---|
23 | }.close |
---|
24 | |
---|
25 | if !oldlists.include?(package) |
---|
26 | then |
---|
27 | elsif action =~/remove/ |
---|
28 | oldlists.delete(package) |
---|
29 | a = open(prefix+"/var/lib/emacsen-common/installed-"+$element,"w") |
---|
30 | oldlists.each{|list| |
---|
31 | a.write(list+"\n") |
---|
32 | } |
---|
33 | a.close |
---|
34 | |
---|
35 | exit |
---|
36 | else |
---|
37 | exit |
---|
38 | end |
---|
39 | |
---|
40 | def getrequire(package) |
---|
41 | |
---|
42 | array = open("|apt-cache depends "+package,"r").readlines.select{ |line| |
---|
43 | true if (line =~/ /)||(line =~/ Depends: [^<^>]+/) |
---|
44 | } |
---|
45 | array.each{|packages| |
---|
46 | packages.gsub!(/ /,"") |
---|
47 | packages.gsub!(/[ ]+Depends:[ ]+/,"") |
---|
48 | packages.chomp! |
---|
49 | #print "package:"+packages+"\n" |
---|
50 | # unless @requires.member?(packages) |
---|
51 | @requires.unshift(packages) |
---|
52 | # getrequire(packages) |
---|
53 | # end |
---|
54 | |
---|
55 | } |
---|
56 | end |
---|
57 | |
---|
58 | |
---|
59 | # getrequire(package) |
---|
60 | indexnumber = -1 |
---|
61 | |
---|
62 | if oldlists.include?(package) |
---|
63 | then |
---|
64 | newlists = oldlists |
---|
65 | else |
---|
66 | newlists = oldlists.push(package) |
---|
67 | end |
---|
68 | |
---|
69 | |
---|
70 | #if indexnumber == -1 |
---|
71 | #then |
---|
72 | # newlists = [package]+ oldlists |
---|
73 | #else |
---|
74 | # newlists = oldlists[0..indexnumber]+[package]+oldlists[indexnumber+1,oldlists.length-1-indexnumber] |
---|
75 | #end |
---|
76 | |
---|
77 | a = open(prefix+"/var/lib/emacsen-common/installed-"+$element,"w") |
---|
78 | newlists.each{|list| |
---|
79 | a.write(list+"\n") |
---|
80 | } |
---|
81 | a.close |
---|
82 | |
---|
83 | |
---|
Note: See
TracBrowser
for help on using the repository browser.