dotfiles/nixos/hm-modules/emacs/.emacs.d/org/lsp-and-ide.org

• LSP and IDE setup
  • Languages
    • YAML
    • Dockerfile
    • Rust
    • SCAD
    • Scala
    • Web - HTML + CSS
    • Javascript
    • Typescript
  • LSP
    • COMMENT smart-tabs
    • lsp-mode
    • company
    • lsp-metals
    • lsp-ui
    • lsp-pyright
    • yassnippet
    • flycheck

LSP and IDE setup

Languages

YAML

  (use-package yaml-mode
:straight t
:mode ("\\.yml\\'" . yaml-mode)
:mode ("\\.yaml\\'" . yaml-mode))

Dockerfile

  (use-package dockerfile-mode
:straight t
:mode ("Dockerfile\\'" . dockerfile-mode))

Rust

  (use-package rustic
:straight t
:mode ("\\.rs\\'" . rustic-mode))

SCAD

  (use-package scad-mode
:straight t)

Scala

  (use-package scala-mode
:straight t
:mode ("\\.s\\(cala\\|bt\\)$" . scala-mode))

  (use-package sbt-mode
:straight t
:commands sbt-start sbt-command
:config
;; WORKAROUND: https://github.com/ensime/emacs-sbt-mode/issues/31
;; allows using SPACE when in the minibuffer
(substitute-key-definition
'minibuffer-complete-word
'self-insert-command
minibuffer-local-completion-map)
;; sbt-supershell kills sbt-mode:  https://github.com/hvesalai/emacs-sbt-mode/issues/152
(setq sbt:program-options '("-Dsbt.supershell=false")))

Web - HTML + CSS

  (use-package web-mode
:straight t
:mode ("\\.html\\'" . web-mode)
:mode ("\\.xhtml\\'" . web-mode)
:mode ("\\.css\\'" . css-mode)
:mode ("\\.scss\\'" . css-mode)
:config
(with-eval-after-load "flycheck"
(flycheck-add-mode 'javascript-eslint 'web-mode)))

Javascript

  (use-package rjsx-mode
:straight t
:config
:mode ("\\.js\\'" . rjsx-mode)
:mode ("\\.jsx\\'" . rjsx-mode))

Typescript

  (use-package typescript-mode
:straight t
:config
:mode ("\\.ts\\'" . typescript-mode)
:mode ("\\.tsx\\'" . typescript-mode))
  (with-eval-after-load "lsp-mode"
)

LSP

COMMENT smart-tabs

  (setq whitespace-display-mappings
 '((tab-mark 9 [65293] [92 9])))
  (setq whitespace-style '(tab-mark))
  (use-package smart-tabs-mode
:straight t
:config
(smart-tabs-add-language-support rust rustic-hook
	 ((c-indent-line . c-basic-offset)
	  (c-indent-region . c-basic-offset)))
(smart-tabs-insinuate 'c 'javascript 'rust))

lsp-mode

  (use-package lsp-mode
:straight t
;; :after (; rustic
;; rjsx-mode
;; typescript-mode
;; web-mode
;; scala-mode)
:config
(setq rustic-lsp-server 'rust-analyzer)
(setq rustic-compile-command "cargo build")
(setq rustic-format-trigger nil);'on-save
(setq lsp-prefer-flymake nil)

(setq lsp-rust-analyzer-display-chaining-hints nil)
(setq lsp-rust-analyzer-display-parameter-hints nil)
(setq lsp-rust-analyzer-server-display-inlay-hints t)
:hook
(rustic . lsp)
(php-mode . lsp)
(rjsx-mode . lsp)
(css-mode . lsp)
(web-mode . lsp)
(lsp-mode . lsp-lens-mode)
(typescript-mode . lsp)
(scala-mode . lsp)
(tex-mode . lsp)
(lsp-mode . display-fill-column-indicator-mode)
(python-mode . lsp)
(lsp-mode . origami-mode)
(lsp-mode . lsp-rust-analyzer-inlay-hints-mode)
:config
    (message "Loading modified typescript lsp-client")
(lsp-register-client
(make-lsp-client :new-connection (lsp-tramp-connection (lambda ()
				  `("typescript-language-server"
				    "--tsserver-path"
				    "tsserver"
				    ,@lsp-clients-typescript-server-args)))
 :activation-fn 'lsp-typescript-javascript-tsx-jsx-activate-p
 :priority -2
 :completion-in-comments? t
 :initialization-options (lambda ()
		    (list :plugins lsp-clients-typescript-plugins
			  :logVerbosity lsp-clients-typescript-log-verbosity
			  :tsServerPath (lsp-package-path 'typescript)))
 :ignore-messages '("readFile .*? requested by TypeScript but content not available")
 :server-id 'ts-ls
 :remote? t)))

company

  (use-package company
:straight t
:config
;; aligns annotation to the right hand side
(setq company-tooltip-align-annotations t)   
(add-hook 'after-init-hook 'global-company-mode))

lsp-metals

  (lsp-register-client
   (make-lsp-client :new-connection (lsp-tramp-connection 'lsp-metals--server-command)
:major-modes '(scala-mode)
:priority -1
:initialization-options '((decorationProvider . t)
		  (inlineDecorationProvider . t)
		  (didFocusProvider . t)
		  (executeClientCommandProvider . t)
		  (doctorProvider . "html")
		  (statusBarProvider . "on")
		  (debuggingProvider . t)
		  (treeViewProvider . t))
:notification-handlers (ht ("metals/executeClientCommand" #'lsp-metals--execute-client-command)
		   ("metals/publishDecorations" #'lsp-metals--publish-decorations)
		   ("metals/treeViewDidChange" #'lsp-metals-treeview--did-change)
		   ("metals-model-refresh" #'lsp-metals--model-refresh)
		   ("metals/status" #'lsp-metals--status-string))
:action-handlers (ht ("metals-debug-session-start" (-partial #'lsp-metals--debug-start :json-false))
	     ("metals-run-session-start" (-partial #'lsp-metals--debug-start t)))
:server-id 'metals
:remote? t
:initialized-fn (lambda (workspace)
	  (lsp-metals--add-focus-hooks)
	  (with-lsp-workspace workspace
	    (lsp--set-configuration
	     (lsp-configuration-section "metals"))))
:after-open-fn (lambda ()
	 (add-hook 'lsp-on-idle-hook #'lsp-metals--did-focus nil t))
:completion-in-comments? t))

  (use-package lsp-metals
:straight t
:config
<<lsp-metals-tramp>>)

lsp-ui

  (use-package lsp-ui
:straight t
:after (company-box)
:config
;; disable focus on mouse over
(push '(no-accept-focus . t) lsp-ui-doc-frame-parameters)
(push '(no-accept-focus . t) company-box-frame-parameters)

(add-to-list 'lsp-ui-doc-frame-parameters '(no-accept-focus . t))
(add-to-list 'company-box-frame-parameters '(no-accept-focus . t))
(setq mouse-autoselect-window nil))
  (add-hook 'after-init-hook 'global-company-mode)

lsp-pyright

  (use-package lsp-pyright
:straight t
:hook (python-mode . (lambda ()
      (require 'lsp-pyright)
      (lsp))))  ; or lsp-deferred

yassnippet

  (use-package yasnippet
:straight t
:config
(yas-global-mode 1))

flycheck

  (use-package flycheck
:straight t
:init (global-flycheck-mode))