summaryrefslogtreecommitdiff
path: root/lisp/electric.el
diff options
context:
space:
mode:
authorDmitry Antipov <dmantipov@yandex.ru>2014-06-22 09:43:58 +0400
committerDmitry Antipov <dmantipov@yandex.ru>2014-06-22 09:43:58 +0400
commit9c3883b47dabec27d9fde206f3f951387fe946fd (patch)
tree38e3d6c9f9357438f491a11be60cbc84e6d183c1 /lisp/electric.el
parentb0358ef86903ac021110b54ee1acce11211c200f (diff)
downloademacs-9c3883b47dabec27d9fde206f3f951387fe946fd.tar.gz
* lisp/electric.el (electric-layout-post-self-insert-function):
* lisp/emacs-lisp/ert.el (ert--insert-infos): * lisp/obsolete/vi.el (vi-set-mark): * lisp/term.el (term-handle-scroll): * lisp/textmodes/bibtex.el (bibtex-fill-field, bibtex-fill-entry): * lisp/gnus/gnus-sum.el (gnus-summary-edit-article-done): * lisp/org/org-mouse.el (org-mouse-do-remotely): * lisp/wid-edit.el (widget-editable-list-value-create): Prefer point-marker to copy-marker of point. * lisp/ob-core.el (org-babel-insert-result): Prefer point-min-marker and point-max-marker.
Diffstat (limited to 'lisp/electric.el')
-rw-r--r--lisp/electric.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/electric.el b/lisp/electric.el
index bf73dbb256f..4bf5963e175 100644
--- a/lisp/electric.el
+++ b/lisp/electric.el
@@ -368,7 +368,7 @@ newline after CHAR but stay in the same place.")
(setq pos (electric--after-char-pos))
;; Not in a string or comment.
(not (nth 8 (save-excursion (syntax-ppss pos)))))
- (let ((end (copy-marker (point)))
+ (let ((end (point-marker))
(sym (if (functionp rule) (funcall rule) rule)))
(set-marker-insertion-type end (not (eq sym 'after-stay)))
(goto-char pos)