Changeset 7907


Ignore:
Timestamp:
2007-07-10T22:36:25+02:00 (11 years ago)
Author:
nbd
Message:

fix PACKAGES:= for target profiles in target.mk

Files:
2 edited

Legend:

Unmodified
Added
Removed
  • tags/kamikaze_7.07/scripts/metadata.pl

    r7095 r7907  
    132132} 
    133133 
     134sub merge_package_lists($$) { 
     135        my $list1 = shift; 
     136        my $list2 = shift; 
     137        my @l = (); 
     138        my %pkgs; 
     139 
     140        foreach my $pkg (@$list1, @$list2) { 
     141                $pkgs{$pkg} = 1; 
     142        } 
     143        foreach my $pkg (keys %pkgs) { 
     144                push @l, $pkg unless ($pkg =~ /^-/ or $pkgs{"-$pkg"}); 
     145        } 
     146        return sort(@l); 
     147} 
    134148 
    135149sub gen_target_mk() { 
     
    150164    ID:=$profile->{id} 
    151165    NAME:=$profile->{name} 
    152     PACKAGES:=".join(" ", @{$profile->{packages}})."\n"; 
     166    PACKAGES:=".join(" ", merge_package_lists($target->{packages}, $profile->{packages}))."\n"; 
    153167                        $profile->{kconfig} and $profiles_def .= "    KCONFIG:=1\n"; 
    154168                        $profiles_def .= "  endef"; 
     
    304318EOF 
    305319                        $profile->{kconfig} and print "\tselect PROFILE_KCONFIG\n"; 
    306                         my %pkgs; 
    307                         foreach my $pkg (@{$target->{packages}}, @{$profile->{packages}}) { 
    308                                 $pkgs{$pkg} = 1; 
    309                         } 
    310                         foreach my $pkg (keys %pkgs) { 
    311                                 print "\tselect DEFAULT_$pkg\n" unless ($pkg =~ /^-/ or $pkgs{"-$pkg"}); 
     320                        my @pkglist = merge_package_lists($target->{packages}, $profile->{packages}); 
     321                        foreach my $pkg (@pkglist) { 
     322                                print "\tselect DEFAULT_$pkg\n"; 
    312323                        } 
    313324                        print "\n"; 
     
    317328        print "endchoice\n"; 
    318329} 
     330 
    319331 
    320332sub find_package_dep($$) { 
  • trunk/scripts/metadata.pl

    r7095 r7907  
    132132} 
    133133 
     134sub merge_package_lists($$) { 
     135        my $list1 = shift; 
     136        my $list2 = shift; 
     137        my @l = (); 
     138        my %pkgs; 
     139 
     140        foreach my $pkg (@$list1, @$list2) { 
     141                $pkgs{$pkg} = 1; 
     142        } 
     143        foreach my $pkg (keys %pkgs) { 
     144                push @l, $pkg unless ($pkg =~ /^-/ or $pkgs{"-$pkg"}); 
     145        } 
     146        return sort(@l); 
     147} 
    134148 
    135149sub gen_target_mk() { 
     
    150164    ID:=$profile->{id} 
    151165    NAME:=$profile->{name} 
    152     PACKAGES:=".join(" ", @{$profile->{packages}})."\n"; 
     166    PACKAGES:=".join(" ", merge_package_lists($target->{packages}, $profile->{packages}))."\n"; 
    153167                        $profile->{kconfig} and $profiles_def .= "    KCONFIG:=1\n"; 
    154168                        $profiles_def .= "  endef"; 
     
    304318EOF 
    305319                        $profile->{kconfig} and print "\tselect PROFILE_KCONFIG\n"; 
    306                         my %pkgs; 
    307                         foreach my $pkg (@{$target->{packages}}, @{$profile->{packages}}) { 
    308                                 $pkgs{$pkg} = 1; 
    309                         } 
    310                         foreach my $pkg (keys %pkgs) { 
    311                                 print "\tselect DEFAULT_$pkg\n" unless ($pkg =~ /^-/ or $pkgs{"-$pkg"}); 
     320                        my @pkglist = merge_package_lists($target->{packages}, $profile->{packages}); 
     321                        foreach my $pkg (@pkglist) { 
     322                                print "\tselect DEFAULT_$pkg\n"; 
    312323                        } 
    313324                        print "\n"; 
     
    317328        print "endchoice\n"; 
    318329} 
     330 
    319331 
    320332sub find_package_dep($$) { 
Note: See TracChangeset for help on using the changeset viewer.