From 2bad47df5f34bc3edd11bccdadc3f8ca8a235a07 Mon Sep 17 00:00:00 2001 From: Milan Date: Wed, 31 May 2023 20:30:32 +0200 Subject: [PATCH] tools/remove-recordings.pl: print simple list of files w/o special line format --- tools/remove-recordings.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tools/remove-recordings.pl b/tools/remove-recordings.pl index 6ea112c..b38990c 100644 --- a/tools/remove-recordings.pl +++ b/tools/remove-recordings.pl @@ -30,7 +30,7 @@ for my $file (sort glob("$dir/*")) { next if -M $file < 14; my $filename = normalize($file); unless (exists $paths{$filename}) { - print " --- $filename\n"; + print "$filename\n"; unlink $file or die $! if $delete; } }