diff options
| author | Chong Yidong <cyd@gnu.org> | 2012-09-17 00:27:20 +0800 |
|---|---|---|
| committer | Chong Yidong <cyd@gnu.org> | 2012-09-17 00:27:20 +0800 |
| commit | 40d70ecb6d11f87363b500db5665d8b433278687 (patch) | |
| tree | 1f35c31eb65bd2cf9a3cbed2844f955372f7d4fb /lisp/align.el | |
| parent | 0b97c030c678e7c77766e13e615ef2ce8394860a (diff) | |
| download | emacs-40d70ecb6d11f87363b500db5665d8b433278687.tar.gz | |
Fix marker usage in align-areas.
* align.el (align-areas): Call the indication function with
positions instead of markers for arguments.
Fixes: debbugs:12343
Diffstat (limited to 'lisp/align.el')
| -rw-r--r-- | lisp/align.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/align.el b/lisp/align.el index 4c82d7bea81..b5c4c442f24 100644 --- a/lisp/align.el +++ b/lisp/align.el @@ -1201,7 +1201,10 @@ have been aligned. No changes will be made to the buffer." (gocol col) cur) (when area (if func - (funcall func (car area) (cdr area) change) + (funcall func + (marker-position (car area)) + (marker-position (cdr area)) + change) (if (not (and justify (consp (cdr area)))) (goto-char (cdr area)) |