summaryrefslogtreecommitdiff
path: root/lisp/term.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/term.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/term.el')
-rw-r--r--lisp/term.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/term.el b/lisp/term.el
index ce6125e2790..95660eae9ad 100644
--- a/lisp/term.el
+++ b/lisp/term.el
@@ -3632,7 +3632,7 @@ all pending output has been dealt with."))
(if (< down 0) term-scroll-start term-scroll-end))))
(when (or (and (< down 0) (< scroll-needed 0))
(and (> down 0) (> scroll-needed 0)))
- (let ((save-point (copy-marker (point))) (save-top))
+ (let ((save-point (point-marker)) (save-top))
(goto-char term-home-marker)
(cond (term-scroll-with-delete
(if (< down 0)