diff options
author | rmanfredi <rmanfredi@2592e710-e01b-42a5-8df0-11608a6cc53d> | 2010-03-06 20:15:24 +0000 |
---|---|---|
committer | rmanfredi <rmanfredi@2592e710-e01b-42a5-8df0-11608a6cc53d> | 2010-03-06 20:15:24 +0000 |
commit | 45f34b62e4f5cc108e06430cb5dffeba210fab9a (patch) | |
tree | d737b796eb3cf7e8154d1d404cb9207027287e77 /pat/patname.SH | |
parent | 862f3dc3b64fcff2a9e91d616b1566905443a4e9 (diff) |
Fixed perl startup line since version 5.10 does not support "$*" any longer.
git-svn-id: svn://svn.code.sf.net/p/dist/code/trunk/dist@31 2592e710-e01b-42a5-8df0-11608a6cc53d
Diffstat (limited to 'pat/patname.SH')
-rwxr-xr-x | pat/patname.SH | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pat/patname.SH b/pat/patname.SH index 9397329..8f99b1a 100755 --- a/pat/patname.SH +++ b/pat/patname.SH @@ -17,7 +17,7 @@ esac echo "Extracting pat/patname (with variable substitutions)" cat >patname <<!GROK!THIS! $startperl - eval "exec perl -S \$0 \$*" + eval 'exec perl -S \$0 \${1+"\$@"}' if \$running_under_some_shell; # $Id$ |