Mercurial > emacs
comparison lisp/simple.el @ 81666:5b21f07d3106
Docstring convention fix.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Fri, 29 Jun 2007 04:37:34 +0000 |
| parents | 7be7263c7d7f |
| children | d50de52ebdfb |
comparison
equal
deleted
inserted
replaced
| 81665:17587ebad101 | 81666:5b21f07d3106 |
|---|---|
| 5257 (define-key function-key-map [?\C-x ?@ ?S] 'event-apply-shift-modifier) | 5257 (define-key function-key-map [?\C-x ?@ ?S] 'event-apply-shift-modifier) |
| 5258 (define-key function-key-map [?\C-x ?@ ?c] 'event-apply-control-modifier) | 5258 (define-key function-key-map [?\C-x ?@ ?c] 'event-apply-control-modifier) |
| 5259 | 5259 |
| 5260 ;;;; Keypad support. | 5260 ;;;; Keypad support. |
| 5261 | 5261 |
| 5262 ;;; Make the keypad keys act like ordinary typing keys. If people add | 5262 ;; Make the keypad keys act like ordinary typing keys. If people add |
| 5263 ;;; bindings for the function key symbols, then those bindings will | 5263 ;; bindings for the function key symbols, then those bindings will |
| 5264 ;;; override these, so this shouldn't interfere with any existing | 5264 ;; override these, so this shouldn't interfere with any existing |
| 5265 ;;; bindings. | 5265 ;; bindings. |
| 5266 | 5266 |
| 5267 ;; Also tell read-char how to handle these keys. | 5267 ;; Also tell read-char how to handle these keys. |
| 5268 (mapc | 5268 (mapc |
| 5269 (lambda (keypad-normal) | 5269 (lambda (keypad-normal) |
| 5270 (let ((keypad (nth 0 keypad-normal)) | 5270 (let ((keypad (nth 0 keypad-normal)) |