From 05b2cad7dfa9481aef5a9097a2225849d7d5d078 Mon Sep 17 00:00:00 2001 From: Taylor R Campbell Date: Sat, 18 Sep 2010 15:06:30 +0000 Subject: Generalize `paredit-kill' to work inside any string-like object. Ignore-this: 16b21bd8bad54f6eeee9996665524b8a Previously `paredit-kill-line-in-string' expected the string to end with `"'; now it expects the string to end with any character whose syntax is a string delimiter. darcs-hash:20100918150630-00fcc-99d491db437f3395415c2456354e0c34273c2b0b --- paredit.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'paredit.el') diff --git a/paredit.el b/paredit.el index 4fa5c7d..550de92 100644 --- a/paredit.el +++ b/paredit.el @@ -1357,8 +1357,7 @@ With a numeric prefix argument N, do `kill-line' that many times." (if (paredit-in-string-escape-p) (backward-char)) (let ((beginning (point))) - (while (not (or (eolp) - (eq (char-after) ?\" ))) + (while (not (or (eolp) (eq ?\" (char-syntax (char-after))))) (forward-char) ;; Skip past escaped characters. (if (eq (char-before) ?\\ ) -- cgit v1.2.1