Mercurial > emacs
comparison lisp/play/blackbox.el @ 91367:c70e45a7acfd
Merge from emacs--devo--0
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-324
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Wed, 30 Jan 2008 07:57:28 +0000 |
| parents | 606f2d163a64 d83fb5ce6160 |
| children |
comparison
equal
deleted
inserted
replaced
| 91366:86f3a8f0a3a6 | 91367:c70e45a7acfd |
|---|---|
| 104 (blackbox-redefine-key map 'previous-line 'bb-up) | 104 (blackbox-redefine-key map 'previous-line 'bb-up) |
| 105 (blackbox-redefine-key map 'next-line 'bb-down) | 105 (blackbox-redefine-key map 'next-line 'bb-down) |
| 106 (blackbox-redefine-key map 'move-end-of-line 'bb-eol) | 106 (blackbox-redefine-key map 'move-end-of-line 'bb-eol) |
| 107 (blackbox-redefine-key map 'move-beginning-of-line 'bb-bol) | 107 (blackbox-redefine-key map 'move-beginning-of-line 'bb-bol) |
| 108 (define-key map " " 'bb-romp) | 108 (define-key map " " 'bb-romp) |
| 109 (define-key map "q" 'bury-buffer) | |
| 109 (define-key map [insert] 'bb-romp) | 110 (define-key map [insert] 'bb-romp) |
| 111 (define-key map [return] 'bb-done) | |
| 110 (blackbox-redefine-key map 'newline 'bb-done) | 112 (blackbox-redefine-key map 'newline 'bb-done) |
| 111 map)) | 113 map)) |
| 112 | 114 |
| 113 ;; Blackbox mode is suitable only for specially formatted data. | 115 ;; Blackbox mode is suitable only for specially formatted data. |
| 114 (put 'blackbox-mode 'mode-class 'special) | 116 (put 'blackbox-mode 'mode-class 'special) |