| commit | author | age | ||
| 5cb5f7 | 1 | ;ELC |
| C | 2 | ;;; Compiled |
| 3 | ;;; in Emacs version 26.1 | |
| 4 | ;;; with all optimizations. | |
| 5 | ||
| 6 | ;;; This file contains utf-8 non-ASCII characters, | |
| 7 | ;;; and so cannot be loaded into Emacs 22 or earlier. | |
| 8 | (and (boundp 'emacs-version) | |
| 9 | (< (aref emacs-version (1- (length emacs-version))) ?A) | |
| 10 | (string-lessp emacs-version "23") | |
| 11 | (error "`%s' was compiled for Emacs 23 or later" #$)) | |
| 12 | ||
| 13 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
| 14 | ||
| 15 | ||
| 16 | (byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307#\207" [require cl-lib flycheck error-tip defvaralias flycheck-tip-timer-delay error-tip-timer-delay "Alias of `error-tip-timer-delay'."] 4) | |
| 17 | #@155 Move to next error if it's exists. | |
| 18 | If it wasn't exists then move to previous error. | |
| 19 | Move to previous error if REVERSE is non-nil. | |
| 20 | ||
| 21 | (fn &optional REVERSE) | |
| 22 | (defalias 'flycheck-tip-cycle #[256 "\301\302!\"\207" [flycheck-current-errors error-tip-cycle error-tip-collect-current-file-errors] 4 (#$ . 617) nil]) | |
| 23 | #@42 Do `flycheck-tip-cycle by reverse order. | |
| 24 | (defalias 'flycheck-tip-cycle-reverse #[0 "\300\301!\207" [flycheck-tip-cycle t] 2 (#$ . 932) nil]) | |
| 25 | #@124 Show current line's ERRORS by popup. | |
| 26 | This function is used to replace ‘flycheck-display-errors-function’. | |
| 27 | ||
| 28 | (fn ERRORS) | |
| 29 | (defalias 'flycheck-tip-display-current-line-error-message #[257 "\302 \210\303\304\"\305\211\205 \211\306`\")\207" [error-tip-notify-keep-messages error-tip-current-errors error-tip-delete-popup mapcar flycheck-error-message nil error-tip-popup-error-message] 5 (#$ . 1080)]) | |
| 30 | #@20 | |
| 31 | ||
| 32 | (fn ELEMENT ERR) | |
| 33 | (defalias 'flycheck-tip--get #[514 "\301\267\202? \302!>\204 \303\304\305D\"\210\211\306H\207\302!>\204( \303\304\305D\"\210\211\307H\207\302!>\204; \303\304\305D\"\210\211\310H\207\311\207" [cl-struct-flycheck-error-tags #s(hash-table size 3 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (file 6 line 25 message 44)) type-of signal wrong-type-argument flycheck-error 3 4 6 nil] 6 (#$ . 1491)]) | |
| 34 | (byte-code "\300\301\302\303\304DD\305\306\307\310\311&\210\312\301\313\314#\207" [custom-declare-variable flycheck-tip-avoid-show-func funcall function #[0 "\300\207" [t] 1] "Avoid `flycheck-show-error-at-point' function's behavior.\nThis variable is true by default." :group flycheck-tip :type boolean make-obsolete-variable nil "2017/9/30: Please set ‘flycheck-display-errors-function’ to ‘ignore’ if\nyou want to avoid echoing error message instead of this\nvalue. This variable will be deleted on the future release."] 8) | |
| 35 | #@364 You can set 'normal, 'verbose or nil to ORDER. | |
| 36 | The normal means, use error popup and using timer or not is configurable. | |
| 37 | The verbose means, use error popup and popup current-line error if it's exists | |
| 38 | after `error-tip-timer-delay' seconds. | |
| 39 | If you set nil, show popup error immediately after you invoke flycheck-tip-cycle | |
| 40 | or flycheck-tip-cycle-reverse. | |
| 41 | ||
| 42 | (fn ORDER) | |
| 43 | (defalias 'flycheck-tip-use-timer #[257 "\211\303\267\202 \304\211\207 \305\211\207\304\306\211\207" [flycheck-display-errors-function error-tip-timer-delay flycheck-idle-change-delay #s(hash-table size 2 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (normal 6 verbose 10)) ignore flycheck-tip-display-current-line-error-message nil] 3 (#$ . 2478)]) | |
| 44 | (byte-code "\300\301\302\211#\210\303\301\302\304#\210\305\306!\207" [defalias flycheck-tip-use-timer nil make-obsolete "2017/9/30: This function become obsolete in favor of official flycheck-pos-tip package.\nPlease use that instead if you want just to show error messages at point by popup." provide flycheck-tip] 4) | |
