summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xscript/borg-restore.pl5
1 files changed, 2 insertions, 3 deletions
diff --git a/script/borg-restore.pl b/script/borg-restore.pl
index ded825e..dff013f 100755
--- a/script/borg-restore.pl
+++ b/script/borg-restore.pl
@@ -108,6 +108,7 @@ use App::BorgRestore::Settings;
use autodie;
use Cwd qw(abs_path);
use File::Basename;
+use Function::Parameters;
use Getopt::Long;
use Log::Any qw($log);
use Log::Any::Adapter;
@@ -120,9 +121,7 @@ use Pod::Usage;
my $app;
-sub user_select_archive {
- my $archives = shift;
-
+fun user_select_archive ($archives) {
my $selected_archive;
if (!@$archives) {