674 |
(let (fortran-blink-matching-if ; avoid blinking delay |
(let (fortran-blink-matching-if ; avoid blinking delay |
675 |
indent-region-function) |
indent-region-function) |
676 |
(indent-region start end nil)))) |
(indent-region start end nil)))) |
677 |
(set (make-local-variable 'require-final-newline) t) |
(set (make-local-variable 'require-final-newline) mode-require-final-newline) |
678 |
;; The syntax tables don't understand the column-0 comment-markers. |
;; The syntax tables don't understand the column-0 comment-markers. |
679 |
(set (make-local-variable 'comment-use-syntax) nil) |
(set (make-local-variable 'comment-use-syntax) nil) |
680 |
(set (make-local-variable 'comment-padding) "$$$") |
(set (make-local-variable 'comment-padding) "$$$") |