Mercurial > emacs
changeset 108666:6fcf1baf9c2a
* emacs-lisp/bytecomp.el (byte-compile-interactive-only-functions):
Add delete-backward-char.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 24 May 2010 17:01:10 -0400 |
| parents | 45004fc2d3e8 |
| children | 559e7260976c f3d817d46523 |
| files | .bzrignore lisp/emacs-lisp/bytecomp.el src/cmds.c |
| diffstat | 3 files changed, 5 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/.bzrignore Thu May 20 21:06:34 2010 -0700 +++ b/.bzrignore Mon May 24 17:01:10 2010 -0400 @@ -66,3 +66,4 @@ src/deps configure.lineno src/core +core
--- a/lisp/emacs-lisp/bytecomp.el Thu May 20 21:06:34 2010 -0700 +++ b/lisp/emacs-lisp/bytecomp.el Mon May 24 17:01:10 2010 -0400 @@ -353,7 +353,7 @@ (defvar byte-compile-interactive-only-functions '(beginning-of-buffer end-of-buffer replace-string replace-regexp insert-file insert-buffer insert-file-literally previous-line next-line - goto-line comint-run) + goto-line comint-run delete-backward-char) "List of commands that are not meant to be called from Lisp.") (defvar byte-compile-not-obsolete-vars nil
--- a/src/cmds.c Thu May 20 21:06:34 2010 -0700 +++ b/src/cmds.c Mon May 24 17:01:10 2010 -0400 @@ -270,7 +270,9 @@ doc: /* Delete the previous N characters (following if N is negative). Optional second arg KILLFLAG non-nil means kill instead (save in kill ring). Interactively, N is the prefix arg, and KILLFLAG is set if -N was explicitly specified. */) +N was explicitly specified. +This is meant for interactive use only; from Lisp, better use `delete-char' +with a negated argument. */) (n, killflag) Lisp_Object n, killflag; {