summaryrefslogtreecommitdiff
path: root/scripts
authorkergoth <kergoth>2003-01-16 04:39:25 (UTC)
committer kergoth <kergoth>2003-01-16 04:39:25 (UTC)
commit21cee2677c4a480f00675cdc9160e5d7e97e7122 (patch) (unidiff)
treea2e3b3f9675949fae2cf57e0f7b44441e7bfa06c /scripts
parent7ffd4623880396f07e34faf195f8c131218cf682 (diff)
downloadopie-21cee2677c4a480f00675cdc9160e5d7e97e7122.zip
opie-21cee2677c4a480f00675cdc9160e5d7e97e7122.tar.gz
opie-21cee2677c4a480f00675cdc9160e5d7e97e7122.tar.bz2
*** empty log message ***
Diffstat (limited to 'scripts') (more/less context) (ignore whitespace changes)
-rwxr-xr-xscripts/deps.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/deps.pl b/scripts/deps.pl
index feced6e..a219e36 100755
--- a/scripts/deps.pl
+++ b/scripts/deps.pl
@@ -40,33 +40,33 @@ sub makedepends ($$)
40 $mustbesep = 0; 40 $mustbesep = 0;
41 41
42 for $token (keys %$depends){ 42 for $token (keys %$depends){
43 print ${$tokenpath}{$token} . " : "; 43 print ${$tokenpath}{$token} . " : ";
44 for (split(/\s+/, ${$depends}{$token})){ 44 for (split(/\s+/, ${$depends}{$token})){
45 /^\s+$/ && next; 45 /^\s+$/ && next;
46 /\&\&/ && next; 46 /\&\&/ && next;
47 /\|\|/ && next; 47 /\|\|/ && next;
48 /^$/ && next; 48 /^$/ && next;
49 /^\($/ && next; 49 /^\($/ && next;
50 /^\)$/ && next; 50 /^\)$/ && next;
51 /^on$/ && next; 51 /^on$/ && next;
52 /^!$/ && next; 52 /^!$/ && next;
53 if(defined(${$tokenpath}{"CONFIG_" . $_})){ 53 if(defined(${$tokenpath}{"CONFIG_" . $_})){
54 print '$(if $(CONFIG_' . $_ . '),' . ${$tokenpath}{"CONFIG_" . $_} . ') '; 54 print '$(if $(CONFIG_' . $_ . '),' . ${$tokenpath}{"CONFIG_" . $_} . ') ';
55 } else { 55 } else {
56 print STDERR "Warning: unable to locate path for token CONFIG_$_\n"; 56 # print STDERR "Warning: unable to locate path for token CONFIG_$_\n";
57 } 57 }
58 } 58 }
59 print "\n"; 59 print "\n";
60 } 60 }
61} 61}
62 62
63while( <> ) { 63while( <> ) {
64 my $dep; 64 my $dep;
65 my ($token, $path, $pro); 65 my ($token, $path, $pro);
66 chomp; 66 chomp;
67 s/^\s*//g; 67 s/^\s*//g;
68 s/\s*$//g; 68 s/\s*$//g;
69 ($token, $path, $pro) = split(/\s+/,$_); 69 ($token, $path, $pro) = split(/\s+/,$_);
70 $tokenpath{$token} = $path; 70 $tokenpath{$token} = $path;
71 $dep = getdepends($token, $path); 71 $dep = getdepends($token, $path);
72 if( $dep ) { 72 if( $dep ) {