diff options
author | Michael Albinus <michael.albinus@gmx.de> | 2021-04-23 19:57:50 +0200 |
---|---|---|
committer | Michael Albinus <michael.albinus@gmx.de> | 2021-04-23 19:57:50 +0200 |
commit | 5d287b4605d11dfbe56f77c719942198a807ba58 (patch) | |
tree | 3f236df5e6775907acd70198a30942299de17a6e /lisp/net/tramp-cmds.el | |
parent | 57cc2e94f724d11838f4a90827a26ea187bae675 (diff) | |
download | emacs-5d287b4605d11dfbe56f77c719942198a807ba58.tar.gz |
* lisp/net/tramp-cmds.el (tramp-recompile-elpa-command-completion-p):
Check, whether Tramp has a package description.
Diffstat (limited to 'lisp/net/tramp-cmds.el')
-rw-r--r-- | lisp/net/tramp-cmds.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/net/tramp-cmds.el b/lisp/net/tramp-cmds.el index 6342cf52873..a3cf6f3211a 100644 --- a/lisp/net/tramp-cmds.el +++ b/lisp/net/tramp-cmds.el @@ -482,7 +482,8 @@ It is completed by \"M-x TAB\" only if package.el is loaded, and Tramp is an installed ELPA package." ;; We cannot apply `package-installed-p', this would also return the ;; builtin package. - (tramp-compat-funcall 'package--user-installed-p 'tramp)) + (and (assq 'tramp (bound-and-true-p package-alist)) + (tramp-compat-funcall 'package--user-installed-p 'tramp))) ;;;###tramp-autoload (defun tramp-recompile-elpa () |