Paren(s) inside quotes are not ignored

[precompute]

Emacs: GNU Emacs 30.0.50 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.38, cairo version 1.16.0) of 2024-03-29
OS: Debian Stable

Steps:

• emacs -Q
• package-install, evil
• clone evil-surround and load evil-surround.el
• scratch buffer with lisp-interaction-mode

Contents of buffer:

(progn
  (when (looking-at "x")
    (something))
  (something-else))

(progn
  (when (looking-at ")")
    (something))
  (something-else))

(progn
  (when (looking-at "))")
    (something))
  (something-else))

• Execute dsb for all three, with cursor on the progn's 'p'

Contents of buffer after:

progn
  (when (looking-at "x")
    (something))
  (something-else)

progn
  (when (looking-at ")")
    (something)
  (something-else))

progn
  (when (looking-at "))"
    (something))
  (something-else))

[tomdl89]

Thanks @precompute - good catch. For improved clarity for when I come to look at this, here's the result of doing csb> on each:

<progn
  (when (looking-at "x")
    (something))
  (something-else)>

<progn
  (when (looking-at ")")
    (something)>
  (something-else))

<progn
  (when (looking-at "))">
    (something))
  (something-else))