(define-command 'focus-window set-input-focus #:spec "%W")