Add clearer names for the enclosing string start/end points.

1 files changed, 6 insertions, 0 deletions

diff --git a/paredit.el b/paredit.el
index 3e54481..3ad7f72 100644
--- a/paredit.el
+++ b/paredit.el
@@ -2526,6 +2526,12 @@ This assumes that `paredit-in-string-p' has already returned true, i.e.
       (forward-sexp 1)
       (cons start (1- (point))))))
 
+(defun paredit-enclosing-string-start ()
+  (car (paredit-string-start+end-points)))
+
+(defun paredit-enclosing-string-end ()
+  (+ 1 (cdr (paredit-string-start+end-points))))
+
 (defun paredit-in-comment-p (&optional state)
   "True if parse state STATE is within a comment.
 If no parse state is supplied, compute one from the beginning of the