author | Rich Burridge <rich.burridge@oracle.com> |
Thu, 13 Dec 2012 16:36:41 -0800 | |
changeset 1083 | dcfa3638d3e2 |
child 5383 | daa35fd7ea40 |
permissions | -rw-r--r-- |
1083
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
1 |
This patch is needed because the sql script is expecting the which |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
2 |
command to return errors on stderr, not stdout and assumes anything |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
3 |
on stdout is an actual path. (And since /bin/which starts a new |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
4 |
csh, it only checks .cshrc $PATH not current $PATH settings.) |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
5 |
|
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
6 |
--- parallel-20120422/src/sql.orig 2012-12-11 13:21:20.855778203 -0800 |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
7 |
+++ parallel-20120422/src/sql 2012-12-11 13:22:33.870295549 -0800 |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
8 |
@@ -890,7 +890,7 @@ |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
9 |
sub find_command_in_path { |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
10 |
# Find the command if it exists in the current path |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
11 |
my $command = shift; |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
12 |
- my $path = `which $command`; |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
13 |
+ my $path = `/usr/gnu/bin/which $command`; |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
14 |
chomp $path; |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
15 |
return $path; |
dcfa3638d3e2
PSARC 2012/182 GNU parallel version 20120422
Rich Burridge <rich.burridge@oracle.com>
parents:
diff
changeset
|
16 |
} |