summaryrefslogtreecommitdiffstats
path: root/lib/Devscripts/Salsa/update_safe.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Devscripts/Salsa/update_safe.pm')
-rw-r--r--lib/Devscripts/Salsa/update_safe.pm22
1 files changed, 22 insertions, 0 deletions
diff --git a/lib/Devscripts/Salsa/update_safe.pm b/lib/Devscripts/Salsa/update_safe.pm
new file mode 100644
index 0000000..f022db7
--- /dev/null
+++ b/lib/Devscripts/Salsa/update_safe.pm
@@ -0,0 +1,22 @@
+# launches check_projects and launch update_projects if user agrees with this changes
+package Devscripts::Salsa::update_safe;
+
+use strict;
+use Devscripts::Output;
+use Moo::Role;
+
+with 'Devscripts::Salsa::check_repo'; # check_projects
+with 'Devscripts::Salsa::update_repo'; # update_projects
+
+sub update_safe {
+ my $self = shift;
+ my ($res, $fails) = $self->_check_repo(@_);
+ return 0 unless ($res);
+ return $res
+ if (ds_prompt("$res projects misconfigured, update them ? (Y/n) ")
+ =~ refuse);
+ $Devscripts::Salsa::update_repo::prompt = 0;
+ return $self->_update_repo(@$fails);
+}
+
+1;