执行你的代码后,出现如下错误:
Debugger entered--Lisp error: (wrong-type-argument processp (((t lsp-java-progress-string)) ssh-deploy--mode-line-status-text org-mode-line-string))
process-buffer((((t lsp-java-progress-string)) ssh-deploy--mode-line-status-text org-mode-line-string))
(display-buffer (process-buffer (call-interactively 'lsp-install-server)))
(let ((process-environment (cl-copy-list process-environment))) (setenv "http_proxy" "127.0.0.1:8118") (setenv "https_proxy" "127.0.0.1:8118") (display-buffer (process-buffer (call-interactively 'lsp-install-server))))
(progn (let ((process-environment (cl-copy-list process-environment))) (setenv "http_proxy" "127.0.0.1:8118") (setenv "https_proxy" "127.0.0.1:8118") (display-buffer (process-buffer (call-interactively 'lsp-install-server)))))
(unwind-protect (progn (let ((process-environment (cl-copy-list process-environment))) (setenv "http_proxy" "127.0.0.1:8118") (setenv "https_proxy" "127.0.0.1:8118") (display-buffer (process-buffer (call-interactively 'lsp-install-server))))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (let ((process-environment (cl-copy-list process-environment))) (setenv "http_proxy" "127.0.0.1:8118") (setenv "https_proxy" "127.0.0.1:8118") (display-buffer (process-buffer (call-interactively 'lsp-install-server))))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))
(let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (let ((process-environment (cl-copy-list process-environment))) (setenv "http_proxy" "127.0.0.1:8118") (setenv "https_proxy" "127.0.0.1:8118") (display-buffer (process-buffer (call-interactively ...))))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))
(let ((url-proxy-services '(("http" . "127.0.0.1:8118") ("https" . "127.0.0.1:8118") ("ftp" . "127.0.0.1:8118") ("no_proxy" . "^\\(localhost\\|127.0.0.1\\|192.168.*\\|10.*\\)")))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (let ((process-environment ...)) (setenv "http_proxy" "127.0.0.1:8118") (setenv "https_proxy" "127.0.0.1:8118") (display-buffer (process-buffer ...)))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))))
(progn (let ((url-proxy-services '(("http" . "127.0.0.1:8118") ("https" . "127.0.0.1:8118") ("ftp" . "127.0.0.1:8118") ("no_proxy" . "^\\(localhost\\|127.0.0.1\\|192.168.*\\|10.*\\)")))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (let (...) (setenv "http_proxy" "127.0.0.1:8118") (setenv "https_proxy" "127.0.0.1:8118") (display-buffer ...))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))))
(unwind-protect (progn (let ((url-proxy-services '(("http" . "127.0.0.1:8118") ("https" . "127.0.0.1:8118") ("ftp" . "127.0.0.1:8118") ("no_proxy" . "^\\(localhost\\|127.0.0.1\\|192.168.*\\|10.*\\)")))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (let ... ... ... ...)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (let ((url-proxy-services '(... ... ... ...))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn ...) (and ... ...)))))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))
(let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (let ((url-proxy-services '...)) (let ((temp-buffer ...)) (save-current-buffer (set-buffer temp-buffer) (unwind-protect ... ...))))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))
eval((let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (let ((url-proxy-services ...)) (let (...) (save-current-buffer ... ...)))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) nil)
elisp--eval-last-sexp(nil)
eval-last-sexp(nil)
eros-eval-last-sexp(nil)
funcall-interactively(eros-eval-last-sexp nil)
call-interactively(eros-eval-last-sexp nil nil)
command-execute(eros-eval-last-sexp)
看了 lsp-install-server
的源代码,看不出是否返回的是一个 process
。你那边测试正常么?