backward-kill-word ignora espacios en blanco, ¿hay otra versión más amigable?

Emac backward-kill-wordtiende a eliminar más de lo que quiero.
Por ejemplo, cuando presiono eliminar varias veces en esto:

(key-chord "qf" 'helm-org-in-buffer-headings)   ;heading search. |

Yo obtengo:

1. (key-chord "qf" 'helm-org-in-buffer-headings)   ;heading|
2. (key-chord "qf" 'helm-org-in-buffer-headings)   ;|
3. (key-chord "qf" 'helm-org-in-buffer-|   <<< too much deletion.

Esperaba esto en el tercer paso:

3. (key-chord "qf" 'helm-org-in-buffer-headings)|

Quiero saber: - ¿Existe una filosofía detrás de eliminar más de lo que se quiere?
- ¿Puedo hacer que la palabra emac-backward-delete-word sea más amigable? Es decir, eliminar espacios en blanco, pero no matar "demasiado"?

EDITAR Realmente no sé 'qué' quiero. Quizás lo haga más parecido a otras funciones de eliminación como en google-keep u otras aplicaciones de edición de texto.

edit2
Mientras tanto, lawlist arregló su función personalizada que funciona bastante bien: ingrese la descripción del enlace aquí

deletion Leo Ufimtsev
fuente

Esto corre el riesgo de ser cerrado como poco claro. No especifica qué comportamiento desea. Especificar. backward-kill-wordhace lo que se pretende hacer. Puede definir otro comando para hacer "lo que se quiere" y no "matar" demasiado ". Pero si desea ayuda con eso, entonces podría considerar especificar el comportamiento que está buscando.

Dibujó el

Aquí hay un enlace a mi propia función de eliminar palabras, que puede interesarle modificar para que se adapte a sus necesidades: stackoverflow.com/a/20456861/2112489 No está diseñado para almacenar la eliminación en el anillo de cierre, así que lo llamo Eliminar en lugar de matar. No tiene nada que ver con el timón o el cable de la llave. El comportamiento (en mi opinión) se aproxima a lo que varios procesadores de texto han hecho a lo largo de los años.

leyes

@lawlist yah, esto es más o menos lo que estaba buscando, excepto que encontré que la función allí no se ajusta y no comienza a eliminar cosas si hay espacios en blanco al final.

Leo Ufimtsev

La filosofía de Emacs es estar siempre un paso por delante del usuario, por lo que todavía no lo sabe.

politza

@LeoUfimtsev ¿Hay algo que no le guste de la solución que proporcioné?

rekado

Respuestas:

El comportamiento de backward-kill-worddepende de la definición de una "palabra" en el modo actual. Puede cambiar esta definición y arriesgarse a romper cosas o puede modificarla kill-word.

backward-kill-wordes solo kill-wordcon un argumento negativo; kill-wordestá kill-regionsobre la región dividida por punto y la posición después de correr (forward-word arg). Reemplazar forward-wordtemporalmente debería hacer el truco.

Aquí estoy reemplazando temporalmente forward-wordcon forward-same-syntaxpara lograr el efecto deseado en backward-kill-word(y kill-wordporque me gusta que las cosas sean consistentes):

(defun my/kill-word-advice (orig-fun &rest args)
  "Replace forward-word with forward-same-syntax."
  (cl-letf (((symbol-function 'forward-word) #'forward-same-syntax))
    (apply orig-fun args)))
(advice-add 'kill-word :around #'my/kill-word-advice)

Ahora el comportamiento es este:

1. (key-chord "qf" 'helm-org-in-buffer-headings)   ;heading|
2. (key-chord "qf" 'helm-org-in-buffer-headings)   ;|
3. (key-chord "qf" 'helm-org-in-buffer-headings)   |
4. (key-chord "qf" 'helm-org-in-buffer-headings)|
5. (key-chord "qf" 'helm-org-in-buffer-headings|
5. (key-chord "qf" 'helm-org-in-buffer-|

rekado
fuente

Hola, probé lo anterior, pero cuando corro hacia atrás, mato la palabra, todavía obtengo el viejo comportamiento. Estoy en Emacs 25.4 con el nuevo modo org. ..

Leo Ufimtsev

@LeoUfimtsev Te vi mencionar 25.4 en otro lugar también. ¿Te refieres a 24.5? O 24.4?

Kaushal Modi

Hmm, creo que me confundí. Me refería a 25.0.50.4. Y quizás hace un mes usé 25.0.50.3, pero ahora actualicé.

Leo Ufimtsev

@rekado No puedo hacer que esto funcione en 24.5.1. ¿Alguna idea? Ejecutando los advice-addretornos del sexp nil, ¿se espera eso?

Lenar Hoyt

Es muy posible que primero tenga que evaluar la definición original de kill-wordantes de aplicar el consejo :( No sé por qué es así. Preguntará en la lista de correo.

rekado