summaryrefslogtreecommitdiff
path: root/lisp/align.el
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2005-12-10 12:35:04 +0000
committerEli Zaretskii <eliz@gnu.org>2005-12-10 12:35:04 +0000
commitcbf08c3901c6b2b86c982996417730aee9d1481f (patch)
tree6b06aacaca62173b916d2ccd0193ad9e753ee2ba /lisp/align.el
parent614b38a99518cb219f3b24016ca8aa638f0581be (diff)
downloademacs-cbf08c3901c6b2b86c982996417730aee9d1481f.tar.gz
(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.
Diffstat (limited to 'lisp/align.el')
-rw-r--r--lisp/align.el6
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