* test/automated/advice-tests.el (advice-test-call-interactively): Make sure

the function's definition is fully restored at the end.
This commit is contained in:
Stefan Monnier 2014-07-20 21:34:03 -04:00
parent 3241dc268e
commit 4ce2720e1c
2 changed files with 7 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2014-07-21 Stefan Monnier <monnier@iro.umontreal.ca>
* automated/advice-tests.el (advice-test-call-interactively): Make sure
the function's definition is fully restored at the end.
2014-07-12 Fabián Ezequiel Gallina <fgallina@gnu.org>
* automated/python-tests.el (python-indent-block-enders-1)

View file

@ -160,7 +160,8 @@ function being an around advice."
(advice-add 'call-interactively :before #'ignore)
(should (equal (sm-test7.4) '(1 . nil)))
(should (equal (call-interactively 'sm-test7.4) '(1 . t))))
(fset 'call-interactively old))))
(advice-remove 'call-interactively #'ignore)
(should (eq (symbol-function 'call-interactively) old)))))
(ert-deftest advice-test-interactive ()
"Check handling of interactive spec."