diff options
| author | Stefan Monnier | 2012-06-07 12:20:28 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2012-06-07 12:20:28 -0400 |
| commit | ed8bd4d70540d5756b8e173b3d8a7cf7acb5c742 (patch) | |
| tree | 68c4f3f4fe1a36493769de80e222d89e1856f854 | |
| parent | 8b0823d6096739c30e518e2c9a57b77fe627234c (diff) | |
| download | emacs-ed8bd4d70540d5756b8e173b3d8a7cf7acb5c742.tar.gz emacs-ed8bd4d70540d5756b8e173b3d8a7cf7acb5c742.zip | |
* subr.el (kbd): Make it its own function.
| -rw-r--r-- | lisp/ChangeLog | 15 | ||||
| -rw-r--r-- | lisp/subr.el | 8 |
2 files changed, 14 insertions, 9 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4e85ce83503..cbdf00d639d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,18 +1,17 @@ | |||
| 1 | 2012-06-07 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * subr.el (kbd): Make it its own function. | ||
| 4 | |||
| 1 | 2012-06-07 Stefan Merten <smerten@oekonux.de> | 5 | 2012-06-07 Stefan Merten <smerten@oekonux.de> |
| 2 | 6 | ||
| 3 | * textmodes/rst.el: Use `eval-when-compile' for requiring `cl.el'. | 7 | * textmodes/rst.el: Use `eval-when-compile' for requiring `cl.el'. |
| 4 | Silence compiler warnings. Fix versions. | 8 | Silence compiler warnings. Fix versions. |
| 5 | 9 | (rst-position-if, rst-position, rst-some, rst-signum): New functions. | |
| 6 | (rst-position-if, rst-position, rst-some, rst-signum): New | ||
| 7 | functions. | ||
| 8 | (rst-shift-region, rst-adornment-level, rst-compute-tabs) | 10 | (rst-shift-region, rst-adornment-level, rst-compute-tabs) |
| 9 | (rst-indent-line, rst-shift-region, rst-forward-line): Use new | 11 | (rst-indent-line, rst-shift-region, rst-forward-line): Use them. |
| 10 | functions. | ||
| 11 | |||
| 12 | (rst-package-emacs-version-alist): Correct Emacs version to | 12 | (rst-package-emacs-version-alist): Correct Emacs version to |
| 13 | represent major merge with upstream. | 13 | represent major merge with upstream. |
| 14 | (rst-transition, rst-adornment, rst-compile-toolsets): Fix | 14 | (rst-transition, rst-adornment, rst-compile-toolsets): Fix versions. |
| 15 | versions. | ||
| 16 | 15 | ||
| 17 | 2012-06-06 Glenn Morris <rgm@gnu.org> | 16 | 2012-06-06 Glenn Morris <rgm@gnu.org> |
| 18 | 17 | ||
diff --git a/lisp/subr.el b/lisp/subr.el index 7dc5d66b747..473cc3efddd 100644 --- a/lisp/subr.el +++ b/lisp/subr.el | |||
| @@ -525,7 +525,13 @@ side-effects, and the argument LIST is not modified." | |||
| 525 | 525 | ||
| 526 | ;;;; Keymap support. | 526 | ;;;; Keymap support. |
| 527 | 527 | ||
| 528 | (defalias 'kbd 'read-kbd-macro) | 528 | (defun kbd (keys) |
| 529 | "Convert KEYS to the internal Emacs key representation. | ||
| 530 | KEYS should be a string constant in the format used for | ||
| 531 | saving keyboard macros (see `edmacro-mode')." | ||
| 532 | ;; Don't use a defalias, since the `pure' property is only true for | ||
| 533 | ;; the calling convention of `kbd'. | ||
| 534 | (read-kbd-macro keys)) | ||
| 529 | (put 'kbd 'pure t) | 535 | (put 'kbd 'pure t) |
| 530 | 536 | ||
| 531 | (defun undefined () | 537 | (defun undefined () |