Cuando estoy en medio de una cadena muuuy larga, como la siguiente

(setq Emacs-beta "Which keyboard shortcut to use for navigating out of a string")

¿Puedo omitirlo, justo antes del primero "(después de Emacs-beta) con un atajo?

Emacs 25 o más reciente

Quieres C-M-uque ejecute el comando backward-up-list.

Retroceder fuera de un nivel de paréntesis. Este comando también funcionará en otras expresiones parecidas a paréntesis definidas por el modo de idioma actual.

Si ESCAPE-STRINGS no es nulo (como lo es interactivamente), salga también de las cadenas de cerramiento.

Es factible así:

(defun exit-string-backwards ()
  (interactive)
  (goto-char (nth 8 (syntax-ppss))))

En el modo lispy , presionar [lo llevará al comienzo de la lista que contiene, saliendo de cualquier cadena. Una vez que esté al principio de la lista, puede llegar fácilmente a otras partes, por ejemplo, para llegar al final de la Emacs-betaimprenta 2m.

Esta es realmente una pregunta de programación muy interesante de Emacs Lisp. Podemos mantener forward-char o backward-char hasta que encontremos que el carácter debajo del cursor no es parte de la cadena.

Puede usar la fuente para decidir si el carácter está dentro de la cadena. Este es un gran truco que aprendí de flyspell. En teoría no es perfecto, pero en el mundo real funciona con casi todos los modos principales de lenguaje de programación en Emacs23, Emacs24, Emacs25 .

Aquí está el código completo:

(defun font-face-is-similar (f1 f2)
  (let (rlt)
    ;; (message "f1=%s f2=%s" f1 f2)
    ;; in emacs-lisp-mode, the '^' from "^abde" has list of faces:
    ;;   (font-lock-negation-char-face font-lock-string-face)
    (if (listp f1) (setq f1 (nth 1 f1)))
    (if (listp f2) (setq f2 (nth 1 f2)))

    (if (eq f1 f2) (setq rlt t)
      ;; C++ comment has different font face for limit and content
      ;; f1 or f2 could be a function object because of rainbow mode
      (if (and (string-match "-comment-" (format "%s" f1)) (string-match "-comment-" (format "%s" f2)))
          (setq rlt t)))
    rlt))

(defun goto-edge-by-comparing-font-face (&optional step)
"Goto either the begin or end of string/comment/whatever.
If step is -1, go backward."
  (interactive "P")
  (let ((cf (get-text-property (point) 'face))
        (p (point))
        rlt
        found
        end)
    (unless step (setq step 1)) ;default value
    (setq end (if (> step 0) (point-max) (point-min)))
    (while (and (not found) (not (= end p)))
      (if (not (font-face-is-similar (get-text-property p 'face) cf))
          (setq found t)
        (setq p (+ p step))))
    (if found (setq rlt (- p step))
      (setq rlt p))
    ;; (message "rlt=%s found=%s" rlt found)
    (goto-char rlt)))

Uso:

• (goto-edge-by-comparing-font-face 1)ir al borde derecho, (goto-edge-by-comparing-font-face -1)ir al borde izquierdo
• no depende de ningún modo principal específico, puede usarlo en cualquier lugar en cualquier idioma

backward-up-listno es muy confiable desde el punto de vista del usuario porque está diseñado como un comando genérico basado en scan-sexps. Por ejemplo, para el código if (true) { return 'hello world'; }en modo js2, moverá el foco al {carácter en lugar del primer carácter de comillas simples. Para el código printf("hello world")en modo c ++, no funcionará. Probé con Emacs 24.5

Aquí hay una forma más (que tiendo a usar más) solo por variedad. La solución no es específica para las cadenas, pero también funciona para este caso de uso.

• Instalar iy-go-to-char(también disponible en Melpa).
• Enlace iy-go-to-char-backwardy iy-go-to-chara sus enlaces preferidos. Por el bien de esta explicación, digamos que está obligado iy-go-to-char-backwarda C-c C-,y iy-go-to-chara C-c C-..

• Ahora, si está dentro de la cadena, debería llamar iy-go-to-char-backwardy escribir ".

  Eso se vería así C-c C-, ". Si lo ha iy-go-to-char-continue-when-repeatingconfigurado en t(predeterminado), presionar "una vez más lo llevará a una "aparición de caracteres antes de eso, y así sucesivamente.

• Si está dentro de la cadena y ahora desea ir al final de la cadena, debe llamar iy-go-to-chary escribir ".

  Eso se vería así C-c C-. ". Si lo iy-go-to-char-continue-when-repeatingconfiguró en t(predeterminado), presionar "una vez más lo llevará a la siguiente "aparición de caracteres.