From b32a3d9930a2b36618fd16ca825f7cf8f9e0d8d7 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Mon, 20 May 2002 21:52:07 +0000 Subject: (f90-looking-at-where-or-forall): Oops, defsubst, not defun. --- lisp/progmodes/f90.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el index e321dfce8d..0e6eed254d 100644 --- a/lisp/progmodes/f90.el +++ b/lisp/progmodes/f90.el @@ -955,7 +955,7 @@ NAME is nil if the statement has no label." (looking-at "then\\>"))) (list struct label)))))) -(defun f90-looking-at-where-or-forall () +(defsubst f90-looking-at-where-or-forall () "Return (KIND NAME) if a where or forall block starts after point. NAME is nil if the statement has no label." (save-excursion -- cgit v1.2.3