diff options
Diffstat (limited to 'lisp/align.el')
| -rw-r--r-- | lisp/align.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/align.el b/lisp/align.el index 0d9f351b9da..a386b7a82ba 100644 --- a/lisp/align.el +++ b/lisp/align.el @@ -1247,7 +1247,9 @@ have been aligned. No changes will be made to the buffer." (setq areas (cdr areas)))))) (defmacro align--set-marker (marker-var pos &optional type) - `(if ,marker-var + "If MARKER-VAR is a marker, move it to position POS. +Otherwise, create a new marker at position POS, with type TYPE." + `(if (markerp ,marker-var) (move-marker ,marker-var ,pos) (setq ,marker-var (copy-marker ,pos ,type)))) |