X-Git-Url: http://git.equinoxoli.org/?p=migration-tools.git;a=blobdiff_plain;f=mig-bin%2Fmig-quick;fp=mig-bin%2Fmig-quick;h=59b08437542e8d84a534dc6f5d48c01fd522f1e1;hp=ba1d7ac6e5ee569d78b2eff55a0db59836bd2562;hb=00046080c94f68d8fa9277b02808975fb2347d15;hpb=ad158c0688fafd046887fe34da9083a3784dadec

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";
     }
 }