diff options
| author | kuriyama <kuriyama@FreeBSD.org> | 2004-01-20 10:28:15 +0800 |
|---|---|---|
| committer | kuriyama <kuriyama@FreeBSD.org> | 2004-01-20 10:28:15 +0800 |
| commit | f0dc8b8ada2d3aa9336a2346483fd2094ef768a2 (patch) | |
| tree | 416f9cd850742557e36e58c41649791085da451c /lang/perl5.14/files | |
| parent | 15c37b2b780eddd096daa8793f487ad44dea93b4 (diff) | |
| download | freebsd-ports-gnome-f0dc8b8ada2d3aa9336a2346483fd2094ef768a2.tar.gz freebsd-ports-gnome-f0dc8b8ada2d3aa9336a2346483fd2094ef768a2.tar.zst freebsd-ports-gnome-f0dc8b8ada2d3aa9336a2346483fd2094ef768a2.zip | |
Check /usr/bin/perl5 existence before using "ident -q /usr/bin/perl5".
Approved by: tobez
Diffstat (limited to 'lang/perl5.14/files')
| -rw-r--r-- | lang/perl5.14/files/use.perl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lang/perl5.14/files/use.perl b/lang/perl5.14/files/use.perl index bed88bd46d44..354c8e1e59cc 100644 --- a/lang/perl5.14/files/use.perl +++ b/lang/perl5.14/files/use.perl @@ -17,7 +17,7 @@ EOF my $port_perl = '%%PREFIX%%/bin/perl'; $port_perl =~ tr|/|/|s; -my $ident = `/usr/bin/ident -q /usr/bin/perl5`; +my $ident = `[ -r /usr/bin/perl5 ] && /usr/bin/ident -q /usr/bin/perl5`; @ARGV == 1 or usage(); if ($ARGV[0] eq 'port') { |