Mercurial > emacs
comparison lisp/simple.el @ 104922:c603ee2aac17
* keymap.c (QCadvertised_binding): New constant.
(syms_of_keymap): Initialize it.
(Fwhere_is_internal): Try and use bindings from :advertised-binding
if applicable.
* progmodes/xscheme.el (xscheme-evaluation-commands):
Put a :advertised-binding property rather than using
advertised-xscheme-send-previous-expression.
(advertised-xscheme-send-previous-expression): Declare obsolete.
* emulation/crisp.el (crisp-mode-map): Use `undo' rather than
`advertised-undo'.
(crisp-mode): Add corresponding bindings to
undo's :advertised-binding instead.
* dired.el (dired-mode-map): Put a :advertised-binding property rather
than using dired-advertised-find-file.
(dired-advertised-find-file):
* simple.el (advertised-undo):
* wid-edit.el (advertised-widget-backward): Declare obsolete.
(widget-keymap): Put a :advertised-binding property rather
than using advertised-widget-backward.
* bindings.el (ctl-x-map): Put a :advertised-binding property rather
than using advertised-undo.
* tutorial.el (tutorial--default-keys): Adjust accordingly.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Fri, 11 Sep 2009 00:58:59 +0000 |
| parents | d7e64be6966a |
| children | f0794252d960 |
comparison
equal
deleted
inserted
replaced
| 104921:05feb973bfa0 | 104922:c603ee2aac17 |
|---|---|
| 1608 Go to the history element by the absolute history position HIST-POS." | 1608 Go to the history element by the absolute history position HIST-POS." |
| 1609 (goto-history-element hist-pos)) | 1609 (goto-history-element hist-pos)) |
| 1610 | 1610 |
| 1611 | 1611 |
| 1612 ;Put this on C-x u, so we can force that rather than C-_ into startup msg | 1612 ;Put this on C-x u, so we can force that rather than C-_ into startup msg |
| 1613 (defalias 'advertised-undo 'undo) | 1613 (define-obsolete-function-alias 'advertised-undo 'undo "23.2") |
| 1614 | 1614 |
| 1615 (defconst undo-equiv-table (make-hash-table :test 'eq :weakness t) | 1615 (defconst undo-equiv-table (make-hash-table :test 'eq :weakness t) |
| 1616 "Table mapping redo records to the corresponding undo one. | 1616 "Table mapping redo records to the corresponding undo one. |
| 1617 A redo record for undo-in-region maps to t. | 1617 A redo record for undo-in-region maps to t. |
| 1618 A redo record for ordinary undo maps to the following (earlier) undo.") | 1618 A redo record for ordinary undo maps to the following (earlier) undo.") |