chiark / gitweb /
dot/emacs: Bind a key to `magit-toggle-buffer-lock'.
[profile] / bin / xremote
1 #! /bin/sh -e
2
3 case $#,$1 in
4   0,* | 1,*) ok=nil ;;
5   *,*:*) ok=t ;;
6   *) ok=nil ;;
7 esac
8 case $ok in
9   nil) echo >&2 "usage: $0 HOST:RDPY/LDPY PROG ARGS ..."; exit 2 ;;
10 esac
11 host=${1%:*} dpy=${1##*:}; rdpy=${dpy%%/*} ldpy=${dpy#*/}; shift 1
12
13 ssh -L"/tmp/.X11-unix/X$ldpy:/tmp/.X11-unix/X$rdpy" -Nafx "$host"
14 sleep 1
15 trap 'trap - INT QUIT HUP EXIT; ssh -Oexit "$host"; rm -f "/tmp/.X11-unix/X$ldpy"' INT QUIT HUP EXIT
16 DISPLAY=:$ldpy "$@"