Mercurial > emacs
comparison lisp/play/doctor.el @ 68346:79697c70111b
(doctor-mode-map): Rename from `doc-mode-map'.
| author | Juri Linkov <juri@jurta.org> |
|---|---|
| date | Mon, 23 Jan 2006 01:28:09 +0000 |
| parents | 3a3f5ed673b0 |
| children | f7702c5f335d 5b7d410e31f9 |
comparison
equal
deleted
inserted
replaced
| 68345:b10c2ebde562 | 68346:79697c70111b |
|---|---|
| 87 (first (car vv)) | 87 (first (car vv)) |
| 88 (ww (append (cdr vv) (list first)))) | 88 (ww (append (cdr vv) (list first)))) |
| 89 (set what ww) | 89 (set what ww) |
| 90 first)) | 90 first)) |
| 91 | 91 |
| 92 (defvar doc-mode-map | 92 (defvar doctor-mode-map |
| 93 (let ((map (make-sparse-keymap))) | 93 (let ((map (make-sparse-keymap))) |
| 94 (define-key map "\n" 'doctor-read-print) | 94 (define-key map "\n" 'doctor-read-print) |
| 95 (define-key map "\r" 'doctor-ret-or-read) | 95 (define-key map "\r" 'doctor-ret-or-read) |
| 96 map)) | 96 map)) |
| 97 | 97 |