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

1 files changed, 1 insertions, 2 deletions

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) ?\\ )