Interactive specs, align.el

[Johan Bockgård]

This change makes repetition of these commands (with
`repeat-complex-command') recompute the bounds of the region rather
than use the old values of point and mark.



--- align.el    18 Aug 2005 03:25:33 +0200      1.19
+++ align.el    09 Dec 2005 07:14:35 +0100      
@@ -931,8 +931,8 @@
 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 +988,8 @@
 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