diff options
| author | Glenn Morris <rgm@gnu.org> | 2011-10-11 00:27:46 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2011-10-11 00:27:46 -0700 |
| commit | c02ee9d6912b65d18e9ee1a3c79f7b83983c6f64 (patch) | |
| tree | 4ec70a89622aa5d7a97e4109375150b3588f4e93 /lisp/progmodes | |
| parent | f5b71bc0d6de35ff97571d7b933b8ba8e8bbb1bb (diff) | |
| download | emacs-c02ee9d6912b65d18e9ee1a3c79f7b83983c6f64.tar.gz emacs-c02ee9d6912b65d18e9ee1a3c79f7b83983c6f64.tar.bz2 emacs-c02ee9d6912b65d18e9ee1a3c79f7b83983c6f64.zip | |
Small fix for f90-next-statement.
* lisp/progmodes/f90.el (f90-next-statement):
Ignore preprocessor lines, like f90-previous-statement does.
Diffstat (limited to 'lisp/progmodes')
| -rw-r--r-- | lisp/progmodes/f90.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el index 3d5c8a97835..007203a8b21 100644 --- a/lisp/progmodes/f90.el +++ b/lisp/progmodes/f90.el @@ -1578,7 +1578,7 @@ Return nil if no later statement is found." (while (and (setq not-last-statement (and (zerop (forward-line 1)) (not (eobp)))) - (looking-at "[ \t0-9]*\\(!\\|$\\)"))) + (looking-at "[ \t0-9]*\\(!\\|$\\|#\\)"))) not-last-statement)) (defun f90-beginning-of-subprogram () |