diff options
| author | Tino Calancha | 2016-07-09 22:56:25 +0900 |
|---|---|---|
| committer | Tino Calancha | 2016-07-09 22:56:25 +0900 |
| commit | c3223dd505ba0ecde57371eae7e9a59637a852e4 (patch) | |
| tree | c5d66cc5e4187d29b26a49a58c3aa8de70e21b07 /test | |
| parent | bfc29a5bcef1df4380a4f043f05035b88cd5c482 (diff) | |
| download | emacs-c3223dd505ba0ecde57371eae7e9a59637a852e4.tar.gz emacs-c3223dd505ba0ecde57371eae7e9a59637a852e4.zip | |
Detect aliases to built-in functions
* lisp/help-fns.el (describe-function-1): Check for aliases
defined with (defalias alias (symbol-function built-in)) (Bug#23887).
* test/lisp/help-fns-tests.el (help-fns-test-bug23887): Untag as
failing this test.
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/help-fns-tests.el | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/test/lisp/help-fns-tests.el b/test/lisp/help-fns-tests.el index 4239a2afefc..ba0d8ed8e38 100644 --- a/test/lisp/help-fns-tests.el +++ b/test/lisp/help-fns-tests.el | |||
| @@ -77,7 +77,6 @@ Return first line of the output of (describe-function-1 FUNC)." | |||
| 77 | 77 | ||
| 78 | (ert-deftest help-fns-test-bug23887 () | 78 | (ert-deftest help-fns-test-bug23887 () |
| 79 | "Test for http://debbugs.gnu.org/23887 ." | 79 | "Test for http://debbugs.gnu.org/23887 ." |
| 80 | :expected-result :failed | ||
| 81 | (let ((regexp "an alias for .re-search-forward. in .subr\.el") | 80 | (let ((regexp "an alias for .re-search-forward. in .subr\.el") |
| 82 | (result (help-fns-tests--describe-function 'search-forward-regexp))) | 81 | (result (help-fns-tests--describe-function 'search-forward-regexp))) |
| 83 | (should (string-match regexp result)))) | 82 | (should (string-match regexp result)))) |