¿Hay alguna manera de copiar una línea completa hasta un carácter de detención en Emacs?

Question

Hoy vi una función de copia clara en VI, en la que se podía copiar una línea completa hasta un carácter de detención.

p. Ej. if(copy == this);

Con VI pudo copiar todo lo que estaba dentro del paréntesis. Me pregunto si también puedes hacerlo con emacs. (Sin usar ctrl + espacio y marcando manualmente lo que quiero matar)

Answer 1

Trate

M-z CHAR 

que mata el texto a través de la siguiente aparición de CHAR. Aka M-x zap-to-char. De interés podría ser la documentación para Other Kill Commands.

Editado para añadir: A petición, aquí es zap-to-before-char, que acaba de tomar el código fuente de zap-to-char y se retira un comentario (y cadena de documentación actualizada):

(defun zap-to-before-char (arg char) 
    "Kill up to and ARGth occurrence of CHAR. 
Case is ignored if `case-fold-search' is non-nil in the current buffer. 
Goes backward if ARG is negative; error if CHAR not found." 
    (interactive "p\ncZap to char: ") 
    ;; Avoid "obsolete" warnings for translation-table-for-input. 
    (with-no-warnings 
    (if (char-table-p translation-table-for-input) 
     (setq char (or (aref translation-table-for-input char) char)))) 
    (kill-region (point) (progn 
         (search-forward (char-to-string char) nil nil arg) 
         (goto-char (if (> arg 0) (1- (point)) (1+ (point)))) 
         (point)))) 

Answer 2

Claro, defina una macro. Comience su macro grabación escribiendo c-x (. A continuación, realice la secuencia de comandos que desea repetir:

c-s (
c-space 
c-s) 
M-w 

luego terminar su macro con c-x). Úselo con c-x e.

Algo así ... Es probable que tenga problemas con la cerca. Si no desea que mueva su marca, guárdela y restaurela al inicio de la macro.

Más información sobre las macros (como la forma de salvar a atarlos a otras teclas) aquí:

http://www.emacswiki.org/emacs/KeyboardMacros

Answer 3

Emacs tiene un tropecientos comandos, por lo que bien podría ser uno que hace exactamente eso.

Lo que hago en tal situación es marcar mi lugar (con ctrl-espacio), luego hacer una búsqueda hacia adelante (ctrl-s) y escribir lo que estoy buscando (en su caso un final-paren, pero podría ser algo más detallado como "end My_Procedure_Name" de Pascal; Eso seleccionará todo el texto desde donde marqué hasta donde encontró el patrón de búsqueda. Luego ctrl-k para cortar el texto en el buffer de destrucción.

En resumen:

ctrl-space 
ctrl-s 
) return 
ctrl-k 

(y una ctrl-_ si desea mantener el texto donde es demasiado).

Puede haber más rápido/mejor/etc. maneras, pero ese es el subconjunto de comandos de emacs que sé lo suficientemente bien como para hacer sin tener que detenerme a pensar en ello.

Answer 4

Si el cursor se encuentra entre los paréntesis , la secuencia más corta que se me ocurre para copiar el grupo entre paréntesis completo (incluidos los paréntesis) es C-M-u C-M-SPC M-w (backward-up-list, mark-sexp, kill-ring-save). Si desea eliminar ese texto, C-M-u C-M-k (backward-up-sexp, kill-sexp).Los comandos sexp generalmente son la forma más fácil de tratar con grupos entre paréntesis; otros comandos importantes son C-M-b (backward-sexp) y C-M-f (forward-sexp) (observe el tema C-M-).

Answer 5

La belleza de Emacs es que es muy fácil de escribir algo de elisp para que haga lo que quiere:

(defun mark-inside-delimiters() 
"Mark all chars inside the balanced expression point is in" 
    (interactive) 
    (let (p start pairs stop) 
    (skip-chars-backward "^<({[\"'") 
    (setq p (point)) 
    (setq start (char-to-string (preceding-char))) 
    (setq pairs '(("<" . ">")("(" . ")")("{" . "}") 
        ("[" . "]")("\"" . "\"")("'" . "'"))) 
    (setq stop (cdr (assoc start pairs))) 
    (skip-chars-forward (concat"^" stop)) 
    (set-mark p))) 

(global-set-key (kbd "C-c m") 'mark-inside-delimiters) 

Este ejemplo en particular no es consciente de la sintaxis por lo que no se encargará cadenas que contienen Frases escapadas, o paréntesis dentro de las cadenas, pero funciona para la mayoría de los casos.