summaryrefslogtreecommitdiff
path: root/pat/patname.SH
diff options
context:
space:
mode:
authorrmanfredi <rmanfredi@2592e710-e01b-42a5-8df0-11608a6cc53d>2010-03-06 20:15:24 +0000
committerrmanfredi <rmanfredi@2592e710-e01b-42a5-8df0-11608a6cc53d>2010-03-06 20:15:24 +0000
commit45f34b62e4f5cc108e06430cb5dffeba210fab9a (patch)
treed737b796eb3cf7e8154d1d404cb9207027287e77 /pat/patname.SH
parent862f3dc3b64fcff2a9e91d616b1566905443a4e9 (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-xpat/patname.SH2
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$