;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304\305\306#\210\300\307!\210\300\310!\210\300\311!\210\300\312!\210\313\314\305\315\316\317\316\320\316\321\322\323\322\324& \210\325\326\327\330\331DD\332\333\334\316\321&\210\325\335\327\330\336DD\337\333\334\316\314&\210\325\340\327\330\341DD\342\333\334\316\314&\210\325\343\327\330\344DD\345\333\334\316\314&\210\325\346\327\330\347DD\350\333\334\316\314&\210\325\351\327\330\352DD\353\333\334\316\314&\210\325\354\327\330\355DD\356\333\357\316\314&\210\325\360\327\330\361DD\362\333\363\316\314&\210\325\364\327\330\365DD\366\333\367\316\314&\210\325\370\327\330\371DD\372\333\367\316\314&\207" [require lsp-ui-util lsp-protocol lsp-mode flycheck nil noerror dash seq subr-x face-remap custom-declare-group lsp-ui-sideline "Display information for the current line." :group tools convenience lsp-ui :link (custom-manual "(lsp-ui-sideline) Top") (info-link "(lsp-ui-sideline) Customizing") custom-declare-variable lsp-ui-sideline-enable funcall function #[0 "\300\207" [t] 1] "Whether or not to enable ‘lsp-ui-sideline’." :type boolean lsp-ui-sideline-ignore-duplicate #[0 "\300\207" [nil] 1] "Ignore duplicates when there is a same symbol with the same contents." lsp-ui-sideline-show-symbol #[0 "\300\207" [t] 1] "When t, show the symbol name on the right of the information." lsp-ui-sideline-show-hover #[0 "\300\207" [nil] 1] "Whether to show hover messages in sideline." lsp-ui-sideline-show-diagnostics #[0 "\300\207" [t] 1] "Whether to show diagnostics messages in sideline." lsp-ui-sideline-show-code-actions #[0 "\300\207" [t] 1] "Whether to show code actions in sideline." lsp-ui-sideline-update-mode #[0 "\300\207" [point] 1] "Define the mode for updating sideline actions.\n\nWhen set to `line' the actions will be updated when user\nchanges current line otherwise the actions will be updated\nwhen user changes current point." (choice (const line) (const point)) lsp-ui-sideline-delay #[0 "\300\207" [0.2] 1] "Number of seconds to wait before showing sideline." number lsp-ui-sideline-diagnostic-max-lines #[0 "\300\207" [1] 1] "Maximum number of lines to show of diagnostics in sideline." integer lsp-ui-sideline-diagnostic-max-line-length #[0 "\300\207" [100] 1] "Maximum line length of diagnostics in sideline."] 14) (defconst lsp-ui-sideline-actions-icon-default (byte-code "\301\300!\205\205\302\303!\205\304\305\"\207" [lsp-ui-resources-dir boundp image-type-available-p png expand-file-name "lightbulb.png"] 3)) (byte-code "\300\301\302\303\304DD\305\306\307\310\311&\210\300\312\302\303\313DD\314\306\315\310\311&\210\300\316\302\303\317DD\320\306\321\310\311&\207" [custom-declare-variable lsp-ui-sideline-actions-icon funcall function #[0 "\300\207" [nil] 1] "Image file for actions. It must be a png file." :type (choice file (const :tag "Disable" nil)) :group lsp-ui-sideline lsp-ui-sideline-wait-for-all-symbols #[0 "\300\207" [t] 1] "Wait for all symbols before displaying info in sideline." boolean lsp-ui-sideline-actions-kind-regex #[0 "\300\207" [#1="quickfix.*\\|refactor.*"] 1 #1#] "Regex for the code actions kinds to show in the sideline." string] 8) #@116 Prefix to insert before the code action title. This can be used to insert, for example, an unicode character: 💡 (defvar lsp-ui-sideline-code-actions-prefix "" (#$ . 3262)) #@37 Overlays used by `lsp-ui-sideline'. (defvar lsp-ui-sideline--ovs nil (#$ . 3443)) (make-variable-buffer-local 'lsp-ui-sideline--ovs) #@60 List of lines occupied by an overlay of `lsp-ui-sideline'. (defvar lsp-ui-sideline--occupied-lines nil (#$ . 3582)) (make-variable-buffer-local 'lsp-ui-sideline--occupied-lines) #@251 Record weather if we display sideline in the first line. If we do, then sideline will always look downward instead of the upward direction. This prevent sideline displays below than the first line, which it will cause weird looking user interface. (defvar lsp-ui-sideline--first-line-pushed nil (#$ . 3767)) (make-variable-buffer-local 'lsp-ui-sideline--first-line-pushed) #@115 Tag marking where the last operation was based. It is used to know when the cursor has changed its line or point. (defvar lsp-ui-sideline--tag nil (#$ . 4149)) (make-variable-buffer-local 'lsp-ui-sideline--tag) #@105 Value of window's width on the last operation. It is used to know when the window has changed of width. (defvar lsp-ui-sideline--last-width nil (#$ . 4367)) (make-variable-buffer-local 'lsp-ui-sideline--last-width) #@108 Line number on the last operation. Used to avoid calling `line-number-at-pos' when we're on the same line. (defvar lsp-ui-sideline--last-line-number nil (#$ . 4589)) (make-variable-buffer-local 'lsp-ui-sideline--last-line-number) (defvar lsp-ui-sideline--timer nil nil) (make-variable-buffer-local 'lsp-ui-sideline--timer) #@32 Holds the latest code actions. (defvar lsp-ui-sideline--code-actions nil (#$ . 4918)) (make-variable-buffer-local 'lsp-ui-sideline--code-actions) #@128 Cache of rendered line when `lsp-ui-sideline-wait-for-all-symbols' is nil. Used to not re-render the same line multiple times. (defvar lsp-ui-sideline--cached-infos nil (#$ . 5071)) (byte-code "\300\301!\210\302\303\304\305\306\307%\210\302\310\311\312\306\307%\210\302\313\314\315\306\307%\210\302\316\317\320\306\307%\210\302\321\322\323\306\307%\207" [make-variable-buffer-local lsp-ui-sideline--cached-infos custom-declare-face lsp-ui-sideline-symbol ((t :foreground "grey" :box (:line-width -1 :color "grey") :height 0.99)) "Face used to highlight symbols." :group lsp-ui-sideline lsp-ui-sideline-current-symbol ((((background light)) :foreground "black" :weight ultra-bold :box (:line-width -1 :color "black") :height 0.99) (t :foreground "white" :weight ultra-bold :box (:line-width -1 :color "white") :height 0.99)) "Face used to highlight the symbol on point." lsp-ui-sideline-code-action ((((background light)) :foreground "DarkOrange") (t :foreground "yellow")) "Face used to highlight code action text." lsp-ui-sideline-symbol-info ((t :slant italic :height 0.99)) "Face used to highlight the symbols informations (LSP hover)." lsp-ui-sideline-global ((t)) "Face which apply to all overlays.\nThis face have a low priority over the others."] 6) #@55 Return non-nil if POS is on the first line. (fn POS) (defalias 'lsp-ui-sideline--first-line-p #[257 "\211\250\205\212\300b\210\300y\210`V)\207" [1] 3 (#$ . 6334)]) #@279 Calculate whether there is enough space on line. If there is enough space, it returns the point of the last character on the line. WIN-WIDTH is the window width. STR-LEN is the string size. INDEX is the line number (relative to the current line). (fn WIN-WIDTH STR-LEN INDEX) (defalias 'lsp-ui-sideline--calc-space #[771 "\301!\211\235?\205\212\211b\210\302\210iZY\205\211)\207" [lsp-ui-sideline--occupied-lines line-end-position nil] 6 (#$ . 6509)]) #@462 Find a line where the string can be inserted. It loops on the nexts lines to find enough space. Returns the point of the last character on the line. Argument STR-LEN is the string size. Argument BOL and EOL are beginning and ending of the user point line. If optional argument UP is non-nil, it loops on the previous lines. If optional argument OFFSET is non-nil, it starts search OFFSET lines from user point line. (fn STR-LEN BOL EOL &optional UP OFFSET) (defalias 'lsp-ui-sideline--find-line #[1283 "\303 \304\204 \305\202\f\306\211\2043\307!\310X\2033\203$S\202&T\262\311\n#\262\202\203S\211\203E\211\305X\203S \203S\312   \306 %\202} \204_\313!\203_\304\211\205}\211V\204q\211W\205}\211\nB\211\205}\211SD)\207" [inhibit-field-text-motion lsp-ui-sideline--first-line-pushed lsp-ui-sideline--occupied-lines lsp-ui-sideline--window-width t 1 nil abs 30 lsp-ui-sideline--calc-space lsp-ui-sideline--find-line lsp-ui-sideline--first-line-p] 15 (#$ . 6978)]) #@18 Delete overlays. (defalias 'lsp-ui-sideline--delete-ov #[0 "\305\306\"\210\307\211\307\310`!\307\211\207" [lsp-ui-sideline--ovs lsp-ui-sideline--tag lsp-ui-sideline--cached-infos lsp-ui-sideline--occupied-lines lsp-ui-sideline--first-line-pushed seq-do delete-overlay nil lsp-ui-sideline--first-line-p] 4 (#$ . 7991)]) #@260 Extract the line to print from CONTENTS. CONTENTS can be differents type of values: MarkedString | MarkedString[] | MarkupContent (as defined in the LSP). We prioritize string with a language (which is probably a type or a function signature). (fn CONTENTS) (defalias 'lsp-ui-sideline--extract-info #[257 "\211\205\300!\203 \207\301!\203\302\303\"\207\304!\205\211\207" [lsp-marked-string\? vectorp seq-find #[257 "\300!\205 \301\302!!\207" [lsp-marked-string\? lsp-get-renderer lsp:marked-string-language] 4 "\n\n(fn IT)"] lsp-markup-content\?] 4 (#$ . 8323)]) #@212 Format MARKED-STRING. If the string has a language, we fontify it with the function provided by `lsp-mode'. MARKED-STRING is the string returned by `lsp-ui-sideline--extract-info'. (fn MARKED-STRING WIN-WIDTH) (defalias 'lsp-ui-sideline--format-info #[514 "\205B\300!\204\301!\205B\302!\262\303\304G\305\306%\210\303\304G\307\310%\210\311\312\313G\314\245V\203@\315\316!\317\"@\202A#\207" [lsp-marked-string\? lsp-markup-content\? lsp--render-element add-face-text-property 0 lsp-ui-sideline-symbol-info nil default t replace-regexp-in-string "[\n ]+" " " 2 split-string string-trim-left "[ \n]+"] 8 (#$ . 8907)]) #@84 Align sideline string by LENGTHS from the right of the window. (fn &rest LENGTHS) (defalias 'lsp-ui-sideline--align #[128 "\300\301\"\302 \203 \303\202\304\\\207" [apply + display-graphic-p 1 2] 4 (#$ . 9552)]) #@43 Return a fixed size for text in sideline. (defalias 'lsp-ui-sideline--compute-height #[0 "\204\301\207\302\303\304A\305\"\206\303\245D\207" [text-scale-mode-remapping (height 1) height 1 plist-get :height] 5 (#$ . 9774)]) #@202 Make final string to display in buffer. INFO is the information to display. SYMBOL is the symbol associated with the info. CURRENT is non-nil when the point is on the symbol. (fn INFO SYMBOL CURRENT) (defalias 'lsp-ui-sideline--make-display-string #[771 "\211\203\301\202 \302\203\303\304\303\303Q\305#Q\202\211G\306 \307\310\311\312%\210\304\303\313\314\315\316\317\320  \"EE#\304\313\321 #P\207" [lsp-ui-sideline-show-symbol lsp-ui-sideline-current-symbol lsp-ui-sideline-symbol " " propertize face lsp-ui-sideline--margin-width add-face-text-property 0 lsp-ui-sideline-global nil display space :align-to - right-fringe lsp-ui-sideline--align lsp-ui-sideline--compute-height] 17 (#$ . 10009)]) #@125 Check if there's already a SYMBOL containing INFO, unless `lsp-ui-sideline-ignore-duplicate' is set to t. (fn SYMBOL INFO) (defalias 'lsp-ui-sideline--check-duplicate #[514 "\205I\302 \303\302\211\211\203D\211A\262\242\262\262\211\262\203D\304\305\"\230\2051\304\306\"\230\211\262\204D\262\262T\262\202\n\266\211\262?\207" [lsp-ui-sideline-ignore-duplicate lsp-ui-sideline--ovs nil 0 overlay-get symbol info] 11 (#$ . 10732)]) (defalias 'lsp-ui-sideline--margin-width #[0 "\306\203 \202\n\307\310\302!\203'\n:\203'\n@\307=\204#\nA\307=\203'\311\2028\310\302!\2037\n\307=\2037\311\2028\307\312 \211@\307=\204I\211A@\307=\203M\313\202N\307\262 \314W\203[\315 \202\\\307\310\304!\203f\f\204p\310\305!\203t \203t\311\202u\307%\207" [fringes-outside-margins right-margin-width fringe-mode emacs-major-version whitespace-mode global-whitespace-mode + 0 boundp 1 window-fringes 2 27 lsp-ui-util-line-number-display-width] 7]) (defalias 'lsp-ui-sideline--window-width #[0 "\301 \302 ^\303 Z\304Y\203\305 \206\306Z\207" [emacs-major-version window-text-width window-body-width lsp-ui-sideline--margin-width 27 lsp-ui-util-line-number-display-width 0] 3]) #@17 (fn TAG MODE) (defalias 'lsp-ui-sideline--valid-tag-p #[514 "\205<\301\211\211A\262\242\211A\262\242A@\302 U\2057\211p=\2057\303\267\2024`=\2027\301\2027\304\305!)\266\204\262\207" [inhibit-field-text-motion t line-beginning-position #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (point 42 line 48)) error "Wrong tag mode"] 9 (#$ . 11943)]) #@31 (fn LIST-INFOS TAG BOL EOL) (defalias 'lsp-ui-sideline--display-all-info #[1028 "\301\302\"\205X\303 ?\205X\304\305 \306\307\"\310\311!\210\211\312\313\211\205S\211A\262\242\262\262T\262\211\211A\262\242\211A\262\242@\314 &\266\202\266\204)\266\203\207" [inhibit-modification-hooks lsp-ui-sideline--valid-tag-p line lsp-ui-sideline--stop-p t window-body-width -sort #[514 "A@@A@@W\207" [] 4 "\n\n(fn IT OTHER)"] lsp-ui-sideline--delete-kind info 0 nil lsp-ui-sideline--push-info] 23 (#$ . 12349)]) #@45 (fn WIN-WIDTH SYMBOL BOUNDS INFO BOL EOL) (defalias 'lsp-ui-sideline--push-info #[1542 "\303\304 \"\2066\305!\211\205\211\306!\262\262\211\205$\211\307 \"\262\262\211\2054\211B B\211\262\262`@Y\205A`AXG\310V\205\257\311\"\205\257\312#\313G#\211\205h\314@@\"\205\255\315\316#\210\315\317\f#\210\315\320 #\210\315\321#\210\315\322#\210\315\323\324#\210\315\325\326 #\210\315\327\316#\210\315\330@#\210\211\nB\211\266\203)\207" [markdown-hr-display-char lsp-ui-sideline--cached-infos lsp-ui-sideline--ovs nil alist-get lsp:hover-contents lsp-ui-sideline--extract-info lsp-ui-sideline--format-info 0 lsp-ui-sideline--check-duplicate lsp-ui-sideline--make-display-string lsp-ui-sideline--find-line make-overlay overlay-put info symbol bounds current after-string before-string " " window get-buffer-window kind position] 15 (#$ . 12891)]) #@59 Toggle the OV face according to CURRENT. (fn OV CURRENT) (defalias 'lsp-ui-sideline--toggle-current #[514 "\300\301\"\300\302\"\303#\304\305#\210\304\306#\207" [overlay-get info symbol lsp-ui-sideline--make-display-string overlay-put current after-string] 9 (#$ . 13794)]) #@58 Update the symbol's face according to POINT. (fn POINT) (defalias 'lsp-ui-sideline--highlight-current #[257 "\211\205D\211@\301\302\"\211@A\203/Y\203/X\203/\301\303\"\204;\304\305\"\266\202=\301\303\"\203;\304\306\"\210\266A\266\202\202\207" [lsp-ui-sideline--ovs overlay-get bounds current lsp-ui-sideline--toggle-current t nil] 9 (#$ . 14084)]) #@114 Fill LINES so that they are not longer than `lsp-ui-sideline-diagnostic-max-line-length' characters. (fn LINES) (defalias 'lsp-ui-sideline--split-long-lines #[257 "\300\301\"\207" [cl-mapcan #[257 "\211GW\203\n\211C\207\302\303\304\"r\211q\210\305\306\"\216c\210\307ed\"\210\310\311 \312\"+\207" [lsp-ui-sideline-diagnostic-max-line-length fill-column generate-new-buffer " *temp*" t make-closure #[0 "\301\300!\205 \302\300!\207" [V0 buffer-name kill-buffer] 2] fill-region split-string buffer-string "\n"] 5 "\n\n(fn LINE)"]] 4 (#$ . 14463)]) #@264 Show diagnostics belonging to the current line. Loop over flycheck errors with `flycheck-overlay-errors-in'. Find appropriate position for sideline overlays with `lsp-ui-sideline--find-line'. Push sideline overlays on `lsp-ui-sideline--ovs'. (fn BUFFER BOL EOL) (defalias 'lsp-ui-sideline--diagnostics #[771 "\305\300!\205\344\205\344\305\301!\205\344 \205\344\n\205\344p=\205\344\306\307!\210\310T\"\211\205\342\211@\311!\312\313\"\314!\262\262\315\211G Z\"\316\237\211\203\331\211@\317\320\321\322#!\320\323\322#\211G\324 !\211\325=\203g\326\202h\211\327 \330\331\332\333 %\210\330\331\333 %\210\334\322\335\336\337\340\341\342\f\n\"EE#\334\335\343 #P\344\345%\211\205\251\346@@\"\203\320A@T\262 \347\350#\210\347\351\307#\210\347\352\322#\210\347\353@#\210\211\fB\266\nA\266\202\202E\266A\266\202\202'\262\207" [flycheck-mode lsp-ui-sideline-mode lsp-ui-sideline-show-diagnostics lsp-ui-sideline-diagnostic-max-lines lsp-ui-sideline--ovs boundp lsp-ui-sideline--delete-kind diagnostics flycheck-overlay-errors-in flycheck-error-format-message-and-id split-string "\n" lsp-ui-sideline--split-long-lines butlast 1 string-trim replace-regexp-in-string "[ ]+" " " " " flycheck-error-level info success lsp-ui-sideline--margin-width add-face-text-property 0 lsp-ui-sideline-global nil propertize display space :align-to - right-fringe lsp-ui-sideline--align lsp-ui-sideline--compute-height lsp-ui-sideline--find-line t make-overlay overlay-put after-string kind before-string position] 27 (#$ . 15024)]) #@54 Choose and apply code action(s) on the current line. (defalias 'lsp-ui-sideline-apply-code-actions #[0 "\204\301\302!\210\303\304!!\207" [lsp-ui-sideline--code-actions user-error "No code actions on the current line" lsp-execute-code-action lsp--select-action] 3 (#$ . 16595) nil]) #@40 Set default icon for sideline actions. (defalias 'lsp-ui-sideline-set-default-icon #[0 "\211\207" [lsp-ui-sideline-actions-icon-default lsp-ui-sideline-actions-icon] 2 (#$ . 16887)]) #@114 Scale the lightbulb image to character height. Argument HEIGHT is an actual image height in pixel. (fn HEIGHT) (defalias 'lsp-ui-sideline--scale-lightbulb #[257 "\300 S\301!\245\207" [frame-char-height float] 4 (#$ . 17079)]) (defalias 'lsp-ui-sideline--code-actions-make-image #[0 " \232\302\303\304\305\306BBBBB\307\310\311\203\312\202+\313\314!\203(\314\315\"A\202+\316\317!!D\"\207" [lsp-ui-sideline-actions-icon lsp-ui-sideline-actions-icon-default image :type png :file (:ascent center) append :scale lsp-ui-sideline--scale-lightbulb 128 fboundp image-size t error "Function image-size undefined. Use default icon"] 9]) (defalias 'lsp-ui-sideline--code-actions-image #[0 "\205\3011\302\303\304\305 #\302\303\304\306#P0\207\307\310\"\210\311\262\207" [lsp-ui-sideline-actions-icon (debug error) propertize " " display lsp-ui-sideline--code-actions-make-image (space :width 0.3) message "[lsp-ui-sideline]: Error with actions icon: %s" nil] 5]) #@42 Show code ACTIONS. (fn ACTIONS BOL EOL) (defalias 'lsp-ui-sideline--code-actions #[771 "\303 \203\f\304\305\"\262\306\307!\210\310\311\312#\")\207" [inhibit-modification-hooks lsp-ui-sideline-actions-kind-regex lsp-ui-sideline--code-actions t seq-filter #[257 "\301\302\"\211?\206 \303\"\207" [lsp-ui-sideline-actions-kind-regex gethash "kind" s-match] 5 "\n\n(fn INPUT0)"] lsp-ui-sideline--delete-kind actions seq-do make-closure #[257 "\n?\205 \305\306\307\305\310\307\311!##P\312 \313 \314 \315\316\317\320 \"#\210\211\262G\321\322\323\324 %\210\321\322\325\324 %\210\326\322\327\330BB$\210\331\307\332\333\334\335\336\337  G\\\f\"EE#\331\332\340 #Q\341GTG\\\300\301\342$\211\205y\343@@\"\205\233\344\345#\210\344\346\307#\210\344\347\350#\210\344\351@#\210\211\fB\211\207" [V0 V1 lsp-ui-sideline-actions-icon lsp-ui-sideline-code-actions-prefix lsp-ui-sideline--ovs replace-regexp-in-string " " " " "[\n ]+" lsp:code-action-title lsp-ui-sideline--code-actions-image lsp-ui-sideline--margin-width make-sparse-keymap define-key [down-mouse-1] make-closure #[0 "\212\301\300!)\207" [V0 lsp-execute-code-action] 2 nil nil] add-face-text-property 0 lsp-ui-sideline-global nil lsp-ui-sideline-code-action add-text-properties keymap (mouse-face highlight) propertize display space :align-to - right-fringe lsp-ui-sideline--align lsp-ui-sideline--compute-height lsp-ui-sideline--find-line t make-overlay overlay-put after-string before-string kind actions position] 17 "\n\n(fn ACTION)"]] 8 (#$ . 18056)]) #@77 Calculate the tag used to determine whether to update sideline information. (defalias 'lsp-ui-sideline--calculate-tag #[0 "\301`\302 \303 pF)\207" [inhibit-field-text-motion t line-beginning-position line-end-position] 4 (#$ . 19617)]) #@13 (fn KIND) (defalias 'lsp-ui-sideline--delete-kind #[257 "\302\303\302\211\203;\211A\262\242\262\262T\262\304\305\"=\2033\304\306\"\307 \"\210\310!\210\202B\262\202\266\211\237\262\211\207" [lsp-ui-sideline--ovs lsp-ui-sideline--occupied-lines nil 0 overlay-get kind position remq delete-overlay] 10 (#$ . 19860)]) (defvar lsp-ui-sideline--last-tick-info nil nil) (make-variable-buffer-local 'lsp-ui-sideline--last-tick-info) (defvar lsp-ui-sideline--previous-line nil nil) (make-variable-buffer-local 'lsp-ui-sideline--previous-line) #@16 (fn BOL EOL) (defalias 'lsp-ui-sideline--get-line #[514 "\300\"\207" [buffer-substring-no-properties] 5 (#$ . 20430)]) #@13 (fn LINE) (defalias 'lsp-ui-sideline--line-diags #[257 "\300\301\302\303 \304\302\211\203m\211A\262\242\262\262T\262\305\306\"\211\211\205(\305\307\"\262\211\2052\305\310\"\262\211\205<\211\nU\262\206`\211\211\205J\305\311\"\262\211\205T\305\310\"\262\211\205^\211\nU\262\262\203B\262\202\266\211\237\262\"\207" [apply vector nil lsp--get-buffer-diagnostics 0 lsp-get :range :start :line :end] 13 (#$ . 20559)]) #@172 Show information (flycheck + lsp). It loops on the symbols of the current line and requests information from the language server. (fn &optional BUFFER BOL EOL THIS-LINE) (defalias 'lsp-ui-sideline--run #[1024 "\205\273\306\307 \206\3108\206A@\311 \312\n\313\"?\211\204% \2069deZ\314 U\2047\214~\210\315 )\2069\315 ?\205B\f\232?\206L\316\"\205T\211 \232?\317 \306;\320\n\321 <\203v=\203v\322\n\f#\210>\203\342\323\324!\204\207\325\326!\203\342\327\326?\313=\203\232\330\f\fZB\202\243` Z\211B\262\211\211A\262\242\331\332\333\334S\335F\336\334S\335 FF\337\340\341S!D\257\266\203\262\342\343$\344\345\346\347\350\351& \210@\205\270\204\360\205\270\323\352!\205\270\212 b\210` V\203F\353\354!\210` Y\203F\355\356\306\"\357\356!\360 \3618\3628\320=\203A\204A\211\203A\334 S\335`ZFEB\262\266\202\211\204P\363\364!\202\267\211G\330C\320C\330\320\211\205\265\211A\262\242\262\262T\262\211\211A\262\242\211A\262\242@\327\365\366\367\370$\342\371  & \346\342\372&\344\345&\266\202Z\266\207)*\266\213\207" [buffer-file-name inhibit-field-text-motion lsp-ui-sideline--tag lsp-ui-sideline--last-line-number lsp-ui-sideline--last-tick-info lsp-ui-sideline--previous-line t lsp-ui-sideline--calculate-tag 2 buffer-modified-tick lsp-ui-sideline--valid-tag-p line buffer-size line-number-at-pos lsp-ui-sideline--get-line lsp--text-document-identifier nil window-text-width lsp-ui-sideline--diagnostics lsp--capability "codeActionProvider" lsp--registered-capability "textDocument/codeAction" lsp-request-async 0 :textDocument :range :start :line :character :end :context :diagnostics lsp-ui-sideline--line-diags make-closure #[257 "p\300=\205 \303\302\301#\207" [V0 V1 V2 lsp-ui-sideline--code-actions] 5 "\n\n(fn ACTIONS)"] :mode tick :error-handler #[128 "\300\301!\207" [lsp-ui-sideline--delete-kind actions] 3 "\n\n(fn &rest _)"] :cancel-token :lsp-ui-code-actions "hoverProvider" forward-symbol -1 thing-at-point symbol bounds-of-thing-at-point syntax-ppss 3 4 lsp-ui-sideline--delete-kind info "textDocument/hover" lsp-make-hover-params :text-document :position #[257 "\304\211\242T\240\210\211\203\305\306\307E\305\242B\240\210\304\242\303U\204! ?\205(\310\305\242\300\302\301$\207" [V0 V1 V2 V3 V4 V5 V6 V7 lsp-ui-sideline--display-all-info lsp-ui-sideline-wait-for-all-symbols] 6 "\n\n(fn INFO)"] #[128 "\304\211\242T\240\210\304\242\303U\204?\205\306\305\242\300\302\301$\207" [V0 V1 V2 V3 V4 V5 lsp-ui-sideline--display-all-info lsp-ui-sideline-wait-for-all-symbols] 6 "\n\n(fn &rest _)"] inhibit-modification-hooks lsp-ui-sideline--last-width lsp-ui-sideline-show-diagnostics lsp-ui-sideline-show-code-actions lsp-ui-sideline-update-mode lsp-ui-sideline-show-hover] 40 (#$ . 21019)]) #@55 Return non-nil if the sideline should not be display. (defalias 'lsp-ui-sideline--stop-p #[0 "\302 \206\303\300!\203\206\303\301!\205 \207" [company-pseudo-tooltip-overlay lsp-ui-peek--overlay region-active-p boundp] 2 (#$ . 23882)]) #@126 Disable the sideline before company's overlay appears. COMMAND is `company-pseudo-tooltip-frontend' parameter. (fn COMMAND) (defalias 'lsp-ui-sideline--hide-before-company #[257 "\211\300>\205\301 \207" [(post-command update) lsp-ui-sideline--delete-ov] 3 (#$ . 24132)]) #@40 Show information for the current line. (defalias 'lsp-ui-sideline #[0 "\306 \203\307 \207\310\311 \312\"\313 \n\232\205\314 \232?\211\205!\315 \205'\316 \205/\317\"\2039\211\f\232\202:\310p`\203Q\203Q\203Q\320`!\210\202^\203[\204^\307 \210 \203f\321 !\210\322\323\324\325\n\n\n  &#\211)\207" [inhibit-field-text-motion lsp-ui-sideline--tag lsp-ui-sideline--last-width lsp-ui-sideline--last-tick-info lsp-ui-sideline--previous-line lsp-ui-sideline--timer lsp-ui-sideline--stop-p lsp-ui-sideline--delete-ov t lsp-ui-sideline--valid-tag-p line window-text-width buffer-modified-tick line-beginning-position line-end-position lsp-ui-sideline--get-line lsp-ui-sideline--highlight-current cancel-timer run-with-idle-timer nil make-closure #[0 "\303p=\205\304`U\205\305\303\300\301\302$\207" [V0 V1 V2 V3 V4 lsp-ui-sideline--run] 5] lsp-ui-sideline-delay] 19 (#$ . 24412)]) #@110 Toggle display of symbols information. This does not toggle display of flycheck diagnostics or code actions. (defalias 'lsp-ui-sideline-toggle-symbols-info #[0 "\302\300!\205\205 ?\303p!\207" [lsp-ui-sideline-mode lsp-ui-sideline-show-hover boundp lsp-ui-sideline--run] 2 (#$ . 25332) nil]) #@37 Handler for flycheck notifications. (defalias 'lsp-ui-sideline--diagnostics-changed #[0 "\205p\302\303 \304 \305#)\266\203\207" [lsp-ui-sideline-show-diagnostics inhibit-field-text-motion t line-end-position line-beginning-position lsp-ui-sideline--diagnostics] 7 (#$ . 25635)]) #@65 Remove all sideline overlays and delete last tag. (fn &rest _) (defalias 'lsp-ui-sideline--erase #[128 "\301\300!\205\205\3021\303 0\207\210\304\207" [lsp-ui-sideline-mode boundp (error) lsp-ui-sideline--delete-ov nil] 3 (#$ . 25927)]) #@109 Non-nil if Lsp-Ui-Sideline mode is enabled. Use the command `lsp-ui-sideline-mode' to change this variable. (defvar lsp-ui-sideline-mode nil (#$ . 26178)) (make-variable-buffer-local 'lsp-ui-sideline-mode) #@618 Minor mode for showing information for current line. This is a minor mode. If called interactively, toggle the `Lsp-Ui-Sideline mode' mode. If the prefix argument is positive, enable the mode, and if it is zero or negative, disable the mode. If called from Lisp, toggle the mode if ARG is `toggle'. Enable the mode if ARG is nil, omitted, or is a positive number. Disable the mode if ARG is a negative number. To check whether the minor mode is enabled in the current buffer, evaluate `lsp-ui-sideline-mode'. The mode's hook is called both when the mode is enabled and when it is disabled. (fn &optional ARG) (defalias 'lsp-ui-sideline-mode #[256 "\304 \305=\203 ?\202\247\203\306W\203\307\202\310\311\301!\2031\312\300 \"\2031\300 B\203V\313\314\315\307\310$\210\316\317\320\321#\210\313\322\323\307\310$\210\n\203r\324\303!\210\307\202r\325\317\321\"\210\326 \210\327\322\323\310#\210\327\314\315\310#\210\n\203r\330\303!\210\331\332\203|\333\202}\334\"\210\335\336!\203\237\304 \203\221\211\304 \232\203\237\337\340\203\233\341\202\234\342\343#\210\210\344 \210\207" [lsp-ui-sideline-mode local-minor-modes lsp-ui-sideline-show-diagnostics flycheck-display-errors-function current-message toggle 1 nil t boundp delq add-hook post-command-hook lsp-ui-sideline advice-add company-pseudo-tooltip-frontend :before lsp-ui-sideline--hide-before-company flycheck-after-syntax-check-hook lsp-ui-sideline--diagnostics-changed make-local-variable advice-remove lsp-ui-sideline--delete-ov remove-hook kill-local-variable run-hooks lsp-ui-sideline-mode-hook lsp-ui-sideline-mode-on-hook lsp-ui-sideline-mode-off-hook called-interactively-p any message "Lsp-Ui-Sideline mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 7 (#$ . 26391) (byte-code "\203\n\301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)]) (defvar lsp-ui-sideline-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\313\300!\205#\310\211%\207" [lsp-ui-sideline-mode-map lsp-ui-sideline-mode-hook variable-documentation put "Hook run after entering or leaving `lsp-ui-sideline-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-sideline-mode boundp] 6) #@53 Enable/disable `lsp-ui-sideline-mode'. (fn ENABLE) (defalias 'lsp-ui-sideline-enable #[257 "\300\203 \301\202\n\302!\210\211\203\303\304\305\306\307$\207\310\304\305\307#\207" [lsp-ui-sideline-mode 1 -1 add-hook before-revert-hook lsp-ui-sideline--delete-ov nil t remove-hook] 6 (#$ . 28808)]) (provide 'lsp-ui-sideline)