;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\302\303\304\305\306\301\307\310&\210\311\312\313\314\315DD\316\306\303\317\320\321\322& \210\311\323\313\314\324DD\325\321\326\306\303&\210\311\327\313\314\330DD\331\321\322\306\303&\210\311\332\313\314\333DD\334\321\322\306\303&\210\311\335\313\314\336DD\337\321\322\306\303&\210\311\340\313\314\341DD\342\321\343\306\303&\210\311\344\313\314\345DD\346\321\347\306\303&\207" [require lsp-mode custom-declare-group lsp-elm nil "LSP support for the Elm programming language, using the server from https://github.com/elm-tooling/elm-language-server" :group :link (url-link "https://github.com/elm-tooling/elm-language-server") custom-declare-variable lsp-elm-elm-language-server-path funcall function #[0 "\300\207" [nil] 1] "Path for elm-language-server.\nCan be installed globally with: npm i -g @elm-tooling/elm-language-server,\nor manually by cloning the repo and following the installing instructions." :risky t :type file lsp-elm-trace-server #[0 "\300\207" [nil] 1] "Enable/disable trace logging of client and server communication." boolean lsp-elm-elm-path #[0 "\300\207" [#1=""] 1 #1#] "The path to your elm executable. Should be empty by default, in that case it will assume the name and try to first get it from a local npm installation or a global one. If you set it manually it will not try to load from the npm folder." lsp-elm-elm-format-path #[0 "\300\207" [#1#] 1 #1#] "The path to your elm-format executable. Should be empty by default, in that case it will assume the name and try to first get it from a local npm installation or a global one. If you set it manually it will not try to load from the npm folder." lsp-elm-elm-test-path #[0 "\300\207" [#1#] 1 #1#] "The path to your elm-test executable. Should be empty by default, in that case it will assume the name and try to first get it from a local npm installation or a global one. If you set it manually it will not try to load from the npm folder." lsp-elm-elm-analyse-trigger #[0 "\300\207" [#2="change"] 1 #2#] "Elm-analyse executed on 'change', 'save' or 'never' (default: 'change')." (choice (const "change") (const "save") (const "never")) lsp-elm-server-args #[0 "\300\207" [("--stdio")] 1] "Arguments to pass to the server." (repeat string)] 10) #@59 Generate LSP startup command for the Elm Language Server. (defalias 'lsp-elm--elm-language-server-command #[0 "\206\302\303! B\207" [lsp-elm-elm-language-server-path lsp-elm-server-args lsp-package-path elm-language-server] 2 (#$ . 2355)]) #@39 Init options for elm-language-server. (defalias 'lsp-clients-elm--make-init-options #[0 "\305\306 \307\n\310 \311\312\f!\257\n\207" [lsp-elm-elm-path lsp-elm-elm-format-path lsp-elm-elm-test-path lsp-elm-elm-analyse-trigger lsp-elm-trace-server :elmPath :elmFormatPath :elmTestPath :elmAnalyseTrigger :trace\.server lsp-json-bool] 11 (#$ . 2604)]) (byte-code "\300\301\302\303#\210\304\305\306\307\310!\311\312\313\314\315\316\317\320\321\322&\f!\210\323\324!\207" [lsp-dependency elm-language-server (:system "elm-language-server") (:npm :package "@elm-tooling/elm-language-server" :path "elm-language-server") lsp-register-client make-lsp-client :new-connection lsp-stdio-connection lsp-elm--elm-language-server-command :major-modes (elm-mode) :priority -1 :initialization-options lsp-clients-elm--make-init-options :server-id elm-ls :download-server-fn #[1028 "\300\301#\207" [lsp-package-ensure elm-language-server] 8 "\n\n(fn CLIENT CALLBACK ERROR-CALLBACK UPDATE\\=\\?)"] provide lsp-elm] 14)