1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00

(current-word): Remove (interactive).

This commit is contained in:
Karl Heuer 1994-02-14 19:51:22 +00:00
parent 1b15e5760b
commit 6e45b389ef

View File

@ -1959,7 +1959,6 @@ move back first. Otherwise, if point precedes a word constituent,
move forward first. Otherwise, move backwards until a word constituent
is found and get that word; if you reach a newline first, move forward
instead."
(interactive)
(save-excursion
(let ((oldpoint (point)) (start (point)) (end (point)))
(skip-syntax-backward "w_") (setq start (point))