mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-31 20:02:42 +00:00
Code Issues Releases Activity

* lisp/emacs-lisp/ewoc.el (ewoc-goto-node):

Browse Source 
Simplify and quieten compiler.
This commit is contained in:
Glenn Morris 2018-03-05 14:32:20 -05:00
parent bcc80b8fd2
commit 7a38a6d881
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/emacs-lisp/ewoc.el
View File

@ -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)))