[elpa] master 4e21882 403/433: mmm-match-region: Return front-pos even without front-delim; likewise for back

[Dmitry Gutov]

branch: master
commit 4e218824039090af6e579dabe91ebfaaa291440d
Author: Dmitry Gutov <address@hidden>
Commit: Dmitry Gutov <address@hidden>

    mmm-match-region: Return front-pos even without front-delim; likewise for 
back
    
    Fixes #53
---
 mmm-class.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/mmm-class.el b/mmm-class.el
index 436e85a..5ea40a7 100644
--- a/mmm-class.el
+++ b/mmm-class.el
@@ -224,7 +224,7 @@ and OK-RESUME if the region is valid."
     (let ((beg (mmm-match->point include-front front-offset front-match))
          (front-pos (if front-delim
                         (mmm-match->point t front-delim front-match)
-                      nil))
+                      (match-beginning front-match)))
           (invalid-resume (match-end front-match))
           (front-form (mmm-get-form front-form)))
       (let ((submode (if match-submode
@@ -257,9 +257,9 @@ and OK-RESUME if the region is valid."
                                        back-offset back-match))
                 (back-pos (if back-delim
                               (mmm-match->point nil back-delim back-match)
-                            nil))
+                            (match-end back-match)))
                 (back-form (mmm-get-form back-form))
-                (ok-resume (if end-not-begin 
+                (ok-resume (if end-not-begin
                                (match-end back-match)
                              end)))
             (values beg end front-pos back-pos front-form back-form