summaryrefslogtreecommitdiffstats
path: root/files/reprepro/snapshots
diff options
context:
space:
mode:
authorCyril Brulebois <cyril@debamax.com>2016-04-05 19:23:21 +0200
committerCyril Brulebois <cyril@debamax.com>2016-04-05 19:47:11 +0200
commit228c4d561fb0b8e932fbc1e3c5d48c20cb2ce1e8 (patch)
tree62cd808ffc90bef125c7f39f57bb25d3a70b4040 /files/reprepro/snapshots
parent965d0803aa01ea498fd2fe02c657be7486440d64 (diff)
Switch from capture to capturex to avoid the shell.
Better be safe than sorry. Signed-off-by: Cyril Brulebois <cyril@debamax.com>
Diffstat (limited to 'files/reprepro/snapshots')
-rwxr-xr-xfiles/reprepro/snapshots/time_based/tails-delete-expired-apt-snapshots4
1 files changed, 2 insertions, 2 deletions
diff --git a/files/reprepro/snapshots/time_based/tails-delete-expired-apt-snapshots b/files/reprepro/snapshots/time_based/tails-delete-expired-apt-snapshots
index 4b27729..96048e5 100755
--- a/files/reprepro/snapshots/time_based/tails-delete-expired-apt-snapshots
+++ b/files/reprepro/snapshots/time_based/tails-delete-expired-apt-snapshots
@@ -14,7 +14,7 @@ use File::Basename;
use File::Find::Rule;
use File::Slurp;
use Getopt::Long;
-use IPC::System::Simple qw(capture runx);
+use IPC::System::Simple qw(capturex runx);
use List::MoreUtils qw(uniq);
@@ -62,7 +62,7 @@ my @reprepro_references =
uniq
map { (split / /, $_)[0] }
grep { $_ =~ /^s=/ }
- capture("reprepro -b $archive_dir dumpreferences");
+ capturex('reprepro', '-b', $archive_dir, 'dumpreferences');
verbose_print("reprepro-known snapshot references:", (join "\n - ", '', @reprepro_references), "\n");
my $now = DateTime->now();