diff options
Diffstat (limited to 'lisp/cedet/srecode')
| -rw-r--r-- | lisp/cedet/srecode/getset.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/cedet/srecode/getset.el b/lisp/cedet/srecode/getset.el index a582d4ff59e..9a6c27dcd73 100644 --- a/lisp/cedet/srecode/getset.el +++ b/lisp/cedet/srecode/getset.el | |||
| @@ -215,7 +215,7 @@ INCLASS specifies if the cursor is already in CLASS or not." | |||
| 215 | (when (not te) | 215 | (when (not te) |
| 216 | (message "Unknown location for tag-end in %s:" (semantic-tag-name aftertag))) | 216 | (message "Unknown location for tag-end in %s:" (semantic-tag-name aftertag))) |
| 217 | (goto-char te) | 217 | (goto-char te) |
| 218 | ;; If there is a comment immediatly after aftertag, skip over it. | 218 | ;; If there is a comment immediately after aftertag, skip over it. |
| 219 | (when (looking-at (concat "\\s-*\n?\\s-*" semantic-lex-comment-regex)) | 219 | (when (looking-at (concat "\\s-*\n?\\s-*" semantic-lex-comment-regex)) |
| 220 | (let ((pos (point)) | 220 | (let ((pos (point)) |
| 221 | (rnext (semantic-find-tag-by-overlay-next (point)))) | 221 | (rnext (semantic-find-tag-by-overlay-next (point)))) |