From: Glenn Morris Date: Sun, 26 Jun 2011 01:37:36 +0000 (-0700) Subject: * lisp/progmodes/f90.el (f90-looking-at-critical): Doc fix. X-Git-Tag: emacs-pretest-24.0.90~104^2~152^2~399 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ee584d02ddc4d944a9055681eda52dc1d197bba0;p=emacs.git * lisp/progmodes/f90.el (f90-looking-at-critical): Doc fix. --- 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)))