Mercurial > emacs
comparison lisp/emacs-lisp/re-builder.el @ 49598:0d8b17d428b5
Trailing whitepace deleted.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Tue, 04 Feb 2003 13:24:35 +0000 |
| parents | 6e55b7742a81 |
| children | 695cf19ef79e d7ddb3e565de |
comparison
equal
deleted
inserted
replaced
| 49597:e88404e8f2cf | 49598:0d8b17d428b5 |
|---|---|
| 267 ;; Use the same "\C-c" keymap as `reb-mode' and use font-locking from | 267 ;; Use the same "\C-c" keymap as `reb-mode' and use font-locking from |
| 268 ;; `emacs-lisp-mode' | 268 ;; `emacs-lisp-mode' |
| 269 (define-key reb-lisp-mode-map "\C-c" | 269 (define-key reb-lisp-mode-map "\C-c" |
| 270 (lookup-key reb-mode-map "\C-c")) | 270 (lookup-key reb-mode-map "\C-c")) |
| 271 | 271 |
| 272 (defvar reb-subexp-mode-map | 272 (defvar reb-subexp-mode-map |
| 273 (let ((m (make-keymap))) | 273 (let ((m (make-keymap))) |
| 274 (suppress-keymap m) | 274 (suppress-keymap m) |
| 275 ;; Again share the "\C-c" keymap for the commands | 275 ;; Again share the "\C-c" keymap for the commands |
| 276 (define-key m "\C-c" (lookup-key reb-mode-map "\C-c")) | 276 (define-key m "\C-c" (lookup-key reb-mode-map "\C-c")) |
| 277 (define-key m "q" 'reb-quit-subexp-mode) | 277 (define-key m "q" 'reb-quit-subexp-mode) |