From: Glenn Morris Date: Mon, 5 Mar 2018 19:32:20 +0000 (-0500) Subject: * lisp/emacs-lisp/ewoc.el (ewoc-goto-node): X-Git-Tag: emacs-27.0.90~5549 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7a38a6d8818b6f5be0b13957d06f4da7573e3ddd;p=emacs.git * lisp/emacs-lisp/ewoc.el (ewoc-goto-node): Simplify and quieten compiler. --- diff --git a/lisp/emacs-lisp/ewoc.el b/lisp/emacs-lisp/ewoc.el index 262d4d85941..52d8451f4bc 100644 --- a/lisp/emacs-lisp/ewoc.el +++ b/lisp/emacs-lisp/ewoc.el @@ -500,7 +500,7 @@ Return the node (or nil if we just passed the last node)." (defun ewoc-goto-node (ewoc node) "Move point to NODE in EWOC." - (ewoc--set-buffer-bind-dll ewoc + (with-current-buffer (ewoc--buffer ewoc) (goto-char (ewoc--node-start-marker node)) (if goal-column (move-to-column goal-column)) (setf (ewoc--last-node ewoc) node)))