Wed, 16 Jun 2021 12:21:26 -0500
perl syntax fixes maybe
672 | 1 | #!/bin/sh |
2 | set -eu | |
3 | ||
743
76c4c96d8b9f
Use term formatter, if term
Meredith Howard <mhoward@roomag.org>
parents:
672
diff
changeset
|
4 | if [ -t 1 ]; then |
76c4c96d8b9f
Use term formatter, if term
Meredith Howard <mhoward@roomag.org>
parents:
672
diff
changeset
|
5 | export PERLDOC="-oterm ${PERLDOC:-}" |
76c4c96d8b9f
Use term formatter, if term
Meredith Howard <mhoward@roomag.org>
parents:
672
diff
changeset
|
6 | fi |
76c4c96d8b9f
Use term formatter, if term
Meredith Howard <mhoward@roomag.org>
parents:
672
diff
changeset
|
7 | |
672 | 8 | if [ -x "$(command -v cpandoc)" ]; then |
9 | exec cpandoc $* | |
10 | fi | |
774 | 11 | |
12 | BIN="$(which -a perldoc | grep -v $0 | head -n 1)" | |
13 | exec $BIN $* |