diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-05-25 18:45:25 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-05-25 18:45:25 +0000 |
| commit | 5d3bffd4599fc4e6ebb76c9ae8e413d02fcbeec0 (patch) | |
| tree | ecab6449f38bc2f66a1d19a438241898c0f748e7 /src | |
| parent | 97a983f472dfdb6c5600aa48f0aad80a5a77fd72 (diff) | |
| download | emacs-5d3bffd4599fc4e6ebb76c9ae8e413d02fcbeec0.tar.gz | |
(Fforward_comment): Always set point.
Diffstat (limited to 'src')
| -rw-r--r-- | src/syntax.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/syntax.c b/src/syntax.c index 9dcb8c23f94..fb584021485 100644 --- a/src/syntax.c +++ b/src/syntax.c @@ -612,6 +612,7 @@ between them, return t; otherwise return nil.") if (from == stop) { immediate_quit = 0; + SET_PT (from); return Qnil; } c = FETCH_CHAR (from); @@ -636,6 +637,7 @@ between them, return t; otherwise return nil.") else if (code != Swhitespace) { immediate_quit = 0; + SET_PT (from); return Qnil; } } @@ -685,6 +687,7 @@ between them, return t; otherwise return nil.") if (from == stop) { immediate_quit = 0; + SET_PT (from); return Qnil; } from--; @@ -808,6 +811,7 @@ between them, return t; otherwise return nil.") else if (code != Swhitespace || quoted) { immediate_quit = 0; + SET_PT (from); return Qnil; } } |