(fork_exec) actually pass extra arguments to forked process

1 files changed, 1 insertions, 2 deletions

diff --git a/mdkapplet b/mdkapplet
index 4807c2dc..237d1ae9 100755
--- a/mdkapplet
+++ b/mdkapplet
@@ -190,10 +190,9 @@ sub harvester {
     return if $clean;
 }
 sub fork_exec {
-    my ($prog) = @_;
     my $pid = fork();
     if (defined $pid) {
-        !$pid and do { exec($prog) or POSIX::_exit() };
+        !$pid and do { exec(@_) or POSIX::_exit() };
         return $pid;
     } else {
         refresh_gui(1);