diff options
| author | Glenn Morris <rgm@gnu.org> | 2018-03-05 14:32:20 -0500 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2018-03-05 14:32:20 -0500 |
| commit | 7a38a6d8818b6f5be0b13957d06f4da7573e3ddd (patch) | |
| tree | 7cf88c310f0a17df0414c77861781517dfdf7374 /lisp/emacs-lisp | |
| parent | bcc80b8fd264352812a5bf5d11232659848cda3d (diff) | |
| download | emacs-7a38a6d8818b6f5be0b13957d06f4da7573e3ddd.tar.gz emacs-7a38a6d8818b6f5be0b13957d06f4da7573e3ddd.tar.bz2 emacs-7a38a6d8818b6f5be0b13957d06f4da7573e3ddd.zip | |
* lisp/emacs-lisp/ewoc.el (ewoc-goto-node):
Simplify and quieten compiler.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/ewoc.el | 2 |
1 files changed, 1 insertions, 1 deletions
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))) |