Perl 5.10 no longer supports "$*" anywhere... even in the initial exec line

meant to be parsed by the shell...


git-svn-id: https://dist.svn.sourceforge.net/svnroot/dist/trunk/dist@22 190e5f8e-a817-0410-acf6-e9863daed9af

4 files changed, 4 insertions, 4 deletions

diff --git a/mcon/makegloss.SH b/mcon/makegloss.SH
index 991a214..ffe72a2 100755
--- a/mcon/makegloss.SH
+++ b/mcon/makegloss.SH
@@ -17,7 +17,7 @@ esac
 echo "Extracting mcon/makegloss (with variable substitutions)"
 $spitshell >makegloss <<!GROK!THIS!
 $startperl
-	eval "exec perl -S \$0 \$*"
+	eval 'exec perl -S \$0 \${1+"\$@"}'
 		if \$running_under_some_shell;
 
 !GROK!THIS!
diff --git a/mcon/mconfig.SH b/mcon/mconfig.SH
index 140fb6e..adcf0a2 100755
--- a/mcon/mconfig.SH
+++ b/mcon/mconfig.SH
@@ -17,7 +17,7 @@ esac
 echo "Extracting mcon/mconfig (with variable substitutions)"
 cat >mconfig <<!GROK!THIS!
 $startperl
-	eval "exec perl -S \$0 \$*"
+	eval 'exec perl -S \$0 \${1+"\$@"}'
 		if \$running_under_some_shell;
 
 # $Id$
diff --git a/mcon/mlint.SH b/mcon/mlint.SH
index 7f1f550..62d4021 100755
--- a/mcon/mlint.SH
+++ b/mcon/mlint.SH
@@ -17,7 +17,7 @@ esac
 echo "Extracting mcon/mlint (with variable substitutions)"
 cat >mlint <<!GROK!THIS!
 $startperl
-	eval "exec perl -S \$0 \$*"
+	eval 'exec perl -S \$0 \${1+"\$@"}'
 		if \$running_under_some_shell;
 
 # $Id$
diff --git a/mcon/mxref.SH b/mcon/mxref.SH
index 8e52842..51ea87f 100755
--- a/mcon/mxref.SH
+++ b/mcon/mxref.SH
@@ -17,7 +17,7 @@ esac
 echo "Extracting mcon/mxref (with variable substitutions)"
 cat >mxref <<!GROK!THIS!
 $startperl
-	eval "exec perl -S \$0 \$*"
+	eval 'exec perl -S \$0 \${1+"\$@"}'
 		if \$running_under_some_shell;
 
 # $Id$