From 59c2cb1f52c90f69a500a5d5c4cd6ea8fe1278e7 Mon Sep 17 00:00:00 2001
From: Kuoi <kuoi@bioarchlinux.org>
Date: Thu, 15 Jun 2023 02:20:37 +0800
Subject: [PATCH] try: formatting

---
 gen_iso.perl | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/gen_iso.perl b/gen_iso.perl
index e97716c..e1873fd 100644
--- a/gen_iso.perl
+++ b/gen_iso.perl
@@ -20,9 +20,8 @@ sub system_setup {
 }
 
 sub transfer_docker {
-   my ($subdir, $dest_dir) = @_;
-   my $path = $dest_dir . $subdir;
-   system('docker', 'cp', $path, "bio:/root/");
+   my ($path) = @_;
+   system('docker', 'cp', $path, 'bio:/root/');
 }
 
 sub prepare_files {
@@ -140,8 +139,8 @@ run_docker_container();
 system_setup();
 
 # transfer
-transfer_docker('/bio', $abpath);
-transfer_docker('/bio-wayfire', $abpath);
+transfer_docker( $abpath . '/bio' );
+transfer_docker( $abpath . '/bio-wayfire' );
 
 # Call prepare_files function before copying templates
 prepare_files( $abpath );