init/lsp-mode/init-lsp-mode-disable-install-server.el


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40

(setq lsp-server-install-dir "/somewhere/that/doesnt/exist")

(defun init-lsp-mode-disable-install-server-error ()
  (error "lsp-mode server install features have been disabled"))

(advice-add 'lsp-install-server
            :around
            'init-lsp-mode-disable-install-server-error)

(advice-add 'lsp-update-server
            :around
            'init-lsp-mode-disable-install-server-error)

(advice-add 'lsp-update-servers
            :around
            'init-lsp-mode-disable-install-server-error)

(advice-add 'lsp-download-install
            :around
            'init-lsp-mode-disable-install-server-error)

(advice-add 'lsp-download-path
            :around
            'init-lsp-mode-disable-install-server-error)

(advice-add 'lsp-async-start-process
            :around
            'init-lsp-mode-disable-install-server-error)

(advice-add 'lsp--download-status
            :around
            'init-lsp-mode-disable-install-server-error)

(advice-add 'lsp--install-server-internal
            :around
            'init-lsp-mode-disable-install-server-error)

(advice-add 'lsp--npm-dependency-install
            :around
            'init-lsp-mode-disable-install-server-error)