From 00046080c94f68d8fa9277b02808975fb2347d15 Mon Sep 17 00:00:00 2001
From: Jason Etheridge <jason@EquinoxInitiative.org>
Date: Mon, 8 Apr 2019 05:11:42 -0400
Subject: [PATCH] fix Experimental unshift on scalar is now forbidden with newer Perl

---
 mig-bin/mig-quick |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/mig-bin/mig-quick b/mig-bin/mig-quick
index ba1d7ac..59b0843 100755
--- a/mig-bin/mig-quick
+++ b/mig-bin/mig-quick
@@ -46,7 +46,7 @@ my %pass_thru = ('add'=>[],'skip-iconv'=>[],'clean'=>[],'convert'=>[],'stage'=>[
 foreach my $a (@ARGV) {
     if ($a =~ /^--([a-z]+)-(.*)$/) {
         $pass_thru{$1} = [] if ! defined $pass_thru{$1};
-        unshift $pass_thru{$1}, "--$2";
+        unshift @{ $pass_thru{$1} }, "--$2";
     }
 }
 
-- 
1.7.2.5