;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\300\305!\210\300\306!\210\307\310\311\312\313\314\313\315\316\317\316\320& \210\321\322\323\"\210\321\324\325\"\207" [require dash lsp-protocol lsp-ui-sideline lsp-ui-peek lsp-ui-imenu lsp-ui-doc custom-declare-group lsp-ui nil "‘lsp-ui’ contains a series of useful UI integrations for ‘lsp-mode’." :group tools convenience :link (custom-manual "(lsp-ui) Top") (info-link "(lsp-ui) Customizing") eval-after-load flycheck #[0 "\300\301!\207" [require lsp-ui-flycheck] 2] winum #[0 "\303\302!\205\205 \n\235\203\n\207 \nB\211\207" [lsp-ui-doc-winum-ignore lsp-ui-doc--buffer-prefix winum-ignored-buffers-regexp boundp] 2]] 12) #@21 (fn MAJOR STRING) (defalias 'lsp-ui-peek--render #[514 "\302\303\304\"r\211q\210\305\306\"\216c\210\307\300!\210\304\211 \210)\3101'\311 0\210\202(\210)\312 *\207" [delay-mode-hooks inhibit-message generate-new-buffer " *temp*" t make-closure #[0 "\301\300!\205 \302\300!\207" [V0 buffer-name kill-buffer] 2] make-local-variable (error) font-lock-ensure buffer-string] 7 (#$ . 793)]) #@122 Return the PATH relative to the workspace. If the PATH is not in the workspace, it returns the original PATH. (fn PATH) (defalias 'lsp-ui--workspace-path #[257 "\300!\301!\211\205\302\"\211\203G\303O\207\207" [file-truename lsp-workspace-root string-prefix-p nil] 7 (#$ . 1194)]) #@15 (fn ENABLE) (defalias 'lsp-ui--toggle #[257 "\300\211\2057\211@\301\302!\303P!\304!\205\211\262\211JK\204#\204.\305!\203.\211!\210\266A\266\202\202\207" [(lsp-ui-peek lsp-ui-sideline lsp-ui-doc lsp-ui-imenu) intern-soft symbol-name "-enable" boundp functionp] 8 (#$ . 1492)]) (defvar lsp-ui-mode-map (make-sparse-keymap)) #@91 Non-nil if Lsp-Ui mode is enabled. Use the command `lsp-ui-mode' to change this variable. (defvar lsp-ui-mode nil (#$ . 1841)) (make-variable-buffer-local 'lsp-ui-mode) #@374 Toggle language server UI mode on or off. ‘lsp-ui-mode’ is a minor mode that contains a series of useful UI integrations for ‘lsp-mode’. With a prefix argument ARG, enable language server UI mode if ARG is positive, and disable it otherwise. If called from Lisp, enable the mode if ARG is omitted or nil, and toggle it if ARG is ‘toggle’. (fn &optional ARG) (defalias 'lsp-ui-mode #[256 "\302 \303=\203 ?\202\247\203\304W\203\305\202\306\307\301!\2031\310\300 \"\2031\300 B\311!\210\312\313\203?\314\202@\315\"\210\316\317!\203b\302 \203T\211\302 \232\203b\320\321\203^\322\202_\323\324#\210\210\325 \210\207" [lsp-ui-mode local-minor-modes current-message toggle 1 nil t boundp delq lsp-ui--toggle run-hooks lsp-ui-mode-hook lsp-ui-mode-on-hook lsp-ui-mode-off-hook called-interactively-p any message "Lsp-Ui mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 6 (#$ . 2017) (byte-code "\203\n\301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)]) (defvar lsp-ui-mode-hook nil) (byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\310\310\211%\207" [lsp-ui-mode-map lsp-ui-mode-hook variable-documentation put "Hook run after entering or leaving `lsp-ui-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" custom-type hook standard-value nil add-minor-mode lsp-ui-mode] 6) #@76 List project-wide symbols matching the query string PATTERN. (fn PATTERN) (defalias 'lsp-ui-find-workspace-symbol #[257 "\300\301\302$\207" [xref--find-xrefs apropos nil] 6 (#$ . 3518) (byte-code "\300\301\302\303#C\207" [read-string "workspace/symbol: " nil xref--read-pattern-history] 4)]) #@91 Compares two triples X and Y. Both should have the form (FILENAME LINE COLUMN). (fn X Y) (defalias 'lsp-ui--location< #[514 "@@\230\204@@\231\207A@A@U\204 A@A@W\207AA@AA@W\207" [] 4 (#$ . 3819)]) #@88 Return references as a list of (FILENAME LINE COLUMN) triples given EXTRA. (fn EXTRA) (defalias 'lsp-ui--reference-triples #[257 "\300\301\302\303 \"\"\304\305\306\"\307\"\207" [lsp-request "textDocument/references" append lsp--text-document-position-params sort mapcar #[257 "\300\301\"\300\302\300\303\"\"\300\304\"\300\305\"\306!E\207" [gethash "uri" "start" "range" "line" "character" lsp--uri-to-path] 8 "\n\n(fn INPUT0)"] lsp-ui--location<] 6 (#$ . 4035)]) #@67 Find next reference of the symbol at point. (fn &optional EXTRA) (defalias 'lsp-ui-find-next-reference #[256 "\301 `\302 ZE\303!\304C\305\306\307#\"\211\2032\310@!\210\311b\210\211A@y\210\211AA@u\210\242GB\207\312\211B\207" [buffer-file-name line-number-at-pos line-beginning-position lsp-ui--reference-triples -1 -first make-closure #[257 "\301\211\242T\240\210\302\300\"\207" [V0 V1 lsp-ui--location<] 4 "\n\n(fn REF)"] find-file 1 0] 9 (#$ . 4514) nil]) #@71 Find previous reference of the symbol at point. (fn &optional EXTRA) (defalias 'lsp-ui-find-prev-reference #[256 "\301 `\302 ZE\303!\304C\305\306\307#\"\211\2032\310@!\210\311b\210\211A@y\210\211AA@u\210\242GB\207\312\211B\207" [buffer-file-name line-number-at-pos line-beginning-position lsp-ui--reference-triples -1 -last make-closure #[257 "\302\300\"\205\f\301\211\242T\240\207" [V0 V1 lsp-ui--location<] 4 "\n\n(fn REF)"] find-file 1 0] 9 (#$ . 4988) nil]) (provide 'lsp-ui)