Mercurial > emacs

changeset 67480:b34c1d612bd4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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.
author Eli Zaretskii <eliz@gnu.org>
date Sat, 10 Dec 2005 12:35:04 +0000
parents 677f6aabed5d
children 58fa3493b643
files lisp/align.el
diffstat 1 files changed, 2 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/align.el	Sat Dec 10 12:21:44 2005 +0000
+++ b/lisp/align.el	Sat Dec 10 12:35:04 2005 +0000
@@ -931,8 +931,7 @@
 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 @@
 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