mdw-pager: New hack for pager support.

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'.

diff --git a/bash_profile b/bash_profile
index 08e4e136f11b590fab9dde4ca753d092819e4061..37ed0ea9f3ba545c9e9821f12ae83c0c2d057cb1 100644 (file)
--- 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 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
 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 (executable)
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 0d39cdb14d812ee0d78a131a2bd2506bea9d64b7..50bb776638d972cda425c90fa957ed5dc529a390 100755 (executable)
--- a/setup
+++ b/setup
@@ -187,6 +187,7 @@ echo " done."
 
 scripts="
   mdw-editor
 
 scripts="
   mdw-editor

+  mdw-pager

   mdw-conf
   mdw-build
   movemail-hack
   mdw-conf
   mdw-build
   movemail-hack