* lisp/net/tramp-compat.el (tramp-compat-funcall): Don't use `subrp'.

This commit is contained in:
Michael Albinus 2016-09-26 09:50:39 +02:00
parent 5ee56c4613
commit c44ecb77ab

View file

@ -55,7 +55,7 @@
;; avoid them in cases we know what we do.
(defmacro tramp-compat-funcall (function &rest arguments)
"Call FUNCTION if it exists. Do not raise compiler warnings."
`(when (or (subrp ,function) (functionp ,function))
`(when (functionp ,function)
(with-no-warnings (funcall ,function ,@arguments))))
;; We currently use "[" and "]" in the filename format for IPv6 hosts