fix for ponyquotes in tty

This commit is contained in:
Mattias Andrée 2012-07-24 18:03:57 +02:00
parent e36fdec84b
commit 7f5fc135cf

View file

@ -146,7 +146,7 @@ say() {
# Ponies use UTF-8 drawing characters. Prevent a Perl warning. # Ponies use UTF-8 drawing characters. Prevent a Perl warning.
export PERL_UNICODE=S export PERL_UNICODE=S
if [ "$TERM" = "linux" ]; then if [ "$TERM" = "linux" ] || [ "$TERM" = "-linux-" ]; then
echo -ne '\e[H\e[2J' echo -ne '\e[H\e[2J'
fi fi
@ -244,6 +244,7 @@ if [[ $usepq = 1 ]]; then
/usr/bin/pq4ps $@ /usr/bin/pq4ps $@
} }
fi fi
[[ "$TERM" = "-linux-" ]] && TERM="linux"
$0 ${wrap:+-W$wrap} $(q "$*") $0 ${wrap:+-W$wrap} $(q "$*")
exit exit
fi fi