HEX
Server: Apache
System: Linux pdx1-shared-a1-38 6.6.104-grsec-jammy+ #3 SMP Tue Sep 16 00:28:11 UTC 2025 x86_64
User: mmickelson (3396398)
PHP: 8.1.31
Disabled: NONE
Upload Files
File: //usr/share/perl5/Devscripts/Salsa/update_safe.pm
# launches check_repo and launch uscan_repo if user agrees with this changes
package Devscripts::Salsa::update_safe;

use strict;
use Devscripts::Output;
use Moo::Role;

with 'Devscripts::Salsa::check_repo';
with 'Devscripts::Salsa::update_repo';

sub update_safe {
    my $self = shift;
    my ($res, $fails) = $self->_check_repo(@_);
    return 0 unless ($res);
    return $res
      if (ds_prompt("$res packages misconfigured, update them ? (Y/n) ")
        =~ refuse);
    $Devscripts::Salsa::update_repo::prompt = 0;
    return $self->_update_repo(@$fails);
}

1;