aboutsummaryrefslogtreecommitdiff
path: root/ponysay
diff options
context:
space:
mode:
authorMattias Andrée <maandree@operamail.com>2012-07-20 05:10:41 +0200
committerMattias Andrée <maandree@operamail.com>2012-07-20 05:10:41 +0200
commit301197ff740addf34ad866cfbc532ad9a205e0bd (patch)
tree0370e19cc20234f7244744c85535dddcc4154177 /ponysay
parent492b62f39e5a798a2253f2b39345313fb58ebae6 (diff)
downloadponysay-301197ff740addf34ad866cfbc532ad9a205e0bd.tar.gz
ponysay-301197ff740addf34ad866cfbc532ad9a205e0bd.tar.bz2
ponysay-301197ff740addf34ad866cfbc532ad9a205e0bd.zip
new environment variable, PONYSAY_COWSAY, allows replace cowsay with another program, if this variable has a value the "use uft8" patch will not be applies
Diffstat (limited to 'ponysay')
-rwxr-xr-xponysay28
1 files changed, 24 insertions, 4 deletions
diff --git a/ponysay b/ponysay
index de1aa09..2d2a321 100755
--- a/ponysay
+++ b/ponysay
@@ -12,7 +12,13 @@ if [ "$TERM" = "linux" ]; then
HOMEPONIES="${HOME}/.local/share/ponysay/ttyponies"
fi
-cmd=cowsay
+if [[ "$PONYSAY_COWSAY" = "" ]]; then
+ cmd=cowsay
+ customcmd=0
+else
+ cmd="$PONYSAY_COWSAY"
+ customcmd=1
+fi
[[ ${0} == *ponythink ]] && cmd=cowthink
version() {
@@ -208,14 +214,28 @@ say() {
tail --lines=$(( `stty size <&2 | cut -d ' ' -f 1` - $PONYSAY_SHELL_LINES ))
}
+ if [[ $customcmd = 0 ]]; then
+ function cowcmd
+ {
+ pcmd='#!/usr/bin/perl\nuse utf8;'
+ ccmd=$(for c in $(echo $PATH":" | sed -e 's/:/\/'"$cmd"' /g'); do if [[ -f $c ]]; then echo $c; break; fi done)
+ perl <(cat <(echo -e $pcmd) $ccmd) "$@"
+ }
+ else
+ function cowcmd
+ {
+ $cmd "$@"
+ }
+ fi
+
if [ "$TERM" = "linux" ] || [ "$PONYSAY_TRUNCATE_HEIGHT" = 'yes' ] || [ "$PONYSAY_TRUNCATE_HEIGHT" = 'y' ] || [ "$PONYSAY_TRUNCATE_HEIGHT" = '1' ]; then
if [ "$PONYSAY_BOTTOM" = 'yes' ] || [ "$PONYSAY_BOTTOM" = 'y' ] || [ "$PONYSAY_BOTTOM" = '1' ]; then
- perl <(cat <(echo -e '#!/usr/bin/perl\nuse utf8;') $(for c in $(echo $PATH":" | sed -e 's/:/\/'"$cmd"' /g'); do if [[ -f $c ]]; then echo $c; break; fi done)) -f "$pony" "${wrap:+-W$wrap}" | wtrunc | htrunctail
+ cowcmd -f "$pony" "${wrap:+-W$wrap}" | wtrunc | htrunctail
else
- perl <(cat <(echo -e '#!/usr/bin/perl\nuse utf8;') $(for c in $(echo $PATH":" | sed -e 's/:/\/'"$cmd"' /g'); do if [[ -f $c ]]; then echo $c; break; fi done)) -f "$pony" "${wrap:+-W$wrap}" | wtrunc | htrunchead
+ cowcmd -f "$pony" "${wrap:+-W$wrap}" | wtrunc | htrunchead
fi
else
- perl <(cat <(echo -e '#!/usr/bin/perl\nuse utf8;') $(for c in $(echo $PATH":" | sed -e 's/:/\/'"$cmd"' /g'); do if [[ -f $c ]]; then echo $c; break; fi done)) -f "$pony" "${wrap:+-W$wrap}" | wtrunc
+ cowcmd -f "$pony" "${wrap:+-W$wrap}" | wtrunc
fi
}