diff lisp/progmodes/fortran.el @ 3567:2ca5f216e445

(fortran-indent-new-line): Renamed from fortran-reindent-then-newline-and-indent.
author Richard M. Stallman <rms@gnu.org>
date Tue, 08 Jun 1993 05:25:19 +0000
parents 927c3d8374ef
children 507f64624555
line wrap: on
line diff
--- a/lisp/progmodes/fortran.el	Tue Jun 08 05:16:47 1993 +0000
+++ b/lisp/progmodes/fortran.el	Tue Jun 08 05:25:19 1993 +0000
@@ -190,7 +190,7 @@
   (define-key fortran-mode-map "\e;" 'fortran-indent-comment)
   (define-key fortran-mode-map "\e\C-h" 'mark-fortran-subprogram)
   (define-key fortran-mode-map "\e\n" 'fortran-split-line)
-  (define-key fortran-mode-map "\n" 'fortran-reindent-then-newline-and-indent)
+  (define-key fortran-mode-map "\n" 'fortran-indent-new-line)
   (define-key fortran-mode-map "\e\C-q" 'fortran-indent-subprogram)
   (define-key fortran-mode-map "\C-c\C-w" 'fortran-window-create-momentarily)
   (define-key fortran-mode-map "\C-c\C-r" 'fortran-column-ruler)
@@ -589,7 +589,7 @@
 		   (looking-at "\t"));In col 8 with a single tab to the left.
 		 (not (or (eq last-command 'fortran-indent-line)
 			  (eq last-command
-			      'fortran-reindent-then-newline-and-indent))))
+			      'fortran-indent-new-line))))
 	    (save-excursion
 	      (re-search-backward "[^ \t0-9]"
 				  (save-excursion
@@ -750,7 +750,7 @@
     (if fortran-blink-matching-if
 	(fortran-blink-matching-if))))
 
-(defun fortran-reindent-then-newline-and-indent ()
+(defun fortran-indent-new-line ()
   "Reindent the current Fortran line, insert a newline and indent the newline.
 An abbrev before point is expanded if `abbrev-mode' is non-nil."
   (interactive)