Make function-alias-p use a better error symbol
* lisp/subr.el (function-alias-p): Use the same error symbol as `indirect-function'.
This commit is contained in:
parent
f729c333c7
commit
dd3715b0cb
1 changed files with 1 additions and 1 deletions
|
@ -6555,7 +6555,7 @@ signalled. If NOERROR, the non-loop parts of the chain is returned."
|
|||
(eq func orig-func))
|
||||
(if noerror
|
||||
(throw 'loop chain)
|
||||
(error "Alias loop for `%s'" orig-func)))
|
||||
(signal 'cyclic-function-indirection (list orig-func))))
|
||||
(push func chain))
|
||||
chain))))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue