diff options
| author | Kim F. Storm <storm@cua.dk> | 2002-09-09 22:44:44 +0000 |
|---|---|---|
| committer | Kim F. Storm <storm@cua.dk> | 2002-09-09 22:44:44 +0000 |
| commit | f732f824ad4fcea0c567e5ae3b14531425f9bc8f (patch) | |
| tree | 69142e40386a1e84a999c99bd5bd1a26d5c1677b /lisp/macros.el | |
| parent | e00a136119d1a9fa60fb2c98ac0034c663c3c6db (diff) | |
| download | emacs-f732f824ad4fcea0c567e5ae3b14531425f9bc8f.tar.gz | |
(apply-macro-to-region-lines): Let-bind mark-active to
nil while executing macro to avoid triggering delete-selection-mode.
Diffstat (limited to 'lisp/macros.el')
| -rw-r--r-- | lisp/macros.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/macros.el b/lisp/macros.el index 0857dd3c2db..11fa2223a4e 100644 --- a/lisp/macros.el +++ b/lisp/macros.el @@ -299,7 +299,8 @@ and then select the region of un-tablified names and use (forward-line 1) (set-marker next-line-marker (point))) (save-excursion - (execute-kbd-macro (or macro last-kbd-macro)))) + (let ((mark-active nil)) + (execute-kbd-macro (or macro last-kbd-macro))))) (set-marker end-marker nil) (set-marker next-line-marker nil)))) |