[elpa] externals/eglot 4321c84ae7: Fix#722: Add variable to withhold the init req process id

[ELPA Syncer]

branch: externals/eglot
commit 4321c84ae78b542d2ebf09c0b795b2eaf1470184
Author: Martin Carlson <spearalot@gmail.com>
Commit: Stefan Kangas <stefankangas@gmail.com>

    Fix#722: Add variable to withhold the init req process id
    
    * eglot.el (eglot-withhold-process-id): New defvar.
    (eglot--connect): Don't send pid to language server if above new
    defvar has a non-nil value.
    
    Copyright-paperwork-exempt: Yes
---
 eglot.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/eglot.el b/eglot.el
index e1eb9ed4ce..712ad17298 100644
--- a/eglot.el
+++ b/eglot.el
@@ -295,6 +295,10 @@ let the buffer grow forever."
   "If non-nil, activate Eglot in cross-referenced non-project files."
   :type 'boolean)
 
+(defvar eglot-withhold-process-id nil
+  "If non-nil, Eglot will not send the Emacs process id to the language server.
+This can be useful when using docker to run a language server.")
+
 ;; Customizable via `completion-category-overrides'.
 (when (assoc 'flex completion-styles-alist)
   (add-to-list 'completion-category-defaults '(eglot (styles flex basic))))
@@ -1110,7 +1114,8 @@ This docstring appeases checkdoc, that's all."
                       server
                       :initialize
                       (list :processId
-                            (unless (or (file-remote-p default-directory)
+                            (unless (or eglot-withhold-process-id
+                                        (file-remote-p default-directory)
                                         (eq (jsonrpc-process-type server)
                                             'network))
                               (emacs-pid))