From: b <rowerynaksiezycu@gmail.com>
Date: Sat, 8 Jul 2023 16:33:53 +0000 (+0000)
Subject: fix system call
X-Git-Tag: v1.0.16
X-Git-Url: http://bicyclesonthemoon.info/git-projects/?a=commitdiff_plain;h=refs%2Ftags%2Fv1.0.16;p=botm%2Fcommon-perl

fix system call
---

diff --git a/botm_common.pm b/botm_common.pm
index a93b118..0f3f2d9 100644
--- a/botm_common.pm
+++ b/botm_common.pm
@@ -25,7 +25,7 @@ use Encode ('encode', 'decode');
 
 use Exporter;
 
-our $VERSION     = '1.0.15';
+our $VERSION     = '1.0.16';
 our @ISA         = qw(Exporter);
 our @EXPORT      = ();
 our @EXPORT_OK   = (
@@ -103,7 +103,7 @@ sub system_encoded {
 		push @newarg, encode('locale', $a);
 	}
 	
-	return system $newcmd, @newarg;
+	return system {$newcmd} @newarg;
 }
 
 sub exec_encoded {