Mercurial > emacs
comparison lisp/subr.el @ 353:38d331b3a0b8
*** empty log message ***
| author | Jim Blandy <jimb@redhat.com> |
|---|---|
| date | Thu, 25 Jul 1991 16:41:17 +0000 |
| parents | 7e7575d7b6d0 |
| children | 9dab5ca1890f |
comparison
equal
deleted
inserted
replaced
| 352:cd7ffb1fcb45 | 353:38d331b3a0b8 |
|---|---|
| 175 (fset 'rplaca 'setcar) | 175 (fset 'rplaca 'setcar) |
| 176 (fset 'rplacd 'setcdr) | 176 (fset 'rplacd 'setcdr) |
| 177 (fset 'beep 'ding) ;preserve lingual purtity | 177 (fset 'beep 'ding) ;preserve lingual purtity |
| 178 (fset 'indent-to-column 'indent-to) | 178 (fset 'indent-to-column 'indent-to) |
| 179 (fset 'backward-delete-char 'delete-backward-char) | 179 (fset 'backward-delete-char 'delete-backward-char) |
| 180 (fset 'search-forward-regexp (symbol-function 're-search-forward)) | |
| 181 (fset 'search-backward-regexp (symbol-function 're-search-backward)) | |
| 180 | 182 |
| 181 (defvar global-map nil | 183 (defvar global-map nil |
| 182 "Default global keymap mapping Emacs keyboard input into commands. | 184 "Default global keymap mapping Emacs keyboard input into commands. |
| 183 The value is a keymap which is usually (but not necessarily) Emacs's | 185 The value is a keymap which is usually (but not necessarily) Emacs's |
| 184 global map.") | 186 global map.") |