diff options
| author | Karl Heuer | 1994-02-14 19:51:22 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-02-14 19:51:22 +0000 |
| commit | 6e45b389efc9eae60867df88865e0f48a7c8b558 (patch) | |
| tree | 3dd56566180cb4580715b3d626df43e0bf816452 | |
| parent | 1b15e5760b558305894f1a8e39e5a1d634a5d936 (diff) | |
| download | emacs-6e45b389efc9eae60867df88865e0f48a7c8b558.tar.gz emacs-6e45b389efc9eae60867df88865e0f48a7c8b558.zip | |
(current-word): Remove (interactive).
| -rw-r--r-- | lisp/simple.el | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index d917d846d6f..c74141cb1c2 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -1959,7 +1959,6 @@ move back first. Otherwise, if point precedes a word constituent, | |||
| 1959 | move forward first. Otherwise, move backwards until a word constituent | 1959 | move forward first. Otherwise, move backwards until a word constituent |
| 1960 | is found and get that word; if you reach a newline first, move forward | 1960 | is found and get that word; if you reach a newline first, move forward |
| 1961 | instead." | 1961 | instead." |
| 1962 | (interactive) | ||
| 1963 | (save-excursion | 1962 | (save-excursion |
| 1964 | (let ((oldpoint (point)) (start (point)) (end (point))) | 1963 | (let ((oldpoint (point)) (start (point)) (end (point))) |
| 1965 | (skip-syntax-backward "w_") (setq start (point)) | 1964 | (skip-syntax-backward "w_") (setq start (point)) |