Mercurial > emacs
comparison lisp/progmodes/f90.el @ 98150:43afebdca874
(f90-mode-map): Don't bind \t and \r.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Fri, 12 Sep 2008 03:09:19 +0000 |
parents | c3309dba6542 |
children | a4bd76aee560 |
comparison
equal
deleted
inserted
replaced
98149:af43cbb045c7 | 98150:43afebdca874 |
---|---|
651 (define-key map "\C-\M-h" 'f90-mark-subprogram) | 651 (define-key map "\C-\M-h" 'f90-mark-subprogram) |
652 (define-key map "\C-\M-n" 'f90-end-of-block) | 652 (define-key map "\C-\M-n" 'f90-end-of-block) |
653 (define-key map "\C-\M-p" 'f90-beginning-of-block) | 653 (define-key map "\C-\M-p" 'f90-beginning-of-block) |
654 (define-key map "\C-\M-q" 'f90-indent-subprogram) | 654 (define-key map "\C-\M-q" 'f90-indent-subprogram) |
655 (define-key map "\C-j" 'f90-indent-new-line) ; LFD equals C-j | 655 (define-key map "\C-j" 'f90-indent-new-line) ; LFD equals C-j |
656 (define-key map "\r" 'newline) | 656 ;;; (define-key map "\r" 'newline) |
657 (define-key map "\C-c\r" 'f90-break-line) | 657 (define-key map "\C-c\r" 'f90-break-line) |
658 ;;; (define-key map [M-return] 'f90-break-line) | 658 ;;; (define-key map [M-return] 'f90-break-line) |
659 (define-key map "\C-c\C-a" 'f90-previous-block) | 659 (define-key map "\C-c\C-a" 'f90-previous-block) |
660 (define-key map "\C-c\C-e" 'f90-next-block) | 660 (define-key map "\C-c\C-e" 'f90-next-block) |
661 (define-key map "\C-c\C-d" 'f90-join-lines) | 661 (define-key map "\C-c\C-d" 'f90-join-lines) |
662 (define-key map "\C-c\C-f" 'f90-fill-region) | 662 (define-key map "\C-c\C-f" 'f90-fill-region) |
663 (define-key map "\C-c\C-p" 'f90-previous-statement) | 663 (define-key map "\C-c\C-p" 'f90-previous-statement) |
664 (define-key map "\C-c\C-n" 'f90-next-statement) | 664 (define-key map "\C-c\C-n" 'f90-next-statement) |
665 (define-key map "\C-c\C-w" 'f90-insert-end) | 665 (define-key map "\C-c\C-w" 'f90-insert-end) |
666 (define-key map "\t" 'f90-indent-line) | 666 ;; Standard tab binding will call this, and also handle regions. |
667 ;;; (define-key map "\t" 'f90-indent-line) | |
667 (define-key map "," 'f90-electric-insert) | 668 (define-key map "," 'f90-electric-insert) |
668 (define-key map "+" 'f90-electric-insert) | 669 (define-key map "+" 'f90-electric-insert) |
669 (define-key map "-" 'f90-electric-insert) | 670 (define-key map "-" 'f90-electric-insert) |
670 (define-key map "*" 'f90-electric-insert) | 671 (define-key map "*" 'f90-electric-insert) |
671 (define-key map "/" 'f90-electric-insert) | 672 (define-key map "/" 'f90-electric-insert) |