incluso cuando emacsclient se inicia en un terminal, window-system es no-nil

Question

Quiero llamar a algunas funciones cuando ejecuto emacsclient en un emulador de terminal. El código que tengo funciona cuando Emacs se inicia en un terminal de solo texto. Cuando inicio Emacs en modo gráfico y ejecuto emacsclient -t en un terminal, las funciones no se ejecutan, así que no puedo usar el mouse en el emulador de terminal.

Aquí está el código en cuestión:

(defun my-terminal-config (&optional frame) 
    "Establish settings for the current terminal." 
    (message (format "%s" window-system)) ;; "ns" (Mac OS X) when Emacs is started graphically 
    (message (format "%s" (display-graphic-p))) ;; nil when Emacs is started graphically 
    (unless (display-graphic-p) 
    ;; enable mouse reporting for terminal emulators 
    (xterm-mouse-mode 1) 
    (global-set-key [mouse-4] '(lambda() 
           (interactive) 
           (scroll-down 1))) 
    (global-set-key [mouse-5] '(lambda() 
           (interactive) 
           (scroll-up 1))))) 
(add-hook 'after-make-frame-functions 'my-terminal-config) 

Ésta es una situación extraña. Emacsclient se conecta al servidor y crea un nuevo marco, pero como el servidor se está ejecutando en un entorno gráfico, informa que el sistema de ventanas es "ns", mientras que en un entorno terminal sería nulo. Por lo tanto, cuando ejecuto emacsclient -t en un terminal, las funciones de habilitación de informe del mouse no se ejecutan. Una vez que emacsclient se esté ejecutando, si creo un nuevo cuadro con C-x 5 2, se ejecutarán las funciones de habilitación del informe del mouse porque el sistema de ventanas será nulo en ese marco.

Parece que al mezclar fotogramas entre terminales y sistemas de ventana, el valor de window-system siempre será el del servidor de Emacs.

¿Hay una manera que puedo correr Emacs gráfica y emacsclient en modo texto y tienen las funciones del ratón se ejecutan allí? En otras palabras, ¿es posible detectar que un cuadro creado se termine en un entorno gráfico o de texto?

Tal vez debería simplemente ejecutar esas funciones cuando se crea un marco, independientemente del valor de window-system?

Answer 1

el truco es que window-system y display-graphic-p ahora son específicos de marcos. necesitas estar en ese marco dentro de tu función de gancho (parece que ya debería ser el caso, pero no creo que sea así). He tenido que añadir esto al comienzo de mi after-make-frame-functions gancho (para hacer la ventana del sistema y la visualización gráfica-p se comportan correctamente):

(select-frame frame)