diff options
| author | Glenn Morris <rgm@gnu.org> | 2011-06-25 18:37:36 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2011-06-25 18:37:36 -0700 |
| commit | ee584d02ddc4d944a9055681eda52dc1d197bba0 (patch) | |
| tree | c85aa0da48ab323d781b9c75fe3a41a8cdd3a994 /lisp/progmodes | |
| parent | 9f678528d81f0fcb1cab11753d2ad16b313583c9 (diff) | |
| download | emacs-ee584d02ddc4d944a9055681eda52dc1d197bba0.tar.gz emacs-ee584d02ddc4d944a9055681eda52dc1d197bba0.tar.bz2 emacs-ee584d02ddc4d944a9055681eda52dc1d197bba0.zip | |
* lisp/progmodes/f90.el (f90-looking-at-critical): Doc fix.
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 db292c2452b..cdb5f2a715d 100644 --- a/lisp/progmodes/f90.el +++ b/lisp/progmodes/f90.el @@ -1262,7 +1262,7 @@ NAME is nil if the statement has no label." (list (match-string 1)))) (defsubst f90-looking-at-critical () - "Return (KIND) if a critical or block block starts after point." + "Return (KIND NAME) if a critical or block block starts after point." (if (looking-at "\\(\\(\\sw+\\)[ \t]*:\\)?[ \t]*\\(critical\\|block\\)\\>") (let ((struct (match-string 3)) (label (match-string 2))) |