Parent Directory
| 
Revision Log
| 
Patch
| revision 389211 by tv, Thu Jan 17 20:18:04 2013 UTC | revision 389212 by tv, Thu Jan 17 21:28:45 2013 UTC | |
|---|---|---|
| # | Line 222 foreach my $path (keys %$h) { | Line 222 foreach my $path (keys %$h) { |
| 222 | } | } |
| 223 | ||
| 224 | sub _filter { | sub _filter { |
| 225 | grep { $_->{required} ? install::pkgs::packageByName($::o->{packages}, $_->{required}) : 1 } map { @$_ } @_; | grep { $_->{required} ? (any { install::pkgs::packageByName($::o->{packages}, $_ ) } @{$_->{required}}) : 1 } map { @$_ } @_; |
| 226 | } | } |
| 227 | ||
| 228 | my $compssUsers = [ _filter(values %$h) ]; | my $compssUsers = [ _filter(values %$h) ]; |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.28 |