(align-regexp, align-highlight-rule): Use region-beginning and region-end

instead of point and mark, so that repetition (with `repeat-complex-command')
recomputes the region bounds.

1 files changed, 2 insertions, 4 deletions

diff --git a/lisp/align.el b/lisp/align.el
index 2cbc43e38d3..122ce2f0f88 100644
--- a/lisp/align.el
+++ b/lisp/align.el
@@ -931,8 +931,7 @@ using a REGEXP like \"(\". All you would have to do is to mark the
 region, call `align-regexp' and type in that regular expression."
   (interactive
    (append
-    (list (min (point) (mark))
-          (max (point) (mark)))
+    (list (region-beginning) (region-end))
     (if current-prefix-arg
         (list (read-string "Complex align using regexp: "
                            "\\(\\s-*\\)")
@@ -988,8 +987,7 @@ list of rules (see `align-rules-list'), it can be used to override the
 default alignment rules that would have been used to identify the text
 to be colored."
   (interactive
-   (list (min (mark) (point))
-         (max (mark) (point))
+   (list (region-beginning) (region-end)
          (completing-read
           "Title of rule to highlight: "
           (mapcar