|
|
|
@ -4220,12 +4220,15 @@ sub lastver{
|
|
|
|
|
#
|
|
|
|
|
#------------------------------------------------------------------------------
|
|
|
|
|
sub emerge_pretend{
|
|
|
|
|
my $exec_default = "$data{emergerun1} -p --color n @packages $data{emergerun2} $softly 2>&1";
|
|
|
|
|
my $exec_world = "$data{emergerun1} -p --color n -uD world $data{emergerun2} $softly 2>&1";
|
|
|
|
|
|
|
|
|
|
my @packages = packages();
|
|
|
|
|
my $err;
|
|
|
|
|
|
|
|
|
|
@packages = (@{$data{movie_pretend}}, @packages); #объединим со списком зависимых пакетов (дублируя расположим их сверху)
|
|
|
|
|
my $softly; if(!defined $data{addition}){$softly = "--softly";}
|
|
|
|
|
foreach(`$data{emergerun1} -p --color n @packages $data{emergerun2} $softly 2>&1`){
|
|
|
|
|
foreach(`$exec_default`,`$exec_world`){
|
|
|
|
|
if(m/^- ([^ ]+)-[0-9\._pb]+(_pre[0-9]+)?(_rc[0-9]{1,2})?(-r[0-9]{1,2})?(_beta[0-9]{1,2})? .+masked by: package.mask/){
|
|
|
|
|
return $1, 'unmask';
|
|
|
|
|
}elsif(m/^- ([^ ]+)-[0-9\._pb]+(_pre[0-9]+)?(_rc[0-9]{1,2})?(-r[0-9]{1,2})?(_beta[0-9]{1,2})? .+masked by: $data{unmask} keyword/){
|
|
|
|
|