diff options
| -rw-r--r-- | lisp/simple.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index bc3e7b83b8d..0da70976ed5 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -5223,6 +5223,7 @@ store it in a Lisp variable. Example: | |||
| 5223 | (defmacro save-mark-and-excursion (&rest body) | 5223 | (defmacro save-mark-and-excursion (&rest body) |
| 5224 | "Like `save-excursion', but also save and restore the mark state. | 5224 | "Like `save-excursion', but also save and restore the mark state. |
| 5225 | This macro does what `save-excursion' did before Emacs 25.1." | 5225 | This macro does what `save-excursion' did before Emacs 25.1." |
| 5226 | (declare (indent 0) (debug t)) | ||
| 5226 | (let ((saved-marker-sym (make-symbol "saved-marker"))) | 5227 | (let ((saved-marker-sym (make-symbol "saved-marker"))) |
| 5227 | `(let ((,saved-marker-sym (save-mark-and-excursion--save))) | 5228 | `(let ((,saved-marker-sym (save-mark-and-excursion--save))) |
| 5228 | (unwind-protect | 5229 | (unwind-protect |