# HG changeset patch # User Richard M. Stallman # Date 753616994 0 # Node ID cd3d59bc0b947388d0621aca95d30bcea8809f85 # Parent e1843fccd1f2e23364bd246bb7c9676de578ffd5 (calculate-fortran-indent): Fixup regexp for where statements. diff -r e1843fccd1f2 -r cd3d59bc0b94 lisp/progmodes/fortran.el --- a/lisp/progmodes/fortran.el Thu Nov 18 09:45:27 1993 +0000 +++ b/lisp/progmodes/fortran.el Thu Nov 18 10:03:14 1993 +0000 @@ -4,7 +4,7 @@ ;; Author: Michael D. Prange ;; Maintainer: bug-fortran-mode@erl.mit.edu -;; Version 1.30.2 (June 1, 1993) +;; Version 1.30.3 (November 16, 1993) ;; Keywords: languages ;; This file is part of GNU Emacs. @@ -46,7 +46,7 @@ ;;; Bugs to bug-fortran-mode@erl.mit.edu -(defconst fortran-mode-version "version 1.30.2") +(defconst fortran-mode-version "version 1.30.3") ;;; Code: @@ -807,7 +807,7 @@ (setq icol (+ icol fortran-if-indent))) ((looking-at "\\(otherwise\\|else[ \t]*where\\)\\b") (setq icol (+ icol fortran-if-indent))) - ((looking-at "where.*(.*)[ \t]*\n") + ((looking-at "where[ \t]*(.*)[ \t]*\n") (setq icol (+ icol fortran-if-indent))) ((looking-at "do\\b") (setq icol (+ icol fortran-do-indent)))