Come chiudere altre finestre in tmux?

Scrivo alcune funzioni .bashrcper tmuxfacilitarne l'uso:

#!/bin/bash
# .bashrc

# vim            tmux
#-----  --------------------
tabc()  { tmux kill-window; }
tabe()  { tmux new-window; }
tabf()  { tmux find-window $@; }
tabn()  { tmux next-window; }
tabo()  { ; }                         # <-- How to `tabonly`?
tabp()  { tmux previous-window; }
qa()    { tmux kill-session; }
sp()    { tmux split-window; }
vsp()   { tmux split-window -h; }
on()    { tmux kill-pane -a; }

typeset -fx tab{c,e,f,n,o,p} {,v}sp qa on

Voglio implementare il tabonlycomando, ma non so come.

Con la finestra che vuoi mantenere come finestra corrente, basta chiamare next-windowe kill-windowpiù volte, fino a quando next-windowfallisce:

while tmux next-window 2> /dev/null; do
    tmux kill-window
done

Per una facile copia, tmux> = 1.7:

tabo()  { tmux kill-window -a; }

Grazie Chris Johnsen.