X-Git-Url: https://git.distorted.org.uk/~mdw/profile/blobdiff_plain/0a469e47aae261200c3e3fe0701d37f7970bf3ad..159aaffc22a56b9c4a0a402367338281b3b98aaa:/dot/shell-rc

diff --git a/dot/shell-rc b/dot/shell-rc
index b8bfb3d..5251e98 100644
--- a/dot/shell-rc
+++ b/dot/shell-rc
@@ -175,7 +175,7 @@ __mdw_set_prompt () {
 
 __mdw_xterm_settitle () {
   printf >/dev/tty \
-    "]2;%s@%s:%s – %s\\" \
+    "]0;%s@%s:%s – %s\\" \
     "$__mdw_user" "$__mdw_host$__mdw_hqual" "$PWD" \
     "$1"
 }
@@ -241,22 +241,23 @@ alias abcl="rlwrap abcl --noinform"
 ###--------------------------------------------------------------------------
 ### Colour output.
 
-## Arrange for `ls' output to be in colour.
-if __mdw_programp dircolors; then eval $(dircolors -b "$HOME/.dircolors")
-else unset LS_COLORS; fi
+mdw_colour_p () {
+  if ! [ -t 1 ]; then return 1; fi
+  case $TERM in dumb) return 1 ;; esac
+  return 0
+}
 
+## Arrange for `ls' output to be in colour.
 unalias ls 2>/dev/null || :
 ls () {
-  if [ -t 1 ]; then command ls $LS_OPTIONS ${LS_COLORS+--color=auto} "$@"
+  if mdw_colour_p; then command ls $LS_OPTIONS ${LS_COLORS+--color=always} "$@"
   else command ls "$@"; fi
 }
 
 ## Arrange for `grep' output to be in colour.
-export GREP_COLORS="mt=01;31:ms=01;31:mc=031;31:fn=36:ln=36:bn=36:se=34"
-
 greplike () {
   local grep=$1; shift
-  if [ -t 1 ]; then
+  if mdw_colour_p; then
     command $grep ${GREP_COLORS+--color=always} "$@" | mdw-pager
   else
     command $grep "$@"
@@ -268,10 +269,9 @@ alias fgrep="greplike fgrep"
 alias zgrep="greplike zgrep"
 
 ## Arrange for `diff' output to be in colour.
-export DIFF_COLORS="hd=1:ln=36:ad=32:de=31"
 difflike () {
   local diff=$1; shift
-  if [ -t 1 ]; then
+  if mdw_colour_p; then
     command $diff \
 	    ${DIFF_COLORS+--color=always} \
 	    ${DIFF_COLORS+--palette="$DIFF_COLORS"} \