aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/emacs-lisp/lisp.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/lisp.el b/lisp/emacs-lisp/lisp.el
index 3540fd14261..c3de7730485 100644
--- a/lisp/emacs-lisp/lisp.el
+++ b/lisp/emacs-lisp/lisp.el
@@ -618,8 +618,10 @@ This command assumes point is not in a string or comment."
618 (if (and open close) 618 (if (and open close)
619 (if (and transient-mark-mode mark-active) 619 (if (and transient-mark-mode mark-active)
620 (progn 620 (progn
621 (save-excursion (goto-char (region-end)) (insert close)) 621 (save-excursion
622 (save-excursion (goto-char (region-beginning)) (insert open))) 622 (goto-char (region-end))
623 (insert close))
624 (goto-char (region-beginning)) (insert open))
623 (if arg (setq arg (prefix-numeric-value arg)) 625 (if arg (setq arg (prefix-numeric-value arg))
624 (setq arg 0)) 626 (setq arg 0))
625 (cond ((> arg 0) (skip-chars-forward " \t")) 627 (cond ((> arg 0) (skip-chars-forward " \t"))