diff options
| author | Stefan Monnier | 2012-11-19 23:24:09 -0500 |
|---|---|---|
| committer | Stefan Monnier | 2012-11-19 23:24:09 -0500 |
| commit | 23ba2705e22b89154ef7cbb0595419732080b94c (patch) | |
| tree | b9ca597bccdbbc6467e0fa76ea1fb321fcb0f5c0 /test/ChangeLog | |
| parent | b0636be7f9526041aeaa9f4fb6d3636426eec899 (diff) | |
| download | emacs-23ba2705e22b89154ef7cbb0595419732080b94c.tar.gz emacs-23ba2705e22b89154ef7cbb0595419732080b94c.zip | |
Make called-interactively-p work for edebug or advised code.
* lisp/subr.el (called-interactively-p-functions): New var.
(internal--called-interactively-p--get-frame): New macro.
(called-interactively-p, interactive-p): Rewrite in Lisp.
* lisp/emacs-lisp/nadvice.el (advice--called-interactively-skip): New fun.
(called-interactively-p-functions): Use it.
* lisp/emacs-lisp/edebug.el (edebug--called-interactively-skip): New fun.
(called-interactively-p-functions): Use it.
* lisp/allout.el (allout-called-interactively-p): Don't assume
called-interactively-p is a subr.
* src/eval.c (Finteractive_p, Fcalled_interactively_p, interactive_p): Remove.
(syms_of_eval): Remove corresponding defsubr.
* src/bytecode.c (exec_byte_code): `interactive-p' is now a Lisp function.
* test/automated/advice-tests.el (advice-tests--data): Remove.
(advice-tests): Move the tests directly here instead.
Add called-interactively-p tests.
Diffstat (limited to 'test/ChangeLog')
| -rw-r--r-- | test/ChangeLog | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/test/ChangeLog b/test/ChangeLog index 75903ae3ef4..b66c2925287 100644 --- a/test/ChangeLog +++ b/test/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2012-11-20 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * automated/advice-tests.el (advice-tests--data): Remove. | ||
| 4 | (advice-tests): Move the tests directly here instead. | ||
| 5 | Add called-interactively-p tests. | ||
| 6 | |||
| 1 | 2012-11-19 Stefan Monnier <monnier@iro.umontreal.ca> | 7 | 2012-11-19 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 8 | ||
| 3 | * automated/ert-x-tests.el: Use cl-lib. | 9 | * automated/ert-x-tests.el: Use cl-lib. |