Mercurial > emacs
comparison lisp/progmodes/fortran.el @ 11584:3391bf365efa
(fortran-auto-fill-mode): Use force-mode-line-update.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Tue, 25 Apr 1995 22:30:13 +0000 |
| parents | e7c26522b881 |
| children | df31be5a8a11 |
comparison
equal
deleted
inserted
replaced
| 11583:b481316dd562 | 11584:3391bf365efa |
|---|---|
| 1414 (if (if (null arg) | 1414 (if (if (null arg) |
| 1415 (not auto-fill-function) | 1415 (not auto-fill-function) |
| 1416 (> (prefix-numeric-value arg) 0)) | 1416 (> (prefix-numeric-value arg) 0)) |
| 1417 'fortran-indent-line | 1417 'fortran-indent-line |
| 1418 nil)) | 1418 nil)) |
| 1419 ;; update mode-line | 1419 (force-mode-line-update))) |
| 1420 (set-buffer-modified-p (buffer-modified-p)))) | |
| 1421 | 1420 |
| 1422 (defun fortran-do-auto-fill () | 1421 (defun fortran-do-auto-fill () |
| 1423 (interactive) | 1422 (interactive) |
| 1424 (let* ((opoint (point)) | 1423 (let* ((opoint (point)) |
| 1425 (bol (save-excursion (beginning-of-line) (point))) | 1424 (bol (save-excursion (beginning-of-line) (point))) |