diff options
| author | Stefan Monnier | 2024-04-17 13:58:40 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2024-04-17 14:01:35 -0400 |
| commit | fcee1bf07bb807c568f0155f94ebd69636691de9 (patch) | |
| tree | 47807299181b02d535b8b7200f13bdbf9113ccb3 | |
| parent | 4dd3288569c30414abf0be4fd357d66e4dfeb8fb (diff) | |
| download | emacs-fcee1bf07bb807c568f0155f94ebd69636691de9.tar.gz emacs-fcee1bf07bb807c568f0155f94ebd69636691de9.zip | |
eglot.el: Remove accidentally included debugging code
* lisp/progmodes/eglot.el (eglot--signal-textDocument/didChange):
Remove leftover debug message.
| -rw-r--r-- | lisp/progmodes/eglot.el | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el index 5e4f7bba679..bff273338c4 100644 --- a/lisp/progmodes/eglot.el +++ b/lisp/progmodes/eglot.el | |||
| @@ -2798,7 +2798,6 @@ When called interactively, use the currently active server" | |||
| 2798 | (list | 2798 | (list |
| 2799 | :textDocument (eglot--VersionedTextDocumentIdentifier) | 2799 | :textDocument (eglot--VersionedTextDocumentIdentifier) |
| 2800 | :contentChanges | 2800 | :contentChanges |
| 2801 | (let ((changes | ||
| 2802 | (if full-sync-p | 2801 | (if full-sync-p |
| 2803 | (vector `(:text ,(eglot--widening | 2802 | (vector `(:text ,(eglot--widening |
| 2804 | (buffer-substring-no-properties (point-min) | 2803 | (buffer-substring-no-properties (point-min) |
| @@ -2812,8 +2811,6 @@ When called interactively, use the currently active server" | |||
| 2812 | when (numberp len) ;FIXME: Not needed with `track-changes'. | 2811 | when (numberp len) ;FIXME: Not needed with `track-changes'. |
| 2813 | vconcat `[,(list :range `(:start ,beg :end ,end) | 2812 | vconcat `[,(list :range `(:start ,beg :end ,end) |
| 2814 | :rangeLength len :text text)])))) | 2813 | :rangeLength len :text text)])))) |
| 2815 | (message "Sending changes: %S" changes) | ||
| 2816 | changes))) | ||
| 2817 | (setq eglot--recent-changes nil) | 2814 | (setq eglot--recent-changes nil) |
| 2818 | (jsonrpc--call-deferred server)))) | 2815 | (jsonrpc--call-deferred server)))) |
| 2819 | 2816 | ||