diff options
| author | Glenn Morris | 2006-11-10 08:39:13 +0000 |
|---|---|---|
| committer | Glenn Morris | 2006-11-10 08:39:13 +0000 |
| commit | cbc121c7bab1d0773b1968225ed7b23825bf8072 (patch) | |
| tree | 13617f331a14f604e8384dc4e3bb3bb172ad4284 | |
| parent | e5803d84f59034cb37a36f21bd7b3bc370437c8e (diff) | |
| download | emacs-cbc121c7bab1d0773b1968225ed7b23825bf8072.tar.gz emacs-cbc121c7bab1d0773b1968225ed7b23825bf8072.zip | |
(f90-indent-region): Bind case-fold-search to t.
| -rw-r--r-- | lisp/progmodes/f90.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el index e661552c331..cdbc24cd391 100644 --- a/lisp/progmodes/f90.el +++ b/lisp/progmodes/f90.el | |||
| @@ -1470,6 +1470,7 @@ If run in the middle of a line, the line is not broken." | |||
| 1470 | (interactive "*r") | 1470 | (interactive "*r") |
| 1471 | (let ((end-region-mark (copy-marker end-region)) | 1471 | (let ((end-region-mark (copy-marker end-region)) |
| 1472 | (save-point (point-marker)) | 1472 | (save-point (point-marker)) |
| 1473 | (case-fold-search t) | ||
| 1473 | block-list ind-lev ind-curr ind-b cont struct beg-struct end-struct) | 1474 | block-list ind-lev ind-curr ind-b cont struct beg-struct end-struct) |
| 1474 | (goto-char beg-region) | 1475 | (goto-char beg-region) |
| 1475 | ;; First find a line which is not a continuation line or comment. | 1476 | ;; First find a line which is not a continuation line or comment. |