aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1993-06-08 05:25:19 +0000
committerRichard M. Stallman1993-06-08 05:25:19 +0000
commitaa4ed68c3ed4434c6d56972c451d04c4fbd2a201 (patch)
tree915b73d8979166a20801a0c9306211a506c42a33
parentbcd5aef10781a58b3d506686e2cf5f6baecd685d (diff)
downloademacs-aa4ed68c3ed4434c6d56972c451d04c4fbd2a201.tar.gz
emacs-aa4ed68c3ed4434c6d56972c451d04c4fbd2a201.zip
(fortran-indent-new-line): Renamed from
fortran-reindent-then-newline-and-indent.
-rw-r--r--lisp/progmodes/fortran.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index f7b5d31a094..10e8c3f405c 100644
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -190,7 +190,7 @@ This variable used in TAB-format mode.")
190 (define-key fortran-mode-map "\e;" 'fortran-indent-comment) 190 (define-key fortran-mode-map "\e;" 'fortran-indent-comment)
191 (define-key fortran-mode-map "\e\C-h" 'mark-fortran-subprogram) 191 (define-key fortran-mode-map "\e\C-h" 'mark-fortran-subprogram)
192 (define-key fortran-mode-map "\e\n" 'fortran-split-line) 192 (define-key fortran-mode-map "\e\n" 'fortran-split-line)
193 (define-key fortran-mode-map "\n" 'fortran-reindent-then-newline-and-indent) 193 (define-key fortran-mode-map "\n" 'fortran-indent-new-line)
194 (define-key fortran-mode-map "\e\C-q" 'fortran-indent-subprogram) 194 (define-key fortran-mode-map "\e\C-q" 'fortran-indent-subprogram)
195 (define-key fortran-mode-map "\C-c\C-w" 'fortran-window-create-momentarily) 195 (define-key fortran-mode-map "\C-c\C-w" 'fortran-window-create-momentarily)
196 (define-key fortran-mode-map "\C-c\C-r" 'fortran-column-ruler) 196 (define-key fortran-mode-map "\C-c\C-r" 'fortran-column-ruler)
@@ -589,7 +589,7 @@ Auto-indent does not happen if a numeric arg is used."
589 (looking-at "\t"));In col 8 with a single tab to the left. 589 (looking-at "\t"));In col 8 with a single tab to the left.
590 (not (or (eq last-command 'fortran-indent-line) 590 (not (or (eq last-command 'fortran-indent-line)
591 (eq last-command 591 (eq last-command
592 'fortran-reindent-then-newline-and-indent)))) 592 'fortran-indent-new-line))))
593 (save-excursion 593 (save-excursion
594 (re-search-backward "[^ \t0-9]" 594 (re-search-backward "[^ \t0-9]"
595 (save-excursion 595 (save-excursion
@@ -750,7 +750,7 @@ non-comment Fortran statement in the file, and nil otherwise."
750 (if fortran-blink-matching-if 750 (if fortran-blink-matching-if
751 (fortran-blink-matching-if)))) 751 (fortran-blink-matching-if))))
752 752
753(defun fortran-reindent-then-newline-and-indent () 753(defun fortran-indent-new-line ()
754 "Reindent the current Fortran line, insert a newline and indent the newline. 754 "Reindent the current Fortran line, insert a newline and indent the newline.
755An abbrev before point is expanded if `abbrev-mode' is non-nil." 755An abbrev before point is expanded if `abbrev-mode' is non-nil."
756 (interactive) 756 (interactive)