Mercurial > hg > xemacs-beta
comparison lisp/modes/pascal.el @ 153:25f70ba0133c r20-3b3
Import from CVS: tag r20-3b3
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:38:25 +0200 |
parents | 59463afc5666 |
children | 28f395d8dc7a |
comparison
equal
deleted
inserted
replaced
152:4c132ee2d62b | 153:25f70ba0133c |
---|---|
86 (define-key pascal-mode-map "#" 'electric-pascal-hash) | 86 (define-key pascal-mode-map "#" 'electric-pascal-hash) |
87 (define-key pascal-mode-map "\r" 'electric-pascal-terminate-line) | 87 (define-key pascal-mode-map "\r" 'electric-pascal-terminate-line) |
88 (define-key pascal-mode-map "\t" 'electric-pascal-tab) | 88 (define-key pascal-mode-map "\t" 'electric-pascal-tab) |
89 (define-key pascal-mode-map "\M-\t" 'pascal-complete-word) | 89 (define-key pascal-mode-map "\M-\t" 'pascal-complete-word) |
90 (define-key pascal-mode-map "\M-?" 'pascal-show-completions) | 90 (define-key pascal-mode-map "\M-?" 'pascal-show-completions) |
91 (define-key pascal-mode-map "\177" 'backward-delete-char-untabify) | 91 ;; GDF - don't rebind the delete key. |
92 ;; (define-key pascal-mode-map "\177" 'backward-delete-char-untabify) | |
92 (define-key pascal-mode-map "\M-\C-h" 'pascal-mark-defun) | 93 (define-key pascal-mode-map "\M-\C-h" 'pascal-mark-defun) |
93 (define-key pascal-mode-map "\C-c\C-b" 'pascal-insert-block) | 94 (define-key pascal-mode-map "\C-c\C-b" 'pascal-insert-block) |
94 (define-key pascal-mode-map "\M-*" 'pascal-star-comment) | 95 (define-key pascal-mode-map "\M-*" 'pascal-star-comment) |
95 (define-key pascal-mode-map "\C-c\C-c" 'pascal-comment-area) | 96 (define-key pascal-mode-map "\C-c\C-c" 'pascal-comment-area) |
96 (define-key pascal-mode-map "\C-c\C-u" 'pascal-uncomment-area) | 97 (define-key pascal-mode-map "\C-c\C-u" 'pascal-uncomment-area) |