mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-03 18:41:25 -08:00
(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.
This commit is contained in:
parent
614b38a995
commit
cbf08c3901
1 changed files with 2 additions and 4 deletions
|
|
@ -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."
|
region, call `align-regexp' and type in that regular expression."
|
||||||
(interactive
|
(interactive
|
||||||
(append
|
(append
|
||||||
(list (min (point) (mark))
|
(list (region-beginning) (region-end))
|
||||||
(max (point) (mark)))
|
|
||||||
(if current-prefix-arg
|
(if current-prefix-arg
|
||||||
(list (read-string "Complex align using regexp: "
|
(list (read-string "Complex align using regexp: "
|
||||||
"\\(\\s-*\\)")
|
"\\(\\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
|
default alignment rules that would have been used to identify the text
|
||||||
to be colored."
|
to be colored."
|
||||||
(interactive
|
(interactive
|
||||||
(list (min (mark) (point))
|
(list (region-beginning) (region-end)
|
||||||
(max (mark) (point))
|
|
||||||
(completing-read
|
(completing-read
|
||||||
"Title of rule to highlight: "
|
"Title of rule to highlight: "
|
||||||
(mapcar
|
(mapcar
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue