diff options
| author | Richard M. Stallman | 1994-09-17 19:49:03 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-09-17 19:49:03 +0000 |
| commit | 2eb1d6a2a2bd29464f56567a9dc8d63fbfaa2ab2 (patch) | |
| tree | 1ca1fb5fbc76015d8e88b0e3b1af546b209fec8e /src | |
| parent | f01516084116e0aabe25a2a80325b13e95614a7f (diff) | |
| download | emacs-2eb1d6a2a2bd29464f56567a9dc8d63fbfaa2ab2.tar.gz emacs-2eb1d6a2a2bd29464f56567a9dc8d63fbfaa2ab2.zip | |
(Fforward_comment): Do increment from, when reaching
single-char comment end going forward.
Diffstat (limited to 'src')
| -rw-r--r-- | src/syntax.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/syntax.c b/src/syntax.c index 9108f727cc4..1aba174f7bb 100644 --- a/src/syntax.c +++ b/src/syntax.c | |||
| @@ -653,13 +653,13 @@ between them, return t; otherwise return nil.") | |||
| 653 | return Qnil; | 653 | return Qnil; |
| 654 | } | 654 | } |
| 655 | c = FETCH_CHAR (from); | 655 | c = FETCH_CHAR (from); |
| 656 | from++; | ||
| 656 | if (SYNTAX (c) == Sendcomment | 657 | if (SYNTAX (c) == Sendcomment |
| 657 | && SYNTAX_COMMENT_STYLE (c) == comstyle) | 658 | && SYNTAX_COMMENT_STYLE (c) == comstyle) |
| 658 | /* we have encountered a comment end of the same style | 659 | /* we have encountered a comment end of the same style |
| 659 | as the comment sequence which began this comment | 660 | as the comment sequence which began this comment |
| 660 | section */ | 661 | section */ |
| 661 | break; | 662 | break; |
| 662 | from++; | ||
| 663 | if (from < stop && SYNTAX_COMEND_FIRST (c) | 663 | if (from < stop && SYNTAX_COMEND_FIRST (c) |
| 664 | && SYNTAX_COMEND_SECOND (FETCH_CHAR (from)) | 664 | && SYNTAX_COMEND_SECOND (FETCH_CHAR (from)) |
| 665 | && SYNTAX_COMMENT_STYLE (c) == comstyle) | 665 | && SYNTAX_COMMENT_STYLE (c) == comstyle) |