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

diff --git a/lisp/align.el b/lisp/align.el
index 2cbc43e38d3d36f7bf93633f4fb4e18801df6b2a..122ce2f0f8842a24dd5ec487f8ba4af5d3e3e329 100644 (file)
--- 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