From b20bfd83146e0f60cea539eb3c6eea39f8ad549d Mon Sep 17 00:00:00 2001 Message-Id: From: Mark Wooding Date: Tue, 7 Jul 2009 19:20:09 +0100 Subject: [PATCH] mdw-pager: New hack for pager support. Organization: Straylight/Edgeware From: Mark Wooding Emacs runs sobprocesses, like `grep', with output to a pty, which confuses `git grep' in particular into running a pager. We intercept the pager, using a script, which checks for Emacs's crappy pty and simply runs `cat'. --- bash_profile | 2 +- mdw-pager | 11 +++++++++++ setup | 1 + 3 files changed, 13 insertions(+), 1 deletion(-) create mode 100755 mdw-pager diff --git a/bash_profile b/bash_profile index 08e4e13..37ed0ea 100644 --- a/bash_profile +++ b/bash_profile @@ -155,7 +155,7 @@ export P4PORT=`mdw-conf p4-port` P4USER=`mdw-conf p4-user` export BECOME="--preserve-environment" -export PAGER=`type -p less` METAMAIL_PAGER=`type -p less` +export MDW_PAGER=`type -p less` PAGER=mdw-pager METAMAIL_PAGER=mdw-pager export LESS="-iqgRh1FX" export LESSOPEN="|lesspipe.sh %s" case "${LC_CTYPE-$LANG}" in diff --git a/mdw-pager b/mdw-pager new file mode 100755 index 0000000..cd59476 --- /dev/null +++ b/mdw-pager @@ -0,0 +1,11 @@ +#! /bin/sh + +set -e +pager=${MDW_PAGER-less} +[ -t 1 ] || TERM=dumb +case "$PAGER,$TERM" in + mdw-pager,dumb) pager=cat;; + mdw-pager,*);; + *,*) pager=$PAGER;; +esac +exec $pager "$@" diff --git a/setup b/setup index 0d39cdb..50bb776 100755 --- a/setup +++ b/setup @@ -187,6 +187,7 @@ echo " done." scripts=" mdw-editor + mdw-pager mdw-conf mdw-build movemail-hack -- [mdw]