[nongnu] elpa/paredit 05b2cad 043/224: Generalize `paredit-kill' to work inside any string-like object.

[ELPA Syncer]

branch: elpa/paredit
commit 05b2cad7dfa9481aef5a9097a2225849d7d5d078
Author: Taylor R Campbell <campbell@mumble.net>
Commit: Taylor R Campbell <campbell@mumble.net>

    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(-)

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