;ELC ;;; Compiled ;;; in Emacs version 29.3 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\207" [require doom-modeline-core doom-modeline-env] 2) (defvar doom-modeline--buffer-file-icon nil nil) (make-variable-buffer-local 'doom-modeline--buffer-file-icon)#@46 Update file icon in mode-line. (fn &rest _) (defalias 'doom-modeline-update-buffer-file-icon #[128 "\205.\303 \205.\304 \305\2039\203!\306\307\310\311\211\312\313&\202$\314!\315\316\317\320 !\"#\262\211\207" [doom-modeline-major-mode-icon mode-name doom-modeline--buffer-file-icon doom-modeline-icon-displayable-p doom-modeline-icon-for-buffer propertize doom-modeline-icon faicon "nf-fa-file_o" nil :face nerd-icons-dsilver doom-modeline-propertize-icon help-echo format "Major-mode: %s" format-mode-line] 10 (#$ . 284)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\210\305\306\307\"\207" [add-hook find-file-hook doom-modeline-update-buffer-file-icon after-change-major-mode-hook clone-indirect-buffer-hook doom-modeline-add-variable-watcher doom-modeline-icon #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [doom-modeline-icon set buffer-list doom-modeline-update-buffer-file-icon] 7 "\n\n(fn SYM VAL OP WHERE)"]] 3)#@181 Displays an ICON of buffer state with FACE. UNICODE and TEXT are the alternatives if it is not applicable. Uses `nerd-icons-mdicon' to fetch the icon. (fn ICON UNICODE TEXT FACE) (defalias 'doom-modeline-buffer-file-state-icon #[1028 "\300\301\302&\207" [doom-modeline-icon mdicon :face] 11 (#$ . 1286)]) (defvar doom-modeline--buffer-file-state-icon nil nil) (make-variable-buffer-local 'doom-modeline--buffer-file-state-icon)#@61 Update the buffer or file state in mode-line. (fn &rest _) (defalias 'doom-modeline-update-buffer-file-state-icon #[128 "\205\215\3061\213 \203\307\310\311\312\313$\202^\n\203+ \203+\314 \203+\307\315\316\312\313$\202^ \203D\317 !\204D\320 !\204D\307\321\322\323\324$\202^ \203N\317 !\204]\325p!\204]\307\326\327\312\313$\202^\330deZ\331 U\203\200\332\304!\203v\f\203v\333 \204\200\332\305!\205\206 \205\206\307\334\335\336\313$P0\202\215\210\337\211 \207" [doom-modeline-buffer-state-icon buffer-read-only doom-modeline-buffer-modification-icon buffer-file-name fancy-narrow-mode dired-narrow-mode (error) doom-modeline-buffer-file-state-icon "nf-md-lock" "🔒" "%1*" doom-modeline-warning buffer-modified-p "nf-md-content_save_edit" "💾" file-remote-p file-exists-p "nf-md-cancel" "đŸšĢ" "!" doom-modeline-urgent verify-visited-file-modtime "nf-md-reload_alert" "âŸŗ" "" buffer-size boundp fancy-narrow-active-p "nf-md-unfold_less_horizontal" "↕" "><" nil doom-modeline--buffer-file-state-icon] 7 (#$ . 1726)]) (defvar doom-modeline--buffer-file-name nil nil) (make-variable-buffer-local 'doom-modeline--buffer-file-name)#@53 Update buffer file name in mode-line. (fn &rest _) (defalias 'doom-modeline-update-buffer-file-name #[128 "\3031(\304 \305\306\"\216\203\307 \202!\310\311 \312\313\314\315\316\317\320 & )\2620\202*\210\321\211\207" [buffer-file-name mode-line-buffer-identification-keymap doom-modeline--buffer-file-name (error) match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data t] 3] doom-modeline-buffer-file-name propertize buffer-name face doom-modeline-buffer-file mouse-face doom-modeline-highlight help-echo "Buffer name\nmouse-1: Previous buffer\nmouse-3: Next buffer" local-map nil] 12 (#$ . 2887)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\210\300\305\302\"\210\300\306\302\"\210\307\310\311\302#\210\307\312\311\302#\210\307\313\311\302#\210\307\314\311\302#\210\307\315\311\302#\207" [add-hook find-file-hook doom-modeline-update-buffer-file-name after-save-hook clone-indirect-buffer-hook evil-insert-state-exit-hook Info-selection-hook advice-add rename-buffer :after set-visited-file-name pop-to-buffer popup-create popup-delete] 4) (defvar doom-modeline-tab-bar-string '(""))#@41 Alternative to `tab-bar-format-global'. (defalias 'doom-modeline-tab-bar-format-global #[0 "\301\302\"\207" [doom-modeline-tab-bar-string mapcar #[257 "\300\301\302!\303BBB\207" [global menu-item format-mode-line (ignore)] 5 "\n\n(fn STRING)"]] 3 (#$ . 4017)]) (byte-code "\300\301!\203\302\303\304\305B\306\307$\210\202\310\311\306\"\210\312\313\314\"\207" [boundp after-focus-change-function advice--add-function :after #[0 "\300\301!\207" [default-value after-focus-change-function] 2] #[257 "\300\301\"\207" [set-default after-focus-change-function] 4 "\n\n(fn GV--VAL)"] doom-modeline-update-buffer-file-name nil add-hook focus-in-hook doom-modeline-add-variable-watcher doom-modeline-buffer-file-name-style #[1028 "\302=\205%\303 \211\205#\211@r\211q\210 \203\304 \210)A\266\202\202\n\262\207" [doom-modeline-buffer-file-name-style buffer-file-name set buffer-list doom-modeline-update-buffer-file-name] 7 "\n\n(fn SYM VAL OP WHERE)"]] 5)#@37 The icon of the current major mode. (defalias 'doom-modeline--buffer-mode-icon #[0 "\2056 \2056\n\206\304 \211\2054\211\211\305\230\262?\2054 \203&\306!\202+\307\310 \"\311\312\313\314 \315\316%P\262\207" [doom-modeline-icon doom-modeline-major-mode-icon doom-modeline--buffer-file-icon doom-modeline-major-mode-color-icon doom-modeline-update-buffer-file-icon "" doom-modeline-display-icon doom-modeline-propertize-icon doom-modeline-face propertize " " face doom-modeline-spc-face display ((space :relative-width 0.5))] 8 (#$ . 4984)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--buffer-mode-icon speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@39 The icon of the current buffer state. (defalias 'doom-modeline--buffer-state-icon #[0 "\205\"\301 \211\205 \211\211\302\230\262?\205 \303!\304\305\306\307 \310\311%P\262\207" [doom-modeline-buffer-state-icon doom-modeline-update-buffer-file-state-icon "" doom-modeline-display-icon propertize " " face doom-modeline-spc-face display ((space :relative-width 0.5))] 8 (#$ . 5697)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--buffer-state-icon speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@25 The buffer simple name. (defalias 'doom-modeline--buffer-simple-name #[0 "\302\303 \304\305\203\306 \203\307\202\310!\311\312\313\314\315 & \207" [doom-modeline-highlight-modified-buffer-name mode-line-buffer-identification-keymap propertize buffer-name face doom-modeline-face buffer-modified-p doom-modeline-buffer-modified doom-modeline-buffer-file mouse-face doom-modeline-highlight help-echo "Buffer name\nmouse-1: Previous buffer\nmouse-3: Next buffer" local-map] 10 (#$ . 6247)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--buffer-simple-name speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@26 The current buffer name. (defalias 'doom-modeline--buffer-name #[0 "\205M \306=\204+\n\203+\307\310 \311\312 \203 \313 \203 \314\202!\315!\316\317\320\321\322\f& \207 \2061\323 \211\205K \203H\313 \203H\307\311\312\314!#\202K\324!\262\207" [doom-modeline-buffer-name doom-modeline-buffer-file-name-style doom-modeline--limited-width-p doom-modeline-highlight-modified-buffer-name mode-line-buffer-identification-keymap doom-modeline--buffer-file-name file-name propertize buffer-name face doom-modeline-face buffer-modified-p doom-modeline-buffer-modified doom-modeline-buffer-file mouse-face doom-modeline-highlight help-echo "Buffer name\nmouse-1: Previous buffer\nmouse-3: Next buffer" local-map doom-modeline-update-buffer-file-name doom-modeline-display-text] 10 (#$ . 6905)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--buffer-name speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@158 Combined information about the current buffer. Including the current working directory, the file name, and its state (modified, read-only or non-existent). (defalias 'doom-modeline-segment--buffer-info #[0 "\306\307\310\311 #\205< \205<\n\206\312 \211\205:\211\211\313\230\262?\205: \203,\314!\2021\315\316 \"\306\307\310\311 \317\320%P\262\f\205^\321 \211\205\\\211\211\313\230\262?\205\\\314!\306\307\310\311 \317\320%P\262 \205\263\322=\204\217\203\217\306\323 \310\316 \203\201\324 \203\201\325\202\202\326!\327\330\331\332\333!& \202\263\"\206\226\334 \211\205\261 \203\256\324 \203\256\306\310\316\325!#\202\261\335!\262R\207" [doom-modeline-icon doom-modeline-major-mode-icon doom-modeline--buffer-file-icon doom-modeline-major-mode-color-icon doom-modeline-buffer-state-icon doom-modeline-buffer-name propertize " " face doom-modeline-spc-face doom-modeline-update-buffer-file-icon "" doom-modeline-display-icon doom-modeline-propertize-icon doom-modeline-face display ((space :relative-width 0.5)) doom-modeline-update-buffer-file-state-icon file-name buffer-name buffer-modified-p doom-modeline-buffer-modified doom-modeline-buffer-file mouse-face doom-modeline-highlight help-echo "Buffer name\nmouse-1: Previous buffer\nmouse-3: Next buffer" local-map doom-modeline-update-buffer-file-name doom-modeline-display-text doom-modeline-buffer-file-name-style doom-modeline--limited-width-p doom-modeline-highlight-modified-buffer-name mode-line-buffer-identification-keymap doom-modeline--buffer-file-name] 13 (#$ . 7860)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist buffer-info doom-modeline-segment--buffer-info] 4)#@65 Display only the current buffer's name, but with fontification. (defalias 'doom-modeline-segment--buffer-info-simple #[0 "\306\307\310\311 #\205< \205<\n\206\312 \211\205:\211\211\313\230\262?\205: \203,\314!\2021\315\316 \"\306\307\310\311 \317\320%P\262\f\205^\321 \211\205\\\211\211\313\230\262?\205\\\314!\306\307\310\311 \317\320%P\262\306\322 \310\316 \203p\323 \203p\324\202q\325!\326\327\330\331\332& R\207" [doom-modeline-icon doom-modeline-major-mode-icon doom-modeline--buffer-file-icon doom-modeline-major-mode-color-icon doom-modeline-buffer-state-icon doom-modeline-highlight-modified-buffer-name propertize " " face doom-modeline-spc-face doom-modeline-update-buffer-file-icon "" doom-modeline-display-icon doom-modeline-propertize-icon doom-modeline-face display ((space :relative-width 0.5)) doom-modeline-update-buffer-file-state-icon buffer-name buffer-modified-p doom-modeline-buffer-modified doom-modeline-buffer-file mouse-face doom-modeline-highlight help-echo "Buffer name\nmouse-1: Previous buffer\nmouse-3: Next buffer" local-map mode-line-buffer-identification-keymap] 13 (#$ . 9564)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist buffer-info-simple doom-modeline-segment--buffer-info-simple] 4)#@36 Display calculator icons and info. (defalias 'doom-modeline-segment--calc #[0 "\302\303\304\305 #\306\307\310\311\312$\211\205\313!\302\303\304\305 \314\315%P\262\302\316 \304\317\2030\320 \2030\321\2021\322!\323\324\325\326\327 & Q\207" [doom-modeline-highlight-modified-buffer-name mode-line-buffer-identification-keymap propertize " " face doom-modeline-spc-face doom-modeline-icon faicon "nf-fa-calculator" "🖩" "" doom-modeline-display-icon display ((space :relative-width 0.5)) buffer-name doom-modeline-face buffer-modified-p doom-modeline-buffer-modified doom-modeline-buffer-file mouse-face doom-modeline-highlight help-echo "Buffer name\nmouse-1: Previous buffer\nmouse-3: Next buffer" local-map] 12 (#$ . 10845)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist calc doom-modeline-segment--calc] 4)#@166 Displays `default-directory' with the icon and state. This is for special buffers like the scratch buffer where knowing the current project directory is important. (defalias 'doom-modeline-segment--buffer-default-directory #[0 "\304\203\305 \203\306\202\307!\310\311\312\313 # \205-\314\315\316\317\320\321&\310\311\312\313 \322\323%P\n\205O\324 \211\205M\211\211\320\230\262?\205M\325!\310\311\312\313 \322\323%P\262\310\326 !\312#R\207" [buffer-file-name doom-modeline-major-mode-icon doom-modeline-buffer-state-icon default-directory doom-modeline-face buffer-modified-p doom-modeline-buffer-modified doom-modeline-buffer-path propertize " " face doom-modeline-spc-face doom-modeline-icon octicon "nf-oct-file_directory_fill" "đŸ–ŋ" "" :face display ((space :relative-width 0.5)) doom-modeline-update-buffer-file-state-icon doom-modeline-display-icon abbreviate-file-name] 11 (#$ . 11697)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist buffer-default-directory doom-modeline-segment--buffer-default-directory] 4)#@142 Displays `default-directory'. This is for special buffers like the scratch buffer where knowing the current project directory is important. (defalias 'doom-modeline-segment--buffer-default-directory-simple #[0 "\302\303!\304\305\306\307 #\205 \310\311\312\313\314\315&\304\305\306\307 \316\317%P\304\320 !\306#Q\207" [doom-modeline-major-mode-icon default-directory doom-modeline-face doom-modeline-buffer-path propertize " " face doom-modeline-spc-face doom-modeline-icon octicon "nf-oct-file_directory_fill" "đŸ–ŋ" "" :face display ((space :relative-width 0.5)) abbreviate-file-name] 9 (#$ . 12768)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist buffer-default-directory-simple doom-modeline-segment--buffer-default-directory-simple] 4)#@56 Displays the eol and the encoding style of the buffer. (defalias 'doom-modeline-segment--buffer-encoding #[0 "\205\273\305\306\307\310 #\311 \312 !\313=\204\"\314=\205`\211\n\232?\205`\305\315\267\2025\316\2026\317\2026\320\2026\321\307\322\323\324\325\326 \327\267\202P\330\202Q\331\202Q\332\202Q\333\"\334\335 \336\337\340#\210\211\262& \341 !\342\343\"\211\344>\203q\345\202u\342\346\"\313=\204\217\314=\205\237\347=?\205\237\211 =?\205\237\305\350!\226\307\322\323\324\351\334\f& \204\247\211\205\271\211\205\264\205\264  \260\266\210\207" [doom-modeline-buffer-encoding buffer-file-coding-system doom-modeline-default-eol-type doom-modeline-default-coding-system mode-line-coding-system-map propertize " " face doom-modeline-spc-face doom-modeline-face coding-system-eol-type t nondefault #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (0 41 1 45 2 49)) "LF" "CRLF" "CR" "" mouse-face doom-modeline-highlight help-echo format "End-of-line style: %s\nmouse-1: Cycle" #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (0 68 1 72 2 76)) "Unix-style LF" "DOS-style CRLF" "Mac-style CR" "Undecided" local-map make-sparse-keymap define-key [mode-line mouse-1] mode-line-change-eol coding-system-plist plist-get :category (coding-category-undecided coding-category-utf-8) utf-8 :name coding-category-undecided symbol-name mode-line-mule-info-help-echo] 17 (#$ . 13548)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist buffer-encoding doom-modeline-segment--buffer-encoding] 4)#@39 Displays the indentation information. (defalias 'doom-modeline-segment--indent-info #[0 "\205*\305 \203\211\306\n\"\202(\307\310\311 \f\"A\312#\313\203$J\202%\n\"\262\262\207" [doom-modeline-indent-info indent-tabs-mode tab-width major-mode doom-modeline-indent-alist #[514 "\300\301\302#\303\304 #\207" [propertize format " %s %d " face doom-modeline-face] 7 "\n\n(fn MODE SIZE)"] "TAB" seq-find #[257 "\211\205\f\300!\205\f\211J\207" [boundp] 3 "\n\n(fn VAR)"] assoc nil "SPC"] 6 (#$ . 15175)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist indent-info doom-modeline-segment--indent-info] 4)#@30 Hostname for remote buffers. (defalias 'doom-modeline-segment--remote-host #[0 "\205 \205\302 \303\"\211\205\304\305P\306\307\310!#\262\207" [doom-modeline-remote-host default-directory file-remote-p host propertize "@" face doom-modeline-face doom-modeline-host] 6 (#$ . 15819)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist remote-host doom-modeline-segment--remote-host] 4)#@60 The major mode, including environment and text-scale info. (defalias 'doom-modeline-segment--major-mode #[0 "\306\307\310\311 #\312\313!\306\314\315\301!\203 \236A@\206\n! \205(\f\205(\316\317\f\"P\320\321\310\322\323\324 & \315\325!\205V\326U?\205V\306\316\326V\203O\327\202P\330\"\310#R\207" [major-mode delighted-modes mode-name doom-modeline-env-version doom-modeline-env--version mode-line-major-mode-keymap propertize " " face doom-modeline-spc-face doom-modeline-face doom-modeline-buffer-major-mode format-mode-line boundp format " %s" help-echo "Major mode\nmouse-1: Display major mode menu\nmouse-2: Show help for major mode\nmouse-3: Toggle minor modes" mouse-face doom-modeline-highlight local-map text-scale-mode-amount 0 " (%+d)" " (%-d)"] 13 (#$ . 16239)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist major-mode doom-modeline-segment--major-mode] 4)#@19 The process info. (defalias 'doom-modeline-segment--process #[0 "\301\302!!\207" [mode-line-process doom-modeline-display-text format-mode-line] 3 (#$ . 17161)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist process doom-modeline-segment--process] 4)#@30 minor-modes modeline segment (defalias 'doom-modeline-segment--minor-modes #[0 "\205T ?\205T\306\307\310\311 #\312\313!\314\302!\203D\n\203D\315\316\317 D\310\320\321\322\323\324 \257\n\315\316\325\326\327\330\f\331\n&D\320\321\322\332\324 \257F\207\315\333\310\320\321\322\323\324 \257\nD\266\202\207" [doom-modeline-minor-modes doom-modeline--limited-width-p minions-mode mode-line-minor-mode-keymap minions-mode-line-lighter minions-mode-line-minor-modes-map propertize " " face doom-modeline-spc-face doom-modeline-face doom-modeline-buffer-minor-mode boundp :propertize #1="" minions--prominent-modes mouse-face doom-modeline-highlight help-echo "Minor mode\n mouse-1: Display minor mode menu\n mouse-2: Show help for minor mode\n mouse-3: Toggle minor modes" local-map doom-modeline-icon octicon "nf-oct-gear" "⚙" :face "Minions\nmouse-1: Display minor modes menu" (#1# minor-mode-alist)] 13 (#$ . 17446)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist minor-modes doom-modeline-segment--minor-modes] 4)#@163 Displays the vcs ICON with FACE and VOFFSET. UNICODE and TEXT are fallbacks. Uses `nerd-icons-octicon' to fetch the icon. (fn ICON &optional UNICODE TEXT FACE) (defalias 'doom-modeline-vcs-icon #[1025 "\301\302\205\303&\207" [doom-modeline-vcs-icon doom-modeline-icon devicon :face] 11 (#$ . 18508)])#@67 Return non-nil if the current buffer's file is in a git worktree. (defalias 'doom-modeline--in-git-worktree-p #[0 "\205\301!?\205\302\303\"\211\205\304\305\303\"!\207" [buffer-file-name file-remote-p locate-dominating-file ".git" file-regular-p expand-file-name] 5 (#$ . 18825)]) (defvar doom-modeline--vcs nil nil) (make-variable-buffer-local 'doom-modeline--vcs)#@46 Update vcs state in mode-line. (fn &rest _) (defalias 'doom-modeline-update-vcs #[128 "\205{ \205{\306 !\307 \"\211\310\267\202<\311\312\313\314\315$\202B\311\316\317\320\315$\202B\311\321\322\323\324$\202B\325\326\327\330\323\331\332&\202B\311\333\334\335\315$\n\203Q\336 !\203Q \206R\337\f\236A\206Z\340\341\342 \"\203n\343 \344ZO(P\202o\345#\346B\347BD\266\206\211)\207" [vc-mode buffer-file-name vc-display-status doom-modeline-vcs-display-function doom-modeline-vcs-state-faces-alist doom-modeline-vcs-max-length vc-backend vc-state #s(hash-table size 7 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (edited 21 added 21 needs-merge 30 needs-update 39 removed 48 conflict 48 unregistered 48)) doom-modeline-vcs-icon "nf-dev-git_compare" "🔃" "*" doom-modeline-info "nf-dev-git_merge" "🔀" "?" "nf-dev-git_pull_request" "âŦ‡" "!" doom-modeline-warning doom-modeline-icon octicon "nf-oct-alert" "⚠" :face doom-modeline-urgent "nf-dev-git_branch" "" "@" functionp "" doom-modeline-vcs-default propertize length> 0 3 face icon text doom-modeline-ellipsis doom-modeline--vcs] 11 (#$ . 19205)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\304\305\306\302#\210\307\310\311\"\210\307\312\313\"\210\307\314\315\"\210\307\316\317\"\207" [add-hook find-file-hook doom-modeline-update-vcs after-save-hook advice-add vc-refresh-state :after doom-modeline-add-variable-watcher doom-modeline-icon #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [doom-modeline-icon set buffer-list doom-modeline-update-vcs] 7 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-unicode-fallback #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [doom-modeline-unicode-fallback set buffer-list doom-modeline-update-vcs] 7 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-vcs-icon #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [doom-modeline-vcs-icon set buffer-list doom-modeline-update-vcs] 7 "\n\n(fn SYM VAL OP WHERE)"] vc-display-status #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [vc-display-status set buffer-list doom-modeline-update-vcs] 7 "\n\n(fn SYM VAL OP WHERE)"]] 4)#@58 Displays the current branch, colored based on its state. (defalias 'doom-modeline-segment--vcs #[0 "\205T\303\236A\304\236A\305\306\307\310 #\305\306\307\310 \311\312%\313 \205%\305\314\307\315#\305\316!\2052P ?\205=\317 !PQ\320\321\322\320\n#\323\324\325\321\322\325\n#&Q\266\205\262\207" [doom-modeline--vcs doom-modeline--limited-width-p vc-mode icon text propertize " " face doom-modeline-spc-face display ((space :relative-width 0.5)) doom-modeline--in-git-worktree-p "WT" doom-modeline-warning doom-modeline-display-icon doom-modeline-display-text help-echo get-text-property 1 mouse-face doom-modeline-highlight local-map] 18 (#$ . 21478)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist vcs doom-modeline-segment--vcs] 4)#@142 Displays the check ICON with FACE. UNICODE and TEXT are fallbacks. Uses `nerd-icons-mdicon' to fetch the icon. (fn ICON UNICODE TEXT FACE) (defalias 'doom-modeline-check-icon #[1028 "\301\302\205\303&\207" [doom-modeline-check-icon doom-modeline-icon mdicon :face] 11 (#$ . 22260)])#@62 Displays the check TEXT with FACE. (fn TEXT &optional FACE) (defalias 'doom-modeline-check-text #[513 "\300\301\206\302#\207" [propertize face mode-line] 6 (#$ . 22559)])#@182 Count the number of ERRORS, grouped by level. Return an alist, where each ITEM is a cons cell whose `car' is an error level, and whose `cdr' is the number of errors of that level. (defalias 'doom-modeline--flycheck-count-errors #[0 "\301C\301C\301C\302\303\304$\305!\"\210\306\242B\307\242B\310\242BE\207" [flycheck-current-errors 0 mapc make-closure #[257 "\211A\303@!\211\304\267\202!\302\211\242\\\240\207\301\211\242\\\240\207\300\211\242\\\240\207\305\207" [V0 V1 V2 flycheck-error-level-compilation-level #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (0 12 1 19 2 26)) nil] 6 "\n\n(fn ITEM)"] flycheck-count-errors info warning error] 9 (#$ . 22741)]) (defvar doom-modeline--flycheck nil nil) (make-variable-buffer-local 'doom-modeline--flycheck)#@52 Update flycheck via STATUS. (fn &optional STATUS) (defalias 'doom-modeline-update-flycheck #[256 "\306\300!\205S\205S\211\203\2119\204 \262\307 \310\236A\311\236A\312\236A\313\314\315\316 \317\320%\n\321=\204< \203\267\n\322=\203\267\\\\\323\267\202\261\211\324V\203l\324V\203X\325\202Y\326\327\330\331\332$\333\334!\"Q\262\202\262\327\335\336\337\340$\202\262\327\341\342\337\343$\324V\205\211\333\334!\343\"PP\202\262\327\344\331\345\343$\202\262\327\344\331\332\325$\202\262\327\346\347\350\343$\202\262\327\351\352\353\343$\202\262\354\262\202\373\n\355=\204\307 \204\372\n\322=\203\372\327\356\357\332\325$\333\334!\325\"\327\360\331\332\326$\333\334\n!\326\"\327\361\362\332\340$ \333\334 !\340\"\260 \202\373\354\313\363\364\n\365\267\202&\366\367\n\n\n$\202'\370\202'\371\202'\372\202'\373\202'\374\202'\375\376Q\377\201@\201A\201B \201C\201D\f#\210\201C\201E\201F#\210\211\262&\266\205\262\211\207" [flycheck-mode flycheck-last-status-change doom-modeline-check doom-modeline--limited-width-p flycheck-mode-menu-map doom-modeline--flycheck boundp doom-modeline--flycheck-count-errors error warning info propertize " " face doom-modeline-spc-face display ((space :relative-width 0.5)) simple auto #s(hash-table size 6 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (finished 72 running 117 no-checker 141 errored 150 interrupted 159 suspicious 168)) 0 doom-modeline-urgent doom-modeline-warning doom-modeline-check-icon "nf-md-alert_circle_outline" "⚠" "!" doom-modeline-check-text number-to-string "nf-md-check_circle_outline" "✔" "*" doom-modeline-info "nf-md-timer_sand" "âŗ" doom-modeline-debug "nf-md-alert_box_outline" "-" "nf-md-pause_circle_outline" "âĻˇ" "." "nf-md-file_question_outline" "❓" "?" "" full "nf-md-close_circle_outline" "⎞" "nf-md-alert_outline" "nf-md-information_outline" "🛈" help-echo "Flycheck\n" #s(hash-table size 6 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (finished 262 running 274 no-checker 278 errored 282 interrupted 286 suspicious 290)) format "error: %d, warning: %d, info: %d" "Checking..." "No Checker" "Error" "Interrupted" "Suspicious" nil "\nmouse-1: Display minor mode menu\nmouse-2: Show help for minor mode" mouse-face doom-modeline-highlight local-map make-sparse-keymap define-key [mode-line down-mouse-1] [mode-line mouse-2] #[0 "\300\301!\207" [describe-function flycheck-mode] 2 nil nil]] 19 (#$ . 23552)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\304\305\306\"\210\304\307\310\"\210\304\311\312\"\210\304\313\314\"\210\315\316\317\"\207" [add-hook flycheck-status-changed-functions doom-modeline-update-flycheck window-state-change-functions doom-modeline-add-variable-watcher doom-modeline-icon #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [doom-modeline-icon set buffer-list doom-modeline-update-flycheck] 7 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-check-icon #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [doom-modeline-check-icon set buffer-list doom-modeline-update-flycheck] 7 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-unicode-fallback #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [doom-modeline-unicode-fallback set buffer-list doom-modeline-update-flycheck] 7 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-check #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [doom-modeline-check set buffer-list doom-modeline-update-flycheck] 7 "\n\n(fn SYM VAL OP WHERE)"] eval-after-load flymake #[0 "\300\301!\204 \302\301\303\"\210\304\305!?\205\306\305\307\"\207" [boundp flymake--state defvaralias flymake--backend-state fboundp flymake--state-diags defalias flymake--backend-state-diags] 3]] 3)#@47 Count the number of ERRORS, grouped by level. (defalias 'doom-modeline--flymake-count-errors #[0 "\301\302!\301\303!\304C\304C\304C\305\306\307  &\"\210\310\242B\311\242B\312\242BE\207" [flymake--state warning-numeric-level :warning :debug 0 maphash make-closure #[514 "\305!\211\306:\203E@\262\307\310!\311\312\313!#\211\304V\203'\300\211\242T\240\266\202>\211\303V\2037\301\211\242T\240\266\202>\302\211\242T\240\266A\262\202\306\207" [V0 V1 V2 V3 V4 flymake--state-diags nil flymake--lookup-type-property flymake--diag-type severity warning-numeric-level :error] 10 "\n\n(fn B STATE)"] note warning error] 13 (#$ . 27432)]) (defvar doom-modeline--flymake nil nil) (make-variable-buffer-local 'doom-modeline--flymake)#@31 Update flymake. (fn &rest _) (defalias 'doom-modeline-update-flymake #[128 "\306\300!\205g\205g\306\301!\205g \205g \307C\310\311\312\"\"\210\211\242\266\202\313 \314 \315 \205/?\316\"\317 \320\236A\321\236A\322\236A\323\324\325\326 \327\330%\n\331=\204Y \203\320\n\332=\203\320\\\\\203{\333\334\335\336\337$\340V\205w\341\342!\337\"PP\202\313 \204\211\333\343\344\345\346$\202\313\203\227\333\343\344\345\347$\202\313\211\340V\203\305\340V\203\247\346\202\262\340V\203\261\347\202\262\350\333\351\344\345$\341\342!\"Q\262\202\313\333\352\353\336\350$\262\202\n\354=\204\340 \204\n\332=\203\333\355\356\345\346$\341\342!\346\"\333\357\344\345\347$\341\342\n!\347\"\333\360\361\345\350$ \341\342 !\350\"\260 \202\362\323\363\364\n\203!\365\202C\204*\366\202C \2033\367\202C\370\371GG\f\f\f&\372Q\373\374\375\376 \377\201@\f#\210\377\201A\201B#\210\211\262&\266\205\262\266\206\211\207" [flymake-mode flymake--state doom-modeline-check doom-modeline--limited-width-p flymake-menu doom-modeline--flymake boundp nil maphash make-closure #[514 "\300\300\242B\240\207" [V0] 5 "\n\n(fn K _)"] flymake-running-backends flymake-disabled-backends flymake-reporting-backends cl-set-difference doom-modeline--flymake-count-errors error warning note propertize " " face doom-modeline-spc-face display ((space :relative-width 0.5)) simple auto doom-modeline-check-icon "nf-md-timer_sand" "âŗ" "*" doom-modeline-debug 0 doom-modeline-check-text number-to-string "nf-md-alert_box_outline" "⚠" "!" doom-modeline-urgent doom-modeline-warning doom-modeline-info "nf-md-alert_circle_outline" "nf-md-check_circle_outline" "✔" full "nf-md-close_circle_outline" "⎞" "nf-md-alert_outline" "nf-md-information_outline" "🛈" "" help-echo "Flymake\n" "Checking..." "No Checker" "All Checkers Disabled" format "%d/%d backends running\nerror: %d, warning: %d, note: %d" "\nmouse-1: Display minor mode menu\nmouse-2: Show help for minor mode" mouse-face doom-modeline-highlight local-map make-sparse-keymap define-key [mode-line down-mouse-1] [mode-line mouse-2] #[0 "\300\301!\207" [describe-function flymake-mode] 2 nil nil]] 25 (#$ . 28185)]) (byte-code "\300\301\302\303#\210\304\305\303\"\210\306\307\310\"\210\306\311\312\"\210\306\313\314\"\210\306\315\316\"\207" [advice-add flymake--handle-report :after doom-modeline-update-flymake add-hook window-state-change-functions doom-modeline-add-variable-watcher doom-modeline-icon #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [doom-modeline-icon set buffer-list doom-modeline-update-flymake] 7 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-check-icon #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [doom-modeline-check-icon set buffer-list doom-modeline-update-flymake] 7 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-unicode-fallback #[1028 "\302=\205+\303 \211\205)\211@r\211q\210\304\301!\203! \203!\305 \210)A\266\202\202\n\262\207" [doom-modeline-unicode-fallback flymake-mode set buffer-list boundp doom-modeline-update-flymake] 8 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-check #[1028 "\302=\205+\303 \211\205)\211@r\211q\210\304\301!\203! \203!\305 \210)A\266\202\202\n\262\207" [doom-modeline-check flymake-mode set buffer-list boundp doom-modeline-update-flymake] 8 "\n\n(fn SYM VAL OP WHERE)"]] 4)#@76 Displays color-coded error status in the current buffer with pretty icons. (defalias 'doom-modeline-segment--check #[0 "\304\305\306\307 #\211\205\304\305\306\307 \310\311%\211\205/\312\300!\203$\203$ \202/\312\302!\205/\n\205/ \211\205\313\314\305\"\211\203f\211@\315\313\316\317$\266\203\203Y\320!Q\202\\\321!P\262A\266\202\2029\210\304\322\323\324\322#\325\326\327\323\324\327\f#&\262Q\207" [flymake-mode doom-modeline--flymake flycheck-mode doom-modeline--flycheck propertize " " face doom-modeline-spc-face display ((space :relative-width 0.5)) boundp nil split-string "^[0-9]+$" string-match t doom-modeline-display-text doom-modeline-display-icon help-echo get-text-property 0 mouse-face doom-modeline-highlight local-map] 16 (#$ . 31633)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist check doom-modeline-segment--check] 4)#@147 The buffer word count. Displayed when in a major mode in `doom-modeline-continuous-word-count-modes'. Respects `doom-modeline-enable-word-count'. (defalias 'doom-modeline-segment--word-count #[0 "\205 \n\235\205\303\304\305\306ed\"\"\307\310 #\207" [doom-modeline-enable-word-count major-mode doom-modeline-continuous-word-count-modes propertize format " %dW" count-words face doom-modeline-face] 6 (#$ . 32537)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist word-count doom-modeline-segment--word-count] 4)#@49 Get the column of the position `POS'. (fn POS) (defalias 'doom-modeline-column #[257 "\212\211b\210i)\207" [] 2 (#$ . 33084)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline-column speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@139 Information about the current selection. Such as how many characters and lines are selected, or the NxM dimensions of a block selection. (defalias 'doom-modeline-segment--selection-info #[0 "\205\332 \204\306\302!\205\332\n\205\332 \307=\205\332\310 \205\332\306\302!\2033\n\2033 \307=\2033\f B\2028\311 \312 B\211\203E\211A\262\242\202L\313\314\315GD\"\316\317d^\"\320\306\321!\203_\204q\306\322!\203\220\203\220\323=\203\220\324\212\211b\210i)\262\212\211b\210i)\262Z!\325\326#\262\202\303\306\322!\203\251\203\251\327=\203\251\325\330\"\202\303\331V\203\273\325\332Z#\202\303\325\333Z\" \205\321\325\334\335 \"\"\320R\262\336\337#\266\202\207" [doom-modeline-selection-info mark-active evil-local-mode evil-state evil-visual-beginning evil-visual-end boundp visual doom-modeline--active region-beginning region-end signal wrong-number-of-arguments (beg . end) propertize count-lines " " rectangle-mark-mode evil-visual-selection block abs format "%dx%dB" line "%dL" 1 "%dC %dL" "%dC" " %dW" count-words face doom-modeline-emphasis doom-modeline-enable-word-count] 11 (#$ . 33364)]) (byte-code "\300\301\302\303B\"\210\304\305\306\"\207" [add-to-list doom-modeline--fn-alist selection-info doom-modeline-segment--selection-info add-hook post-command-hook #[0 "\205\301 \207" [mark-active force-mode-line-update] 1]] 4)#@53 Display current Emacs or evil macro being recorded. (defalias 'doom-modeline--macro-recording #[0 "\304 \205T\204 \205T\305\306\307\310#\305\306\307\311#\312\302!\203*\n\203*\313\314\315\n!\"\202+\316 \2038\305\307\310#\202P\317\320\321\322\323\324\325\326&\317\320\327\330\331\323\310\325\326&QQ\266\203\207" [defining-kbd-macro executing-kbd-macro evil-this-macro doom-modeline-always-show-macro-register doom-modeline--active propertize " " face doom-modeline-panel (:inherit (doom-modeline-panel variable-pitch)) boundp format " @%s " char-to-string "Macro" doom-modeline-icon mdicon "nf-md-record" "●" :face (:inherit (doom-modeline-urgent doom-modeline-panel)) :v-adjust 0.15 "nf-md-menu_right" "â–ļ" ">"] 15 (#$ . 34759)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--macro-recording speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@67 Calculate anzu count via POSITIONS and HERE. (fn POSITIONS HERE) (defalias 'doom-modeline-fix-anzu-count #[514 "\300\301\211\302\301:\203>@\262\211A\262\242\262T\262Y\2033X\2033\262\301\211\262\2024\302\203>A\262\202\203D\300\207\207" [0 nil t] 10 (#$ . 35669)]) (byte-code "\301\302\303\304#\210\305\306\307\310\"\207" [anzu-cons-mode-line-p advice-add anzu--where-is-here :override doom-modeline-fix-anzu-count nil eval-after-load anzu #[0 "\300\301\302\303#\210\300\304\302\"\210\305\306\307\302#\210\310\311\312\"\207" [add-hook isearch-mode-end-hook anzu--reset-status t iedit-mode-end-hook advice-add evil-force-normal-state :after mapc make-variable-buffer-local (anzu--total-matched anzu--current-position anzu--state anzu--cached-count anzu--cached-positions anzu--last-command anzu--last-isearch-string anzu--overflow-p)] 4]] 4)#@141 Show the match index and total number thereof. Requires `anzu', also `evil-anzu' if using `evil-mode' for compatibility with `evil-search'. (defalias 'doom-modeline--anzu #[0 "\306\300!\205J\205J\306\301!\205 ?\205J\307\n \310\267\2021\311\312\f\"\266\202\202E\311\313#\266\202\202E \203>\311\314\"\266\202\202E\311\315#\266\202\316\317\320!#\207" [anzu--state iedit-mode anzu--current-position anzu--total-matched anzu--cached-count anzu--overflow-p boundp propertize #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (replace-query 30 replace 39)) format " %d replace " " %d/%d " " %s+ " " %s/%d " face doom-modeline-face doom-modeline-panel] 7 (#$ . 36545)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--anzu speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@104 Show the match index and total number of `visual-replace'. It respects `visual-replace-display-total'. (defalias 'doom-modeline--visual-replace #[0 "\303\300!\205N\205N\303\301!\205 ?\205N\304\305!\205N\305 \205N\306G\307\310\311\312r\nq\210\313`!)\"\211\203A\307\314\315\316\"T#\202D\317!\262\"\262\320\321\322!#\207" [visual-replace--match-ovs iedit-mode visual-replace--calling-buffer boundp fboundp visual-replace--preview-is-complete propertize format " %s " seq-find #[257 "\300\301\"\207" [overlay-get visual-replace-idx] 4 "\n\n(fn OV)"] overlays-at "%d/%d" overlay-get visual-replace-idx number-to-string face doom-modeline-face doom-modeline-panel] 10 (#$ . 37410)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--visual-replace speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@116 Show number of matches for `evil-ex' in real time. The number of matches contains substitutions and highlightings. (defalias 'doom-modeline--evil-substitute #[0 "\304\300!\205P\205P\305 \236\204\306 \236\204\307 \236\205P\310\n\203*\n@\nA@B\202/\311 \312 B\313 \314\"\242\211\203H\315\316\317@A#\"\266\202\202K\266\320\321\322\323!#\207" [evil-local-mode evil-ex-active-highlights-alist evil-ex-range evil-ex-argument boundp evil-ex-substitute evil-ex-global-match evil-ex-buffer-match propertize line-beginning-position line-end-position evil-delimited-arguments 2 format " %s matches " how-many " - " face doom-modeline-face doom-modeline-panel] 9 (#$ . 38266)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--evil-substitute speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@33 Sort overlay A and B. (fn A B) (defalias 'doom-modeline-themes--overlay-sort #[514 "\300!\300!W\207" [overlay-start] 5 (#$ . 39109)])#@66 Show the number of iedit regions matches + what match you're on. (defalias 'doom-modeline--iedit #[0 "\303\300!\205F\205F\303\301!\205F \205F\304\305\306 )\206$\212\307 \210\306 ) G\310\311\203<\312\313 \314\"\315\">GZT\202=\316#\266\202\317\320\321!#\207" [iedit-mode iedit-occurrences-overlays inhibit-message boundp propertize t iedit-find-current-occurrence-overlay iedit-prev-occurrence format " %s/%d " sort append nil doom-modeline-themes--overlay-sort "-" face doom-modeline-face doom-modeline-panel] 11 (#$ . 39251)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--iedit speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@48 Show the number of matches for symbol overlay. (defalias 'doom-modeline--symbol-overlay #[0 "\303 \205W\304\300!\205W\205W\304\301!\205 ?\205W\304\302!\205!\n?\205W\305\306\307!!\211@\310\311\"\310\312\"G\305!\205U\313\314\315A@\205G\316PTG\\#\317\320\321!#\266\205\207" [symbol-overlay-keywords-alist symbol-overlay-temp-symbol iedit-mode doom-modeline--active boundp symbol-overlay-assoc symbol-overlay-get-symbol t symbol-overlay-get-list -1 1 propertize format " %d/%d " "in scope " face doom-modeline-face doom-modeline-panel] 11 (#$ . 39942)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--symbol-overlay speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@38 Show the number of multiple cursors. (defalias 'doom-modeline--multiple-cursors #[0 "\303\300!\203\203\304 \305\306!B\2020\303\301!\203. \203. G\305\n\203(\307\202)\306!B\2020\310C\211\203=\211A\262\242\202D\311\312\313GD\"\211\205\200\314\315\316#\317 \203_\320\321\322\323\211\324&\202k\314\325\316\326\327BB\330\331%\314\315\316\326\332DD#\314\333\334\"\316#R\207" [multiple-cursors-mode evil-mc-cursor-list evil-mc-frozen boundp mc/num-cursors doom-modeline-face doom-modeline-panel doom-modeline-bar nil signal wrong-number-of-arguments (count . face) propertize " " face doom-modeline-icon-displayable-p doom-modeline-icon faicon "nf-fa-i_cursor" "" :face "I" :inherit (:height 1.4 :weight normal) display (raise -0.1) variable-pitch format "%d "] 10 (#$ . 40673)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--multiple-cursors speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@64 Show the number of matches for `phi-search' and `phi-replace'. (defalias 'doom-modeline--phi-search #[0 "\302 \205$\303\300!\205$\205$G \211\205\"\304\305\306T#\307\310\311!#\266\202\207" [phi-search--overlays phi-search--selection doom-modeline--active boundp propertize format " %d/%d " face doom-modeline-face doom-modeline-panel] 7 (#$ . 41638)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--phi-search speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@111 Override the mode-line of `phi-search' and `phi-replace'. Apply ORIG-FUN with ARGS. (fn ORIG-FUN &rest ARGS) (defalias 'doom-modeline--override-phi-search #[385 "\302\300!\203\203\303 A#\207\303\"\207" [doom-modeline-mode mode-line-format boundp apply] 6 (#$ . 42154)]) (advice-add 'phi-search--initialize :around 'doom-modeline--override-phi-search)#@19 Show buffer size. (defalias 'doom-modeline--buffer-size #[0 "\205\302\303\304\305 #\211\302\306\304\307 \310\311\312\313\314 & Q\262\207" [size-indication-mode mode-line-column-line-number-mode-map propertize " " face doom-modeline-spc-face "%I" doom-modeline-face help-echo "Buffer size\nmouse-1: Display Line and Column Mode Menu" mouse-face doom-modeline-highlight local-map] 12 (#$ . 42520)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--buffer-size speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@362 Displays matches. Including: 1. the currently recording macro, 2. A current/total for the current search term (with `anzu'), 3. The number of substitutions being conducted with `evil-ex-substitute', and/or 4. The number of active `iedit' regions, 5. The current/total for the highlight term (with `symbol-overlay'), 6. The number of active `multiple-cursors'. (defalias 'doom-modeline-segment--matches #[0 "\306 \205T\204 \205T\307\310\311\312#\307\310\311\313#\314\302!\203*\n\203*\315\316\317\n!\"\202+\320 \2038\307\311\312#\202P\321\322\323\324\325\326\327\330&\321\322\331\332\333\325\312\327\330&QQ\266\203\334 \314\304!\205\245\f\205\245\314\305!\205g ?\205\245\335\336!\205\245\336 \205\245\307\fG\315\337\340\341r@q\210\342`!)\"\211\203\230\315\343\344\345\"T#\202\233\346!\262\"\262\311\347\312!#\306 \205\314\314\350!\205\314(\205\314(GA\211\205\312\307\315\351T#\311\347\312!#\266\202\314\352!\205$*\205$\353B\236\204\354\354B\236\204\354\355B\236\205$\307C\203\375C@CA@B\202\356 \357 B\360D\361\"\242\211\203\315\362\363@A#\"\266\202\202\266\364\311\347\312!#\314\305!\205n \205n\314\365!\205n5\205n\307\366E\367 )\206J\212\370 \210\367 )5G\315\371\203d\372\3735\374\"\375\">GZT\202e\376#\266\202\311\347\312!#\306 \205\331\314\377!\205\331?\205\331\314\201F!\205\210F?\205\331\314\305!\205\223 ?\205\331\201L\201M\366!!\211@\201N\201O\"\201N\201P\"G\201L!\205\327\307\315\351A@\205\311\201QPTG\\#\311\347\312!#\266\205\314\201G!\203\361G\203\361\201R \347\312!B\202\314\201H!\203H\203HG\347I\203 \201S\202\312!B\202\374C\211\203\"\211A\262\242\202/\201T\201U\201VGD\"\211\205\203\307\310\311#\201W \203R\321\201X\201Y\201Z\211\325&\202h\307\201[\311\201\\\201]BB\201^\201_%\307\310\311\201\\\201`DD#\307\315\201a\"\311#R\266\202\260\211\211\201Z\230\262\204\226\211\206\302J\205\302\307\310\311\201b #\211\307\201c\311\347 \201d\201e\201f\201g\201hK& Q\262\207" [defining-kbd-macro executing-kbd-macro evil-this-macro doom-modeline-always-show-macro-register visual-replace--match-ovs iedit-mode doom-modeline--active propertize " " face doom-modeline-panel (:inherit (doom-modeline-panel variable-pitch)) boundp format " @%s " char-to-string "Macro" doom-modeline-icon mdicon "nf-md-record" "●" :face (:inherit (doom-modeline-urgent doom-modeline-panel)) :v-adjust 0.15 "nf-md-menu_right" "â–ļ" ">" #[0 "\306\300!\205J\205J\306\301!\205 ?\205J\307\n \310\267\2021\311\312\f\"\266\202\202E\311\313#\266\202\202E \203>\311\314\"\266\202\202E\311\315#\266\202\316\317\320!#\207" [anzu--state iedit-mode anzu--current-position anzu--total-matched anzu--cached-count anzu--overflow-p boundp propertize #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (replace-query 30 replace 39)) format " %d replace " #1=" %d/%d " " %s+ " #2=" %s/%d " face doom-modeline-face doom-modeline-panel] 7 "Show the match index and total number thereof.\nRequires `anzu', also `evil-anzu' if using `evil-mode' for compatibility with\n`evil-search'."] fboundp visual-replace--preview-is-complete " %s " seq-find #[257 "\300\301\"\207" [overlay-get visual-replace-idx] 4 "\n\n(fn OV)"] overlays-at "%d/%d" overlay-get visual-replace-idx number-to-string doom-modeline-face phi-search--overlays #1# evil-local-mode evil-ex-substitute evil-ex-global-match evil-ex-buffer-match line-beginning-position line-end-position evil-delimited-arguments 2 " %s matches " how-many " - " iedit-occurrences-overlays t iedit-find-current-occurrence-overlay iedit-prev-occurrence #2# sort append nil doom-modeline-themes--overlay-sort "-" symbol-overlay-keywords-alist visual-replace--calling-buffer phi-search--selection evil-ex-active-highlights-alist evil-ex-range evil-ex-argument inhibit-message symbol-overlay-temp-symbol multiple-cursors-mode evil-mc-cursor-list evil-mc-frozen size-indication-mode mode-line-column-line-number-mode-map symbol-overlay-assoc symbol-overlay-get-symbol symbol-overlay-get-list -1 1 "in scope " mc/num-cursors doom-modeline-bar signal wrong-number-of-arguments (count . face) doom-modeline-icon-displayable-p faicon "nf-fa-i_cursor" "" "I" :inherit (:height 1.4 :weight normal) display (raise -0.1) variable-pitch "%d " doom-modeline-spc-face "%I" help-echo "Buffer size\nmouse-1: Display Line and Column Mode Menu" mouse-face doom-modeline-highlight local-map] 17 (#$ . 43080)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist matches doom-modeline-segment--matches] 4)#@22 Display buffer size. (defalias 'doom-modeline-segment--buffer-size #[0 "\205\302\303\304\305 #\211\302\306\304\307 \310\311\312\313\314 & Q\262\207" [size-indication-mode mode-line-column-line-number-mode-map propertize " " face doom-modeline-spc-face "%I" doom-modeline-face help-echo "Buffer size\nmouse-1: Display Line and Column Mode Menu" mouse-face doom-modeline-highlight local-map] 12 (#$ . 47730)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist buffer-size doom-modeline-segment--buffer-size] 4)#@69 Metadata regarding the current file, such as dimensions for images. (defalias 'doom-modeline-segment--media-info #[0 "\301=\205,\302\303!\205\303\304 \305\"\211\203\211A\262\242\202%\306\307\310GD\"\311\312#\266\202\207" [major-mode image-mode fboundp image-size image-get-display-property :pixels signal wrong-number-of-arguments (width . height) format " %dx%d "] 6 (#$ . 48273)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist media-info doom-modeline-segment--media-info] 4) (defvar doom-modeline--bar-active nil) (defvar doom-modeline--bar-inactive nil)#@63 The default bar regulates the height of the mode-line in GUI. (defalias 'doom-modeline--bar #[0 "\203 \204\n \304 ]\305\306#\305\307#\266\310 \203\"\207 \207" [doom-modeline--bar-active doom-modeline--bar-inactive doom-modeline-bar-width doom-modeline-height doom-modeline--font-height doom-modeline--create-bar-image doom-modeline-bar doom-modeline-bar-inactive doom-modeline--active] 6 (#$ . 48878)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--bar speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@40 Refresh mode-line bars on next redraw. (defalias 'doom-modeline-refresh-bars #[0 "\302\211\211\207" [doom-modeline--bar-active doom-modeline--bar-inactive nil] 3 (#$ . 49444)])#@83 compiler-macro for inlining `doom-modeline--hud-cache-p'. (fn CL-WHOLE-ARG CL-X) (defalias 'doom-modeline--hud-cache-p--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block doom-modeline--hud-cache-p (and (memq (type-of cl-x) cl-struct-doom-modeline--hud-cache-tags) t)) nil] 9 (#$ . 49628)]) (byte-code "\300\301\302\303#\300\207" [define-symbol-prop doom-modeline--hud-cache-p compiler-macro doom-modeline--hud-cache-p--cmacro] 4)#@13 (fn CL-X) (defalias 'doom-modeline--hud-cache-p #[257 "\301!>\205 \302\207" [cl-struct-doom-modeline--hud-cache-tags type-of t] 3 (#$ . 50100)]) (byte-code "\300\301\302\303#\300\301\304\305#\306\307\310\301#\300\207" [function-put doom-modeline--hud-cache-p side-effect-free error-free pure t define-symbol-prop doom-modeline--hud-cache cl-deftype-satisfies] 6)#@88 compiler-macro for inlining `doom-modeline--hud-cache-active'. (fn CL-WHOLE-ARG CL-X) (defalias 'doom-modeline--hud-cache-active--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block doom-modeline--hud-cache-active (progn (or (doom-modeline--hud-cache-p cl-x) (signal 'wrong-type-argument (list 'doom-modeline--hud-cache cl-x))) (aref cl-x 1))) nil] 9 (#$ . 50473)]) (byte-code "\300\301\302\303#\300\207" [define-symbol-prop doom-modeline--hud-cache-active compiler-macro doom-modeline--hud-cache-active--cmacro] 4)#@76 Access slot "active" of `doom-modeline--hud-cache' struct CL-X. (fn CL-X) (defalias 'doom-modeline--hud-cache-active #[257 "\301!>\204\302\303\304D\"\210\211\305H\207" [cl-struct-doom-modeline--hud-cache-tags type-of signal wrong-type-argument doom-modeline--hud-cache 1] 5 (#$ . 51029)]) (byte-code "\300\301\302\303#\300\207" [function-put doom-modeline--hud-cache-active side-effect-free t] 4)#@90 compiler-macro for inlining `doom-modeline--hud-cache-inactive'. (fn CL-WHOLE-ARG CL-X) (defalias 'doom-modeline--hud-cache-inactive--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block doom-modeline--hud-cache-inactive (progn (or (doom-modeline--hud-cache-p cl-x) (signal 'wrong-type-argument (list 'doom-modeline--hud-cache cl-x))) (aref cl-x 2))) nil] 9 (#$ . 51437)]) (byte-code "\300\301\302\303#\300\207" [define-symbol-prop doom-modeline--hud-cache-inactive compiler-macro doom-modeline--hud-cache-inactive--cmacro] 4)#@78 Access slot "inactive" of `doom-modeline--hud-cache' struct CL-X. (fn CL-X) (defalias 'doom-modeline--hud-cache-inactive #[257 "\301!>\204\302\303\304D\"\210\211\305H\207" [cl-struct-doom-modeline--hud-cache-tags type-of signal wrong-type-argument doom-modeline--hud-cache 2] 5 (#$ . 52003)]) (byte-code "\300\301\302\303#\300\207" [function-put doom-modeline--hud-cache-inactive side-effect-free t] 4)#@92 compiler-macro for inlining `doom-modeline--hud-cache-top-margin'. (fn CL-WHOLE-ARG CL-X) (defalias 'doom-modeline--hud-cache-top-margin--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block doom-modeline--hud-cache-top-margin (progn (or (doom-modeline--hud-cache-p cl-x) (signal 'wrong-type-argument (list 'doom-modeline--hud-cache cl-x))) (aref cl-x 3))) nil] 9 (#$ . 52417)]) (byte-code "\300\301\302\303#\300\207" [define-symbol-prop doom-modeline--hud-cache-top-margin compiler-macro doom-modeline--hud-cache-top-margin--cmacro] 4)#@80 Access slot "top-margin" of `doom-modeline--hud-cache' struct CL-X. (fn CL-X) (defalias 'doom-modeline--hud-cache-top-margin #[257 "\301!>\204\302\303\304D\"\210\211\305H\207" [cl-struct-doom-modeline--hud-cache-tags type-of signal wrong-type-argument doom-modeline--hud-cache 3] 5 (#$ . 52993)]) (byte-code "\300\301\302\303#\300\207" [function-put doom-modeline--hud-cache-top-margin side-effect-free t] 4)#@95 compiler-macro for inlining `doom-modeline--hud-cache-bottom-margin'. (fn CL-WHOLE-ARG CL-X) (defalias 'doom-modeline--hud-cache-bottom-margin--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block doom-modeline--hud-cache-bottom-margin (progn (or (doom-modeline--hud-cache-p cl-x) (signal 'wrong-type-argument (list 'doom-modeline--hud-cache cl-x))) (aref cl-x 4))) nil] 9 (#$ . 53413)]) (byte-code "\300\301\302\303#\300\207" [define-symbol-prop doom-modeline--hud-cache-bottom-margin compiler-macro doom-modeline--hud-cache-bottom-margin--cmacro] 4)#@83 Access slot "bottom-margin" of `doom-modeline--hud-cache' struct CL-X. (fn CL-X) (defalias 'doom-modeline--hud-cache-bottom-margin #[257 "\301!>\204\302\303\304D\"\210\211\305H\207" [cl-struct-doom-modeline--hud-cache-tags type-of signal wrong-type-argument doom-modeline--hud-cache 4] 5 (#$ . 54004)]) (byte-code "\300\301\302\303#\304\305\306\"\207" [function-put doom-modeline--hud-cache-bottom-margin side-effect-free t defalias copy-doom-modeline--hud-cache copy-sequence] 4)#@133 compiler-macro for inlining `make-doom-modeline--hud-cache'. (fn CL-WHOLE &cl-quote &key ACTIVE INACTIVE TOP-MARGIN BOTTOM-MARGIN) (defalias 'make-doom-modeline--hud-cache--cmacro #[385 "\300\301\"A@\300\302\"A@\300\303\"A@\300\304\"A@\211\203O\211@\305>\2037\211A\204/\306\307@\"\210\211AA\262\202\310>A@\203F\311\262\202\306\312@\"\210\202\210\313\314\315\311 \311    & \207" [plist-member :active :inactive :top-margin :bottom-margin (:active :inactive :top-margin :bottom-margin :allow-other-keys) error "Missing argument for %s" :allow-other-keys nil "Keyword argument %s not one of (:active :inactive :top-margin :bottom-margin)" cl--defsubst-expand (active inactive top-margin bottom-margin) (cl-block make-doom-modeline--hud-cache (record 'doom-modeline--hud-cache active inactive top-margin bottom-margin))] 16 (#$ . 54497)]) (byte-code "\300\301\302\303#\300\207" [define-symbol-prop make-doom-modeline--hud-cache compiler-macro make-doom-modeline--hud-cache--cmacro] 4)#@113 Constructor for objects of type `doom-modeline--hud-cache'. (fn &key ACTIVE INACTIVE TOP-MARGIN BOTTOM-MARGIN) (defalias 'make-doom-modeline--hud-cache #[128 "\300\301\"A@\300\302\"A@\300\303\"A@\300\304\"A@\211\203O\211@\305>\2037\211A\204/\306\307@\"\210\211AA\262\202\310>A@\203F\311\262\202\306\312@\"\210\202\210\313\314%\207" [plist-member :active :inactive :top-margin :bottom-margin (:active :inactive :top-margin :bottom-margin :allow-other-keys) error "Missing argument for %s" :allow-other-keys nil "Keyword argument %s not one of (:active :inactive :top-margin :bottom-margin)" record doom-modeline--hud-cache] 11 (#$ . 55511)]) (byte-code "\300\301\302\303#\304\305\306\307\310\306\311\312\305\303& \207" [function-put make-doom-modeline--hud-cache side-effect-free t cl-struct-define doom-modeline--hud-cache nil cl-structure-object record ((cl-tag-slot) (active) (inactive) (top-margin) (bottom-margin)) cl-struct-doom-modeline--hud-cache-tags] 11)#@75 Powerline's hud segment reimplemented in the style of Doom's bar segment. (defalias 'doom-modeline--hud #[0 "\303 \304 \305 \306 ]\307U\203\307\202\211S_\245\307U\203$\307\202/\307ZS_\245]\310\311\312\"\206A\313\311\312\314\312\311\211\211\211%#\315! >\204P\316\317\312D\"\210\211\320H\203\231\315! >\204e\316\317\312D\"\210\211\321H\203\231\315! >\204{\316\317\312D\"\210\322HU\203\231\315! >\204\222\316\317\312D\"\210\323HU\204\377\315! >\204\250\316\317\312D\"\210\211\320\324\325\326\n   &I\210\315! >\204\307\316\317\312D\"\210\211\321\324\327\326\n   &I\210\315! >\204\346\316\317\312D\"\210\211\322I\210\315! >\204\372\316\317\312D\"\210\211\323I\210\330 \203\315! >\204\316\317\312D\"\210\211\320H\207\315! >\204&\316\317\312D\"\210\211\321H\207" [doom-modeline-height cl-struct-doom-modeline--hud-cache-tags doom-modeline-bar-width window-start window-end buffer-size doom-modeline--font-height 0 window-parameter nil doom-modeline--hud-cache set-window-parameter record type-of signal wrong-type-argument 1 2 3 4 doom-modeline--create-hud-image doom-modeline-bar default doom-modeline-bar-inactive doom-modeline--active] 16 (#$ . 56506)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--hud speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@35 Invalidate all cached hud images. (defalias 'doom-modeline-invalidate-huds #[0 "\300 \211\205&\211@\301!\211\203\211@\302\303\304#\210A\266\202\202 \210A\266\202\202\207" [frame-list window-list set-window-parameter doom-modeline--hud-cache nil] 8 (#$ . 57873)]) (byte-code "\300\301\302\"\210\300\303\304\"\210\300\305\306\"\210\300\307\310\"\210\311\312\313\"\210\311\312\314\"\207" [doom-modeline-add-variable-watcher doom-modeline-height #[1028 "\300=\205\250\205\301 \210\302 \207" [set doom-modeline-refresh-bars doom-modeline-invalidate-huds] 6 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-bar-width #[1028 "\300=\205\250\205\301 \210\302 \207" [set doom-modeline-refresh-bars doom-modeline-invalidate-huds] 6 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-icon #[1028 "\300=\205 \301 \210\302 \207" [set doom-modeline-refresh-bars doom-modeline-invalidate-huds] 6 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-unicode-fallback #[1028 "\300=\205 \301 \210\302 \207" [set doom-modeline-refresh-bars doom-modeline-invalidate-huds] 6 "\n\n(fn SYM VAL OP WHERE)"] add-hook window-configuration-change-hook doom-modeline-refresh-bars doom-modeline-invalidate-huds] 3)#@61 The bar regulates the height of the `doom-modeline' in GUI. (defalias 'doom-modeline-segment--bar #[0 "\306 \205g\203;\307 \310 \311 \312 ]\313U\203\313\202#\211S_\245\313U\203-\313\2028\313ZS_\245]\314\315\316\"\206J\317\315\316\320\316\315\211\211\211%#\321!\n>\204Y\322\323\316D\"\210\211\324H\203\242\321!\n>\204n\322\323\316D\"\210\211\325H\203\242\321!\n>\204\204\322\323\316D\"\210\326HU\203\242\321!\n>\204\233\322\323\316D\"\210\327HU\204\321!\n>\204\261\322\323\316D\"\210\211\324\330\331\332    &I\210\321!\n>\204\320\322\323\316D\"\210\211\325\330\333\332    &I\210\321!\n>\204\357\322\323\316D\"\210\211\326I\210\321!\n>\204\322\323\316D\"\210\211\327I\210\334 \203$\321!\n>\204\322\323\316D\"\210\211\324H\266\207\202`\321!\n>\2043\322\323\316D\"\210\211\325H\266\207\202`\f\203C \204V \312 ]\335\331#\335\333#\266\334 \203_\f\202` \336\337\340\341 #P\207" [doom-modeline-hud doom-modeline-height cl-struct-doom-modeline--hud-cache-tags doom-modeline-bar-width doom-modeline--bar-active doom-modeline--bar-inactive display-graphic-p window-start window-end buffer-size doom-modeline--font-height 0 window-parameter nil doom-modeline--hud-cache set-window-parameter record type-of signal wrong-type-argument 1 2 3 4 doom-modeline--create-hud-image doom-modeline-bar default doom-modeline-bar-inactive doom-modeline--active doom-modeline--create-bar-image propertize " " face doom-modeline-spc-face] 16 (#$ . 59065)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist bar doom-modeline-segment--bar] 4)#@68 Powerline's hud segment reimplemented in the style of bar segment. (defalias 'doom-modeline-segment--hud #[0 "\303 \205;\304 \305 \306 \307 ]\310U\203\310\202\211S_\245\310U\203)\310\2024\310ZS_\245]\311\312\313\"\206F\314\312\313\315\313\312\211\211\211%#\316! >\204U\317\320\313D\"\210\211\321H\203\236\316! >\204j\317\320\313D\"\210\211\322H\203\236\316! >\204\200\317\320\313D\"\210\323HU\203\236\316! >\204\227\317\320\313D\"\210\324HU\204\316! >\204\255\317\320\313D\"\210\211\321\325\326\327\n   &I\210\316! >\204\314\317\320\313D\"\210\211\322\325\330\327\n   &I\210\316! >\204\353\317\320\313D\"\210\211\323I\210\316! >\204\377\317\320\313D\"\210\211\324I\210\331 \203 \316! >\204\317\320\313D\"\210\211\321H\266\207\2024\316! >\204/\317\320\313D\"\210\211\322H\266\207\332\333\334\335 #P\207" [doom-modeline-height cl-struct-doom-modeline--hud-cache-tags doom-modeline-bar-width display-graphic-p window-start window-end buffer-size doom-modeline--font-height 0 window-parameter nil doom-modeline--hud-cache set-window-parameter record type-of signal wrong-type-argument 1 2 3 4 doom-modeline--create-hud-image doom-modeline-bar default doom-modeline-bar-inactive doom-modeline--active propertize " " face doom-modeline-spc-face] 16 (#$ . 60694)]) (byte-code "\300\301\302\303B\"\210\304\305!\204.\306\305\307\"\210\310\311\312\311!\203\313\202+\314 \315\316\305#\210\317!\262\320#\210\313\207" [add-to-list doom-modeline--fn-alist hud doom-modeline-segment--hud fboundp toggle-window-dedicated defalias #[768 "\301!\262:\203\302=\203\303\202!\302\202!\204 \202!\262\304!\2031\305\306\"\210\2026\305\"\210\211\205U\307\310\304!\211\311\267\202M\312\202N\313\202N\314\262p#\210\315 \207" [toggle-window-dedicated-flag window-normalize-window t interactive window-dedicated-p set-window-dedicated-p nil message "Window is %s dedicated to buffer %s" #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (nil 69 t 73)) "no longer" "now strongly" "now" force-mode-line-update] 8 "Toggle whether WINDOW is dedicated to its current buffer.\n\nWINDOW must be a live window and defaults to the selected one.\nIf FLAG is t (interactively, the prefix argument), make the window\n\"strongly\" dedicated to its buffer. FLAG defaults to a non-nil,\nnon-t value, and is passed to `set-window-dedicated-p', which see.\nIf INTERACTIVE is non-nil, print a message describing the dedication\nstatus of WINDOW, after toggling it. Interactively, this argument is\nalways non-nil.\n\nWhen a window is dedicated to its buffer, `display-buffer' will avoid\ndisplaying another buffer in it, if possible. When a window is\nstrongly dedicated to its buffer, changing the buffer shown in the\nwindow will usually signal an error.\n\nYou can control the default of FLAG with\n`toggle-window-dedicated-flag'. Consequently, if you set that\nvariable to t, strong dedication will be used by default and\n\\[universal-argument] will make the window weakly dedicated.\n\nSee the info node `(elisp)Dedicated Windows' for more details.\n\n(fn &optional WINDOW FLAG INTERACTIVE)" "i\nP\np"] defvar-1 mode-line-window-dedicated-keymap boundp nil make-sparse-keymap define-key [mode-line mouse-1] purecopy "Keymap for what is displayed by `mode-line-window-dedicated'."] 7)#@31 window-state modeline segment (defalias 'doom-modeline-segment--window-state #[0 "\301 \203 \302\202\n\303\304 \305=\203(\306\307\310\311\312\313\314\315\316 &\"\317\320\321\322\323&\207\304 \203D\306\307\310\311\312\324\325\326\316 &\"\317\327\321\322\323&\207\330\207" [mode-line-window-dedicated-keymap doom-modeline--active doom-modeline-emphasis doom-modeline window-dedicated-p t propertize format " %s " doom-modeline-icon mdicon "nf-md-pin" "⍑" "D" :face help-echo "Window strongly dedicated to its buffer\nmouse-1: Toggle" local-map mouse-face mode-line-highlight "nf-md-pin_outline" "⊤" "d" "Window dedicated to its buffer\nmouse-1: Toggle" ""] 11 (#$ . 64085)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist window-state doom-modeline-segment--window-state] 4)#@47 Override window number in original mode-line. (defalias 'doom-modeline-override-window-number #[0 "\301\300!\203,\203,\302\303\304\305\306\303!\"\"\210\307\310\311\312#\210\307\313\311\312#\210\307\314\311\312#\210\307\315\311\312#\207\316\310\312\"\210\316\313\312\"\210\316\314\312\"\210\316\315\312\"\207" [doom-modeline-mode boundp set-default mode-line-format assq-delete-all ace-window-display-mode default-value advice-add window-numbering-install-mode-line :override ignore window-numbering-clear-mode-line winum--install-mode-line winum--clear-mode-line advice-remove] 6 (#$ . 64906)]) (byte-code "\300\301\302\"\210\300\303\302\"\207" [add-hook ace-window-display-mode-hook doom-modeline-override-window-number doom-modeline-mode-hook] 3)#@56 Return a nice unicode representation of NUM. (fn NUM) (defalias 'doom-modeline--unicode-number #[257 "\211\204\300\207\211\301\230\203\302\207\211\303\230\203\304\207\211\305\230\203\306\207\211\307\230\203&\310\207\211\311\230\203.\312\207\211\313\230\2036\314\207\211\315\230\203>\316\207\211\317\230\203F\320\207\211\321\230\203N\322\207\211\323\230\203V\324\207\207" ["" "1" "➊" "2" "➋" "3" "➌" "4" "➍" "5" "➎" "6" "➏" "7" "➐" "8" "➑" "9" "➒" "10" "➓"] 3 (#$ . 65663)])#@28 The current window number. (defalias 'doom-modeline-segment--window-number #[0 "\305\300!\203\203\306 \210\307\310 \311\"\2026\305\301!\203& \203&\312\313 \2026\305\303!\2035 \2035\314 \2026\315\316\317\"\205\\\316\320\321\322 \"\323\"\205\\\324\325\326\f\203U\327!\202V\"\330\331\332!#\207" [ace-window-display-mode winum-mode winum-auto-setup-mode-line window-numbering-mode doom-modeline-unicode-number boundp aw-update window-parameter selected-window ace-window-path nil winum-get-number-string window-numbering-get-number-string "" length> 0 cl-mapcan #[257 "\301\302!\203\f\302!\206\303\304\"\305\304\306\300!\205\"\230?\205#\307\310\"\207" [tooltip-frame-parameters fboundp frame-parent frame-parameter name alist-get boundp window-list never] 6 "\n\n(fn FRAME)"] visible-frame-list 1 propertize format " %s " doom-modeline--unicode-number face doom-modeline-face doom-modeline-buffer-major-mode] 6 (#$ . 66178)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist window-number doom-modeline-segment--window-number] 4) (defvar doom-modeline-project-map (byte-code "\304>\203\305\301!\203 \203\n\207\306>\205/\307\310!\205/\311 \312\313\305\303!\205* #\210\211\262\207" [doom-modeline-project-detection projectile-mode projectile-mode-map menu-bar-project-item (auto projectile) boundp (auto project) fboundp project-current make-sparse-keymap define-key [mode-line down-mouse-1]] 6)) (defvar doom-modeline--project-name nil nil) (make-variable-buffer-local 'doom-modeline--project-name)#@23 Get the project name. (defalias 'doom-modeline-project-name #[0 "\206I \303>\203\304\302!\203\n\203\305 \2020 \306>\2050\307\310!\2050\310 \211\205.\311!\262\211\203D\211\211\312\230\262\204D\313\314\"\202E\312\262\211\207" [doom-modeline--project-name doom-modeline-project-detection projectile-mode (auto projectile) boundp projectile-project-name (auto project) fboundp project-current project-name "" format " [%s] "] 4 (#$ . 67745)]) (doom-modeline-add-variable-watcher 'doom-modeline-project-detection #[1028 "\303=\205)\304 \211\205'\211@r\211q\210\305\n\203\306\307\211\"\210)A\266\202\202\n\262\207" [doom-modeline-project-detection doom-modeline--project-name buffer-file-name set buffer-list nil revert-buffer t] 9 "\n\n(fn SYM VAL OP WHERE)"])#@31 The current perspective name. (defalias 'doom-modeline-segment--project-name #[0 "\205\302\303!\205\304\300 \305\306\300!\307\310\311\312\313 & \207" [doom-modeline-project-name doom-modeline-project-map doom-modeline--segment-visible project-name propertize face doom-modeline-face mouse-face mode-line-highlight help-echo "mouse-1: Project menu" local-map] 10 (#$ . 68538)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist project-name doom-modeline-segment--project-name] 4)#@107 The current workspace name. Requires `eyebrowse-mode' to be enabled or `tab-bar-mode' tabs to be created. (defalias 'doom-modeline-segment--workspace-name #[0 "\205\322 ?\205\322\304\302!\203I\n\203I\305\306\307!\310\"\203I\311\302 \"\306\312!\211\2050\313\314\306\307!\"8\211\205D\305\315\"\203A\211\266\202\202s\316!\266\202\202s\317\320!\205s\305\321\322\323\"\310\"\205s\324 \325 \326\327\"\326\330\"\203o\211\266\204\202sT\266\204\211\205\272\331 \304\302!\203\233\n\203\233\305\306\307!\310\"\203\233\332\333\334#\210\332\335\336#\210\202\267\317\320!\203\267\305\321\322\323\"\310\"\203\267\332\337\340#\210\332\341\342#\210\211\262\211\205\320\343\344\345\"\346\347\300!\350\351\352\353\354 & \266\202\207" [doom-modeline-workspace-name doom-modeline--limited-width-p eyebrowse-mode mode-line-misc-info boundp length> eyebrowse--get window-configs 1 assq-delete-all current-slot 2 assoc 0 int-to-string fboundp tab-bar-mode frame-parameter nil tabs tab-bar--current-tab tab-bar--current-tab-index alist-get explicit-name name make-sparse-keymap define-key [mode-line mouse-1] eyebrowse-switch-to-window-config [mode-line mouse-2] #[0 "\300\301!\207" [describe-function eyebrowse-mode] 2 nil nil] [mode-line mouse-1] tab-bar-switch-to-tab [mode-line mouse-2] #[0 "\300\301!\207" [describe-function tab-bar-mode] 2 nil nil] propertize format " %s " face doom-modeline-face mouse-face mode-line-highlight help-echo "mouse-1: Switch workspace\nmouse-2: Show help for minor mode" local-map] 12 (#$ . 69053)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist workspace-name doom-modeline-segment--workspace-name] 4) (defvar doom-modeline--persp-name nil nil) (make-variable-buffer-local 'doom-modeline--persp-name)#@53 Update perspective name in mode-line. (fn &rest _) (defalias 'doom-modeline-update-persp-name #[128 "\205|\306\301!\205| \205|\307\310!\205|\307\311!\205|\311 \310!\203.\312p\"\204.\313\202/\300\314\315\316\317\320\321\322\323BB&\n\204H \230?\205z\324\325\f\205X\325\324\326\327 \330\331%P\325\326#P\332\333\334\335\336\337 \340\341\342#\210\340\343\344#\210\211\262&\324Q\266\204\211\207" [doom-modeline-persp-name persp-mode doom-modeline-display-default-persp-name persp-nil-name doom-modeline-persp-icon doom-modeline--persp-name boundp fboundp safe-persp-name get-current-persp persp-contain-buffer-p doom-modeline-persp-buffer-not-in-persp doom-modeline-icon octicon "nf-oct-repo" "đŸ–ŋ" "#" :face :inherit (:slant normal) " " propertize face doom-modeline-spc-face display ((space :relative-width 0.5)) help-echo "mouse-1: Switch perspective\nmouse-2: Show help for minor mode" mouse-face doom-modeline-highlight local-map make-sparse-keymap define-key [mode-line mouse-1] persp-switch [mode-line mouse-2] #[0 "\300\301!\207" [describe-function persp-mode] 2 nil nil]] 18 (#$ . 70838)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\210\300\305\302\"\210\306\307\310\302#\207" [add-hook buffer-list-update-hook doom-modeline-update-persp-name find-file-hook persp-activated-functions persp-renamed-functions advice-add lv-message :after] 4)#@31 The current perspective name. (defalias 'doom-modeline-segment--persp-name #[0 "\301\302!\205\207" [doom-modeline--persp-name doom-modeline--segment-visible persp-name] 2 (#$ . 72238)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist persp-name doom-modeline-segment--persp-name] 4)#@126 Mode line construct for miscellaneous information. By default, this shows the information specified by `global-mode-string'. (defalias 'doom-modeline-segment--misc-info #[0 "\204\n\302\303!\205\304\305 !!\207" [doom-modeline-display-misc-in-all-mode-lines mode-line-misc-info doom-modeline--segment-visible misc-info doom-modeline-display-text format-mode-line] 3 (#$ . 72556)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist misc-info doom-modeline-segment--misc-info] 4)#@83 The buffer position information. Respects `doom-modeline-enable-buffer-position'. (defalias 'doom-modeline-segment--buffer-position #[0 "\205\302\306\307!\310\311\312\313 #\310\314\312\313 #\315 \316\317\320\321\302\322\323\324\n@#E\325BB\320\321\303\322\323\324 @#EDE\304\f\205=\326\327\330d!\"DD\312\331\332\333\334\335\n\257\n\336D\337\305!\203d \203d\340  Q\202\252\337\341!\203y!\203y\342  Q\202\252\337\343!\203\224#\203\224\344,\345\346 !) Q\202\252\337\347!\203\251'\203\251\350  Q\202\252\351D\352\316\353\312 \331\332\333\334\335\257\n DD\257\266\205\207" [doom-modeline-enable-buffer-position mode-line-column-line-number-mode-map doom-modeline-position-column-line-format doom-modeline-position-column-format doom-modeline-total-line-number nyan-mode doom-modeline--segment-visible buffer-position propertize " " face doom-modeline-spc-face " " doom-modeline-face :propertize line-number-mode column-number-mode doom-modeline-column-zero-based string-replace "%c" "%C" (doom-modeline-position-line-format) format "/%d" line-number-at-pos help-echo "Buffer percentage\nmouse-1: Display Line and Column Mode Menu" mouse-face doom-modeline-highlight local-map (or line-number-mode column-number-mode) boundp nyan-create poke-line-mode poke-line-create mlscroll-mode nil format-mode-line mlscroll-mode-line sml-modeline-mode sml-modeline-create #1="" doom-modeline-percent-position (#1# doom-modeline-percent-position) mlscroll-right-align] 20 (#$ . 73065)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist buffer-position doom-modeline-segment--buffer-position] 4)#@71 The party parrot animated icon. Requires `parrot-mode' to be enabled. (defalias 'doom-modeline-segment--parrot #[0 "\301\302!\205\303\300!\205\205\304\305\306\307 #\310 \304\311\306\307 #Q\207" [parrot-mode doom-modeline--segment-visible parrot boundp propertize " " face doom-modeline-spc-face parrot-create " "] 6 (#$ . 74715)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist parrot doom-modeline-segment--parrot] 4)#@144 Display the model icon with FACE and HELP-ECHO. TEXT is alternative if icon is not available. (fn TEXT FACE HELP-ECHO &optional ICON UNICODE) (defalias 'doom-modeline--modal-icon #[1283 "\302\303\304\205 \203\206\305 \203\206\306 \307\310 !&\311#\207" [doom-modeline-modal-icon doom-modeline-modal-modern-icon propertize doom-modeline-icon mdicon "nf-md-record" "●" :face doom-modeline-face help-echo] 14 (#$ . 75175)])#@61 The current evil state. Requires `evil-mode' to be enabled. (defalias 'doom-modeline--evil #[0 "\302\300!\205v\205v\303 \203\304\202J\305 \203\306\202J\307 \203%\310\202J\311 \203.\312\202J\313 \2037\314\202J\315 \203@\316\202J\317 \203I\320\202J\321\322\236A\323\236A\324\236A\325\326 \327\330#\211;\203e\211\202g\211 \262\326 \331\330#%\266\203\262\207" [evil-local-mode evil-state boundp evil-normal-state-p ((face . doom-modeline-evil-normal-state) (icon . "nf-md-alpha_n_circle") (unicode . "🅝")) evil-emacs-state-p ((face . doom-modeline-evil-emacs-state) (icon . "nf-md-alpha_e_circle") (unicode . "🅔")) evil-insert-state-p ((face . doom-modeline-evil-insert-state) (icon . "nf-md-alpha_i_circle") (unicode . "🅘")) evil-motion-state-p ((face . doom-modeline-evil-motion-state) (icon . "nf-md-alpha_m_circle") (unicode . "🅜")) evil-visual-state-p ((face . doom-modeline-evil-visual-state) (icon . "nf-md-alpha_v_circle") (unicode . "đŸ…Ĩ")) evil-operator-state-p ((face . doom-modeline-evil-operator-state) (icon . "nf-md-alpha_o_circle") (unicode . "🅞")) evil-replace-state-p ((face . doom-modeline-evil-replace-state) (icon . "nf-md-alpha_r_circle") (unicode . "🅡")) ((face . doom-modeline-evil-user-state) (icon . "nf-md-alpha_u_circle") (unicode . "🅤")) face icon unicode doom-modeline--modal-icon evil-state-property :tag t :name] 11 (#$ . 75620)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--evil speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@75 The current overwrite state which is enabled by command `overwrite-mode'. (defalias 'doom-modeline--overwrite #[0 "\302\300!\205\205\302\301!\205 ?\205\303\304\305\306\307\310%\207" [overwrite-mode evil-local-mode boundp doom-modeline--modal-icon "" doom-modeline-overwrite "Overwrite mode" "nf-md-marker" "✍"] 6 (#$ . 77180)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--overwrite speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@67 The current god state which is enabled by the command `god-mode'. (defalias 'doom-modeline--god #[0 "\301\300!\205\205\302\303\304\305\306\307%\207" [god-local-mode boundp doom-modeline--modal-icon "" doom-modeline-god "God mode" "nf-md-account_circle" "🙏"] 6 (#$ . 77677)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--god speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@79 The current ryo-modal state which is enabled by the command `ryo-modal-mode'. (defalias 'doom-modeline--ryo #[0 "\301\300!\205\205\302\303\304\305\306\307%\207" [ryo-modal-mode boundp doom-modeline--modal-icon "" doom-modeline-ryo "Ryo modal" "nf-md-star_circle" "âœĒ"] 6 (#$ . 78112)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--ryo speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@35 The current `xah-fly-keys' state. (defalias 'doom-modeline--xah-fly-keys #[0 "\302\300!\205\205 \203\303\304\305\306\307\310%\207\303\311\312\313\314\310%\207" [xah-fly-keys xah-fly-insert-state-p boundp doom-modeline--modal-icon "" doom-modeline-fly-insert-state "Xah-fly insert mode" "nf-md-airplane_edit" "🛧" "" doom-modeline-fly-normal-state "Xah-fly command mode" "nf-md-airplane_cog"] 6 (#$ . 78556)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--xah-fly-keys speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@61 The current Boon state. Requires `boon-mode' to be enabled. (defalias 'doom-modeline--boon #[0 "\305\300!\2053\2053\306\307 \203\310\202.\n\203\311\202. \203%\312\202.\f\203-\313\202.\313\314 \315\316%\207" [boon-local-mode boon-command-state boon-insert-state boon-special-state boon-off-state boundp doom-modeline--modal-icon boon-state-string doom-modeline-boon-command-state doom-modeline-boon-insert-state doom-modeline-boon-special-state doom-modeline-boon-off-state boon-modeline-string "nf-md-coffee" "đŸĩ"] 6 (#$ . 79138)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--boon speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@61 The current Meow state. Requires `meow-mode' to be enabled. (defalias 'doom-modeline--meow #[0 "\303\300!\205@\205@ \304\267\202$\305\202%\306\202%\307\202%\310\202%\311\202%\312\313\236A\314\236A\315\236A\316\317\n!\320 !%\266\203\262\207" [meow-mode meow--current-state meow--indicator boundp #s(hash-table size 5 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (normal 16 insert 20 beacon 24 motion 28 keypad 32)) ((face . doom-modeline-meow-normal-state) (icon . "nf-md-alpha_n_circle") (unicode . "🅝")) ((face . doom-modeline-meow-insert-state) (icon . "nf-md-alpha_i_circle") (unicode . "🅘")) ((face . doom-modeline-meow-beacon-state) (icon . "nf-md-alpha_b_circle") (unicode . "🅑")) ((face . doom-modeline-meow-motion-state) (icon . "nf-md-alpha_m_circle") (unicode . "🅜")) ((face . doom-modeline-meow-keypad-state) (icon . "nf-md-alpha_k_circle") (unicode . "🅚")) ((face . doom-modeline-meow-normal-state) (icon . "nf-md-alpha_n_circle") (unicode . "🅝")) face icon unicode doom-modeline--modal-icon substring-no-properties symbol-name] 10 (#$ . 79836)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--meow speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@102 Displays modal editing states. Including `evil', `overwrite', `god', `ryo' and `xha-fly-kyes', etc. (defalias 'doom-modeline-segment--modals #[0 "\205\371\306\301!\205z \205z\307 \203\310\202N\311 \203 \312\202N\313 \203)\314\202N\315 \2032\316\202N\317 \203;\320\202N\321 \203D\322\202N\323 \203M\324\202N\325\326\236A\327\236A\330\236A\331\332\n\333\334#\211;\203i\211\202k\211 \262\332\n\335\334#%\266\203\262\306\303!\205\226 \205\226\306\301!\205\213 ?\205\226\331\336\337\340\341\342%\306\304!\205\247\f\205\247\331\343\344\345\346\347%\306\305!\205\270 \205\270\331\350\351\352\353\354%\306\355!\205\331-\205\331@\203\322\331\356\357\360\361\362%\202\331\331\363\364\365\366\362%\306\367!\2057\205\331\370 A\203\360\371\202\fB\203\371\372\202\fC\203\373\202\fD\203 \374\202\f\374\375 \376\377%\201E \201F\201G\326\201H \201I\201J%\204E\204E\204E\204E\204E\204E\205Q\201F\201G\326\201H #\211 \205w  \204u\204u\204u\204u\204u\205vP \205\230  \204\226\204\226\204\226\204\226\205\227P \205\265  \204\263\204\263\204\263\205\264P \205\316  \204\313\204\313\205\315P \205\342  \204\337\205\341P \205\361  \205\360P \260 \266\211\207" [doom-modeline-modal evil-local-mode evil-state overwrite-mode god-local-mode ryo-modal-mode boundp evil-normal-state-p ((face . doom-modeline-evil-normal-state) (icon . "nf-md-alpha_n_circle") (unicode . "🅝")) evil-emacs-state-p ((face . doom-modeline-evil-emacs-state) (icon . "nf-md-alpha_e_circle") (unicode . "🅔")) evil-insert-state-p ((face . doom-modeline-evil-insert-state) (icon . "nf-md-alpha_i_circle") (unicode . "🅘")) evil-motion-state-p ((face . doom-modeline-evil-motion-state) (icon . "nf-md-alpha_m_circle") (unicode . "🅜")) evil-visual-state-p ((face . doom-modeline-evil-visual-state) (icon . "nf-md-alpha_v_circle") (unicode . "đŸ…Ĩ")) evil-operator-state-p ((face . doom-modeline-evil-operator-state) (icon . "nf-md-alpha_o_circle") (unicode . "🅞")) evil-replace-state-p ((face . doom-modeline-evil-replace-state) (icon . "nf-md-alpha_r_circle") (unicode . "🅡")) ((face . doom-modeline-evil-user-state) (icon . "nf-md-alpha_u_circle") (unicode . "🅤")) face icon unicode doom-modeline--modal-icon evil-state-property :tag t :name "" doom-modeline-overwrite "Overwrite mode" "nf-md-marker" "✍" "" doom-modeline-god "God mode" "nf-md-account_circle" "🙏" "" doom-modeline-ryo "Ryo modal" "nf-md-star_circle" "âœĒ" xah-fly-keys "" doom-modeline-fly-insert-state "Xah-fly insert mode" "nf-md-airplane_edit" "🛧" "" doom-modeline-fly-normal-state "Xah-fly command mode" "nf-md-airplane_cog" boon-local-mode boon-state-string doom-modeline-boon-command-state doom-modeline-boon-insert-state doom-modeline-boon-special-state doom-modeline-boon-off-state boon-modeline-string "nf-md-coffee" "đŸĩ" xah-fly-insert-state-p boon-command-state boon-insert-state boon-special-state boon-off-state #[0 "\303\300!\205@\205@ \304\267\202$\305\202%\306\202%\307\202%\310\202%\311\202%\312\313\236A\314\236A\315\236A\316\317\n!\320 !%\266\203\262\207" [meow-mode meow--current-state meow--indicator boundp #s(hash-table size 5 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (normal 16 insert 20 beacon 24 motion 28 keypad 32)) ((face . doom-modeline-meow-normal-state) (icon . "nf-md-alpha_n_circle") (unicode . "🅝")) ((face . doom-modeline-meow-insert-state) (icon . "nf-md-alpha_i_circle") (unicode . "🅘")) ((face . doom-modeline-meow-beacon-state) (icon . "nf-md-alpha_b_circle") (unicode . "🅑")) ((face . doom-modeline-meow-motion-state) (icon . "nf-md-alpha_m_circle") (unicode . "🅜")) ((face . doom-modeline-meow-keypad-state) (icon . "nf-md-alpha_k_circle") (unicode . "🅚")) ((face . doom-modeline-meow-normal-state) (icon . "nf-md-alpha_n_circle") (unicode . "🅝")) face icon unicode doom-modeline--modal-icon substring-no-properties symbol-name] 10 "The current Meow state. Requires `meow-mode' to be enabled."] propertize " " doom-modeline-spc-face display ((space :relative-width 0.5))] 18 (#$ . 81099)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist modals doom-modeline-segment--modals] 4) (defvar doom-modeline--objed-active nil)#@77 Update `objed' status, inactive when RESET is true. (fn _ &optional RESET) (defalias 'doom-modeline-update-objed #[513 "\211?\211\207" [doom-modeline--objed-active] 4 (#$ . 85477)]) (byte-code "\301\211\207" [objed-modeline-setup-func doom-modeline-update-objed] 2)#@30 objed-state modeline segment (defalias 'doom-modeline-segment--objed-state #[0 "\205$\303 \205$\304\305\306\307 !\310\307\n!\311H!#\312\313\314\305\315\307 !\307\n!#%\207" [doom-modeline--objed-active objed--object objed--obj-state doom-modeline--active propertize format " %s(%s) " symbol-name char-to-string 0 face doom-modeline-evil-emacs-state help-echo "Objed object: %s (%s)"] 10 (#$ . 85751)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist objed-state doom-modeline-segment--objed-state] 4)#@27 The current input method. (defalias 'doom-modeline-segment--input-method #[0 "\203 \202&\306\302!\203%\n\203%\306\303!\203% \203%\307\310\f \"8\202&\311\211\2050\312\313\314\315 #\211\205l\211\312\314\316\306\317!\203\\\203\\\320\232\203\\\321 \203X\322 \204X\323\202]\324\202]\323!\325\326\327Q\330\331\332& Q\207" [current-input-method current-input-method-title evil-local-mode evil-input-method default-input-method input-method-alist boundp 3 assoc nil propertize " " face doom-modeline-spc-face doom-modeline-face rime-mode "rime" rime--should-enable-p rime--should-inline-ascii-p doom-modeline-input-method doom-modeline-input-method-alt help-echo "Current input method: " "\nmouse-2: Disable input method\nmouse-3: Describe current input method" mouse-face doom-modeline-highlight local-map mode-line-input-method-map] 13 (#$ . 86285)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist input-method doom-modeline-segment--input-method] 4)#@41 The topic and nodes in the Info buffer. (defalias 'doom-modeline-segment--info-nodes #[0 "\303\304;\203\305\306\307\310\311!!#\202\312\313\"\314\315\316!#\317 \2053\304\305\306\307 #\314\315\320!\321\322\323\324\325\n& R\207" [Info-current-file Info-current-node Info-mode-line-node-keymap " (" propertize replace-regexp-in-string "%" "%%" file-name-sans-extension file-name-nondirectory format "*%S*" face doom-modeline-face doom-modeline-info ") " doom-modeline-buffer-path help-echo "mouse-1: scroll forward, mouse-3: scroll back" mouse-face doom-modeline-highlight local-map] 13 (#$ . 87288)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist info-nodes doom-modeline-segment--info-nodes] 4)#@68 Display REPL icon (or TEXT in terminal) with FACE. (fn TEXT FACE) (defalias 'doom-modeline-repl-icon #[514 "\300\301\302\303\304&\207" [doom-modeline-icon faicon "nf-fa-terminal" "$" :face] 9 (#$ . 88022)]) (defvar doom-modeline--cider nil)#@26 Update cider repl state. (defalias 'doom-modeline-update-cider #[0 "\301 \211\203\n\302\202 \303\304\305\211\"\211\205\306\307\"\310\311\"\312\313\203+\314\315\"\202,\316\317\320\321\322 \f\203?\323\324\325#\210\202E\323\326\327#\210\211\262&\266\205\211\207" [doom-modeline--cider cider-connected-p doom-modeline-repl-success doom-modeline-repl-warning cider-current-repl nil cider--connection-info t doom-modeline-repl-icon "REPL" propertize help-echo format "CIDER Connected %s\nmouse-2: CIDER quit" "CIDER Disconnected\nmouse-1: CIDER jack-in" mouse-face doom-modeline-highlight local-map make-sparse-keymap define-key [mode-line mouse-2] cider-quit [mode-line mouse-1] cider-jack-in] 17 (#$ . 88273)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\207" [add-hook cider-connected-hook doom-modeline-update-cider cider-disconnected-hook cider-mode-hook] 3)#@17 The REPL state. (defalias 'doom-modeline-segment--repl #[0 "\205%\303\301!\205 \205\n\211\205\304\305\306\307 #\211\205#\211\310!Q\266\202\207" [doom-modeline-repl cider-mode doom-modeline--cider boundp propertize " " face doom-modeline-spc-face doom-modeline-display-icon] 5 (#$ . 89176)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist repl doom-modeline-segment--repl] 4)#@67 Display LSP icon (or TEXT in terminal) with FACE. (fn TEXT FACE) (defalias 'doom-modeline-lsp-icon #[514 "\203\301\302\303\304\305&\207\306\307#\207" [doom-modeline-lsp-icon doom-modeline-icon octicon "nf-oct-rocket" "🚀" :face propertize face] 9 (#$ . 89594)]) (defvar doom-modeline--lsp nil nil) (make-variable-buffer-local 'doom-modeline--lsp)#@40 Update `lsp-mode' state. (fn &rest _) (defalias 'doom-modeline-update-lsp #[128 "\301 \211\203\n\302\202 \303\304\305\"\306\307\203)\310\311\312\"\313\314\315#\266\202\316Q\202*\317\320\321\322\323 \n\203O\324\325\326#\210\324\327\330#\210\324\331\332#\210\324\333\334#\210\202U\324\335\336#\210\211\262&\266\203\211\207" [doom-modeline--lsp lsp-workspaces doom-modeline-lsp-success doom-modeline-lsp-warning doom-modeline-lsp-icon "LSP" propertize help-echo "LSP connected " mapcar #[257 "\300\301\302!\"\207" [format "[%s]\n" lsp--workspace-print] 5 "\n\n(fn W)"] nil mapconcat identity "C-mouse-1: Switch to another workspace folder\nmouse-1: Describe current session\nmouse-2: Quit server\nmouse-3: Reconnect to server" "LSP Disconnected\nmouse-1: Reload to start server" mouse-face doom-modeline-highlight local-map make-sparse-keymap define-key [mode-line C-mouse-1] lsp-workspace-folders-open [mode-line mouse-1] lsp-describe-session [mode-line mouse-2] lsp-workspace-shutdown [mode-line mouse-3] lsp-workspace-restart [mode-line mouse-1] #[0 "\3001\n\301\302\211\"0\207\210\303\207" [(error) revert-buffer t nil] 3 nil nil]] 16 (#$ . 89958)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\210\300\305\302\"\210\300\306\302\"\207" [add-hook lsp-before-initialize-hook doom-modeline-update-lsp lsp-after-initialize-hook lsp-after-uninitialized-functions lsp-before-open-hook lsp-after-open-hook] 3)#@61 Get count of pending eglot requests to SERVER. (fn SERVER) (defalias 'doom-modeline--eglot-pending-count #[257 "\300\301!\203\n\301!\207\302\303!!\207" [fboundp jsonrpc-continuation-count hash-table-count jsonrpc--request-continuations] 4 (#$ . 91410)]) (defvar doom-modeline--eglot nil nil) (make-variable-buffer-local 'doom-modeline--eglot)#@21 Update eglot state. (defalias 'doom-modeline-update-eglot #[0 "\304 \205\305 \211\205\306!\205\307!\205\310!\211\203$\311\202>\2035\211\312V\262\2035\313\202>\203=\314\202>\313\205E\315!\316\317\"\206X\203W\320!\206X\321\203d\322!\206e\321\323\"\324\325\326\327\f$\330\331\332\333 \334\335 #\210\334\336\n#\210\211\262&\266\211\211\207" [eglot-menu-string eglot-menu eglot-server-menu doom-modeline--eglot eglot-managed-p eglot-current-server eglot-project-nickname doom-modeline--eglot-pending-count jsonrpc-last-error doom-modeline-lsp-error 0 doom-modeline-lsp-warning doom-modeline-lsp-success eglot--server-info plist-get :name jsonrpc-name "" eglot--major-modes doom-modeline-lsp-icon propertize help-echo format "Eglot connected [%s]\n%s %s\nmouse-1: Display minor mode menu\nmouse-3: LSP server control menu" mouse-face doom-modeline-highlight local-map make-sparse-keymap define-key [mode-line mouse-1] [mode-line mouse-3]] 21 (#$ . 91762)]) (add-hook 'eglot-managed-mode-hook 'doom-modeline-update-eglot) (defvar doom-modeline--tags nil nil) (make-variable-buffer-local 'doom-modeline--tags)#@20 Update tags state. (defalias 'doom-modeline-update-tags #[0 "\301\302\303\304\"\305\306\307\310\311\312\313\314\"&\211\207" [doom-modeline--tags propertize doom-modeline-lsp-icon "Tags" doom-modeline-lsp-success help-echo "Tags: Citre mode\nmouse-1: Toggle citre mode" mouse-face doom-modeline-highlight local-map make-mode-line-mouse-map mouse-1 citre-mode] 10 (#$ . 92922)]) (add-hook 'citre-mode-hook 'doom-modeline-update-tags)#@18 Update lsp icon. (defalias 'doom-modeline-update-lsp-icon #[0 "\303\300!\203 \203 \304 \207\303\301!\203 \203\305 \207\303\302!\205&\n\205&\306 \207" [lsp-mode eglot--managed-mode citre-mode boundp doom-modeline-update-lsp doom-modeline-update-eglot doom-modeline-update-tags] 2 (#$ . 93361)]) (byte-code "\300\301\302\"\210\300\303\304\"\210\300\305\306\"\207" [doom-modeline-add-variable-watcher doom-modeline-lsp-icon #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [doom-modeline-lsp-icon set buffer-list doom-modeline-update-lsp-icon] 7 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-icon #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [doom-modeline-icon set buffer-list doom-modeline-update-lsp-icon] 7 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-unicode-fallback #[1028 "\301=\205!\302 \211\205\211@r\211q\210\303 )\210A\266\202\202\n\262\207" [doom-modeline-unicode-fallback set buffer-list doom-modeline-update-lsp-icon] 7 "\n\n(fn SYM VAL OP WHERE)"]] 3)#@23 The LSP server state. (defalias 'doom-modeline-segment--lsp #[0 "\205B\306\301!\203 \203\n\202,\306\303!\203 \203 \f\202,\306\305!\205, \205,\f\211\2056\307\310\311\312 #\211\205@\211\313!Q\266\202\207" [doom-modeline-lsp lsp-mode doom-modeline--lsp eglot--managed-mode doom-modeline--eglot citre-mode boundp propertize " " face doom-modeline-spc-face doom-modeline-display-icon doom-modeline--tags] 5 (#$ . 94430)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist lsp doom-modeline-segment--lsp] 4)#@29 Override `eglot' mode-line. (defalias 'doom-modeline-override-eglot #[0 "\203\303\301!\203 \203\304\305\n\236\n\"\211\207\306\302\307\"\207" [doom-modeline-lsp doom-modeline-mode mode-line-misc-info boundp delq eglot--managed-mode add-to-list (eglot--managed-mode (" [" eglot--mode-line-format "] "))] 3 (#$ . 94979)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\304\305\306\"\207" [add-hook eglot-managed-mode-hook doom-modeline-override-eglot doom-modeline-mode-hook doom-modeline-add-variable-watcher doom-modeline-battery #[1028 "\301=\205\n\302 \207" [doom-modeline-lsp set doom-modeline-override-eglot] 6 "\n\n(fn SYM VAL OP WHERE)"]] 3) (defvar doom-modeline--github-notification-number 0)#@160 Hooks before fetching GitHub notifications. Example: (add-hook \='doom-modeline-before-github-fetch-notification-hook #\='auth-source-pass-enable) (defvar doom-modeline-before-github-fetch-notification-hook nil (#$ . 95699))#@44 Hooks after fetching GitHub notifications. (defvar doom-modeline-after-github-fetch-notification-hook nil (#$ . 95941))#@70 Fetch GitHub notifications. It requires `async' and `ghub' packages. (defalias 'doom-modeline--github-fetch-notifications #[0 "\205\301\302\303\304#\205\305\306\303\307\310!\311BBB\312\"\207" [doom-modeline-github require async nil t async-start lambda async-inject-variables "\\`\\(load-path\\|auth-sources\\|doom-modeline-before-github-fetch-notification-hook\\)\\'" ((run-hooks 'doom-modeline-before-github-fetch-notification-hook) (when (require 'ghub nil t) (with-timeout (10) (ignore-errors (when-let* ((host (alist-get 'github ghub-default-host-alist)) (username (ghub--username host)) (token (or (ghub--token host username 'forge t) (ghub--token host username 'ghub t)))) (ghub-get "/notifications" '((notifications . t)) :host host :username username :auth token :unpaginate t :noerror t)))))) #[257 "\301\302!\210\211G\303\304!\207" [doom-modeline--github-notification-number message "" run-hooks doom-modeline-after-github-fetch-notification-hook] 3 "\n\n(fn RESULT)"]] 5 (#$ . 96066)]) (defvar doom-modeline--github-timer nil)#@43 Start/Stop the timer for GitHub fetching. (defalias 'doom-modeline-github-timer #[0 "\303!\203\n\304!\210 \205\305\306\n\307#\211\207" [doom-modeline--github-timer doom-modeline-github doom-modeline-github-interval timerp cancel-timer run-with-idle-timer 30 doom-modeline--github-fetch-notifications] 4 (#$ . 97116)]) (byte-code "\300\301\302\"\210\303 \207" [doom-modeline-add-variable-watcher doom-modeline-github #[1028 "\301=\205\n\302 \207" [doom-modeline-github set doom-modeline-github-timer] 6 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-github-timer] 3)#@27 The GitHub notifications. (defalias 'doom-modeline-segment--github #[0 "\205f\302\303!\205f \247\205f\304\305\306\307 #\211\304\310\311\312\313\314\315\316& \317V\205.\304\305\306\307 \320\321%\304 \317X\2039\322\202F \323V\203C\324\202F\325 !\306\326#Q\327\330\331\332\333\334 \335\336\337#\210\335\340\341#\210\211\262&Q\262\207" [doom-modeline-github doom-modeline--github-notification-number doom-modeline--segment-visible github propertize " " face doom-modeline-spc-face doom-modeline-icon octicon "nf-oct-mark_github" "🔔" "&" :face doom-modeline-notification 0 display ((space :relative-width 0.5)) "" 99 "99+" number-to-string (:inherit (doom-modeline-unread-number doom-modeline-notification)) help-echo "Github Notifications\nmouse-1: Show notifications\nmouse-3: Fetch notifications" mouse-face doom-modeline-highlight local-map make-sparse-keymap define-key [mode-line mouse-1] #[0 "\300\301\302\303#\210\304\305!\207" [run-with-idle-timer 300 nil doom-modeline--github-fetch-notifications browse-url "https://github.com/notifications"] 4 "Open GitHub notifications page." nil] [mode-line mouse-3] #[0 "\300\301!\210\302 \207" [message "Fetching GitHub notifications..." doom-modeline--github-fetch-notifications] 2 "Fetching GitHub notifications." nil]] 14 (#$ . 97693)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist github doom-modeline-segment--github] 4) (defvar doom-modeline--debug-cookie nil nil) (make-variable-buffer-local 'doom-modeline--debug-cookie)#@59 Update the face of mode-line for debugging. (fn &rest _) (defalias 'doom-modeline--debug-visual #[128 "\300\301\302 \"\207" [mapc #[257 "r\211q\210\301\302\303\"\304 )\207" [doom-modeline--debug-cookie face-remap-add-relative doom-modeline doom-modeline-debug-visual force-mode-line-update] 4 "\n\n(fn BUFFER)"] buffer-list] 4 (#$ . 99220)])#@46 Restore the face of mode-line. (fn &rest _) (defalias 'doom-modeline--normal-visual #[128 "\300\301\302 \"\207" [mapc #[257 "r\211q\210\205\301!\210\302 )\207" [doom-modeline--debug-cookie face-remap-remove-relative force-mode-line-update] 3 "\n\n(fn BUFFER)"] buffer-list] 4 (#$ . 99569)]) (byte-code "\300\301\302\"\210\300\303\304\"\207" [add-hook dap-session-created-hook doom-modeline--debug-visual dap-terminated-hook doom-modeline--normal-visual] 3)#@51 Display debug icon with FACE and ARGS. (fn FACE) (defalias 'doom-modeline-debug-icon #[257 "\300\301\302\303\304\305&\207" [doom-modeline-icon codicon "nf-cod-debug" "🐛" "!" :face] 8 (#$ . 100036)])#@31 The current `dap-mode' state. (defalias 'doom-modeline--debug-dap #[0 "\302\300!\205N\205N\302\301!\205N \205N\303 \211\205L\304!\205L\305\306\307!\310\311\312\313!\314!#\315\316\317\320 \321\322\323#\210\321\324\325#\210\321\326\327#\210\211\262&\262\207" [dap-mode lsp-mode boundp dap--cur-session dap--session-running propertize doom-modeline-debug-icon doom-modeline-info help-echo format "DAP (%s - %s)\nmouse-1: Display debug hydra\nmouse-2: Display recent configurations\nmouse-3: Disconnect session" dap--debug-session-name dap--debug-session-state mouse-face doom-modeline-highlight local-map make-sparse-keymap define-key [mode-line mouse-1] dap-hydra [mode-line mouse-2] dap-debug-recent [mode-line mouse-3] dap-disconnect] 13 (#$ . 100247)]) (defvar doom-modeline--debug-dap nil nil) (make-variable-buffer-local 'doom-modeline--debug-dap)#@39 Update dap debug state. (fn &rest _) (defalias 'doom-modeline-update-debug-dap #[128 "\300 \211\207" [doom-modeline--debug-dap] 3 (#$ . 101121)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\207" [add-hook dap-session-created-hook doom-modeline-update-debug-dap dap-session-changed-hook dap-terminated-hook] 3)#@29 The current `edebug' state. (defalias 'doom-modeline--debug-edebug #[0 "\302\300!\205/\205/\303\304\305!\306\307\310 \"\311\312\313\314 \315\316\317#\210\315\320\321#\210\315\322\323#\210\211\262&\207" [edebug-mode edebug-execution-mode boundp propertize doom-modeline-debug-icon doom-modeline-info help-echo format "EDebug (%s)\nmouse-1: Show help\nmouse-2: Next\nmouse-3: Stop debugging" mouse-face doom-modeline-highlight local-map make-sparse-keymap define-key [mode-line mouse-1] edebug-help [mode-line mouse-2] edebug-next-mode [mode-line mouse-3] edebug-stop] 12 (#$ . 101457)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--debug-edebug speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@37 The current `debug-on-error' state. (defalias 'doom-modeline--debug-on-error #[0 "\205\301\302\303!\304\305\306\307\310\311\312\313\"&\207" [debug-on-error propertize doom-modeline-debug-icon doom-modeline-urgent help-echo "Debug on Error\nmouse-1: Toggle Debug on Error" mouse-face doom-modeline-highlight local-map make-mode-line-mouse-map mouse-1 toggle-debug-on-error] 10 (#$ . 102209)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--debug-on-error speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@36 The current `debug-on-quit' state. (defalias 'doom-modeline--debug-on-quit #[0 "\205\301\302\303!\304\305\306\307\310\311\312\313\"&\207" [debug-on-quit propertize doom-modeline-debug-icon doom-modeline-warning help-echo "Debug on Quit\nmouse-1: Toggle Debug on Quit" mouse-face doom-modeline-highlight local-map make-mode-line-mouse-map mouse-1 toggle-debug-on-quit] 10 (#$ . 102765)]) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put doom-modeline--debug-on-quit speed -1 put byte-optimizer byte-compile-inline-expand] 5)#@26 The current debug state. (defalias 'doom-modeline-segment--debug #[0 "\305\306!\205\270\307\301!\2056 \2056\310\311\312!\313\314\315\n\"\316\317\320\321 \322\323\324#\210\322\325\326#\210\322\327\330#\210\211\262& \205I\310\311\331!\313\332\316\317\320\333\334\335\"&\f\205\\\310\311\336!\313\337\316\317\320\333\334\340\"&\310\341\342\343 \344\345%\204t\204t\204t\205z\310\341\342\343 #\211\205\221\204\217\204\217\205\220P\205\243\204\241\205\242P\205\261\205\260P\260\266\206\207" [doom-modeline--debug-dap edebug-mode edebug-execution-mode debug-on-error debug-on-quit doom-modeline--segment-visible debug boundp propertize doom-modeline-debug-icon doom-modeline-info help-echo format "EDebug (%s)\nmouse-1: Show help\nmouse-2: Next\nmouse-3: Stop debugging" mouse-face doom-modeline-highlight local-map make-sparse-keymap define-key [mode-line mouse-1] edebug-help [mode-line mouse-2] edebug-next-mode [mode-line mouse-3] edebug-stop doom-modeline-urgent "Debug on Error\nmouse-1: Toggle Debug on Error" make-mode-line-mouse-map mouse-1 toggle-debug-on-error doom-modeline-warning "Debug on Quit\nmouse-1: Toggle Debug on Quit" toggle-debug-on-quit " " face doom-modeline-spc-face display ((space :relative-width 0.5))] 13 (#$ . 103315)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist debug doom-modeline-segment--debug] 4) (defvar doom-modeline--pdf-pages nil nil) (make-variable-buffer-local 'doom-modeline--pdf-pages)#@19 Update PDF pages. (defalias 'doom-modeline-update-pdf-pages #[0 "\301\302\303\304!\206 \305\306 #\211\207" [doom-modeline--pdf-pages format " P%d/%d " eval (pdf-view-current-page) 0 pdf-cache-number-of-pages] 4 (#$ . 104832)]) (byte-code "\300\301\302\"\210\303\304\305\306B\"\207" [add-hook pdf-view-after-change-page-hook doom-modeline-update-pdf-pages add-to-list doom-modeline--var-alist pdf-pages doom-modeline--pdf-pages] 4) (defvar doom-modeline--reader-pages nil nil) (make-variable-buffer-local 'doom-modeline--reader-pages)#@37 Update Emacs Reader document pages. (defalias 'doom-modeline-update-reader-pages #[0 "\302\303\304\305!\206 \306\206\306#\211\207" [reader-current-doc-pagecount doom-modeline--reader-pages format " P%d/P%d " eval (reader-current-doc-pagenumber) 0] 4 (#$ . 105374)]) (byte-code "\300\301\302\"\210\303\304\305\306B\"\207" [add-hook reader-mode-hook #[0 "\300\301\302\303\304$\207" [add-hook post-command-hook doom-modeline-update-reader-pages nil t] 5] add-to-list doom-modeline--var-alist reader-pages doom-modeline--reader-pages] 4)#@52 Show notifications of any unread emails in `mu4e'. (defalias 'doom-modeline-segment--mu4e #[0 "\205\305\304\305!\205\305\306\307\310\311 #\211\205\306\307\310\311 \312\313%\211\205)\314\315\316\317\320\321\322&\211\205Y\323\301!\203B \203B \247\203B \324D\202Y\323\302!\205Y\n\205Y\325\326!\205Y\327\326 \330\"\331D\211\205_\211@\211\205fA@\211\205\303\332V\205\303\306\306 V\203\204\333\334 \"\202\210\335!\310\336#Q\337\340\341\342\341\343 B\344\nB\345 B\257\346 \347U\203\253\350\202\260\333\351 \"\352 \347U\203\274\353\202\275\354Q&Q\266\206\207" [doom-modeline-mu4e mu4e-alert-mode-line mu4e-modeline-mode doom-modeline-number-limit doom-modeline--segment-visible mu4e propertize " " face doom-modeline-spc-face display ((space :relative-width 0.5)) doom-modeline-icon mdicon "nf-md-email" "📧" "#" :face doom-modeline-notification boundp mu4e-alert-view-unread-mails fboundp mu4e-bookmark-favorite plist-get :unread #[0 "\300\301\302 \303\"!\207" [mu4e-search plist-get mu4e-bookmark-favorite :query] 4 nil nil] 0 format "%d+" number-to-string (:inherit (doom-modeline-unread-number doom-modeline-notification)) mouse-face doom-modeline-highlight keymap mode-line mouse-1 mouse-2 mouse-3 help-echo 1 "You have an unread email" "You have %s unread emails" "\nClick here to view " "it" "them"] 18 (#$ . 105919)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist mu4e doom-modeline-segment--mu4e] 4)#@74 Delete `mu4e-alert-mode-line' from global modeline string. (fn &rest _) (defalias 'doom-modeline-override-mu4e-alert #[128 "\305\306!\205*\307\300!\205*\205* \203'\307\302!\203'\n\203'\310\311 \"\312\211\207\313\211\207" [mu4e-alert-mode-line doom-modeline-mu4e doom-modeline-mode global-mode-string mu4e-alert-modeline-formatter featurep mu4e-alert boundp delete (:eval mu4e-alert-mode-line) identity mu4e-alert-default-mode-line-formatter] 4 (#$ . 107400)]) (byte-code "\300\301\302\303#\210\304\305\303\"\207" [advice-add mu4e-alert-enable-mode-line-display :after doom-modeline-override-mu4e-alert add-hook doom-modeline-mode-hook] 4)#@74 Delete `mu4e-alert-mode-line' from global modeline string. (fn &rest _) (defalias 'doom-modeline-override-mu4e-modeline #[128 "\305\300!\205#\205# \203\305\302!\203\n\203\306 \f\"\211\207\307\304 \"\207" [mu4e-modeline-mode doom-modeline-mu4e doom-modeline-mode mu4e--modeline-item global-mode-string boundp delete add-to-list] 4 (#$ . 108055)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\304\305\306\"\207" [add-hook mu4e-modeline-mode-hook doom-modeline-override-mu4e-modeline doom-modeline-mode-hook doom-modeline-add-variable-watcher doom-modeline-mu4e #[1028 "\301=\205 \302 \210\303 \207" [doom-modeline-mu4e set doom-modeline-override-mu4e-alert doom-modeline-override-mu4e-modeline] 6 "\n\n(fn SYM VAL OP WHERE)"]] 3) (defvar doom-modeline--gnus-unread-mail 0)#@40 Used to determine if gnus has started. (defvar doom-modeline--gnus-started nil (#$ . 108850))#@66 Get the total number of unread news of gnus group. (fn &rest _) (defalias 'doom-modeline-update-gnus-status #[128 "\205 \205\304C\305\306\307\"\n\"\210\211\242\262\211\207" [doom-modeline-gnus doom-modeline--gnus-started gnus-newsrc-alist doom-modeline--gnus-unread-mail 0 mapc make-closure #[257 "\211@\302\303D!\304 \"?\205 \211\247\205 \211\305V\205 \300\211\242\\\240\207" [V0 doom-modeline-gnus-excluded-groups eval gnus-group-unread seq-contains-p 0] 6 "\n\n(fn G)"]] 6 (#$ . 108949)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\210\300\305\302\"\207" [add-hook gnus-group-update-hook doom-modeline-update-gnus-status gnus-summary-update-hook gnus-group-update-group-hook gnus-after-getting-new-news-hook] 3)#@22 Start GNUS listener. (defalias 'doom-modeline-start-gnus-listener #[0 "\205 ?\205\304\305 \210\n\306V\205\307\310\n #\207" [doom-modeline-gnus doom-modeline--gnus-started doom-modeline-gnus-timer doom-modeline-gnus-idle t doom-modeline-update-gnus-status 0 gnus-demon-add-handler gnus-demon-scan-news] 4 (#$ . 109704)]) (add-hook 'gnus-started-hook 'doom-modeline-start-gnus-listener)#@21 Stop GNUS listener. (defalias 'doom-modeline-stop-gnus-listener #[0 "\301\211\207" [doom-modeline--gnus-started nil] 2 (#$ . 110102)]) (add-hook 'gnus-exit-gnus-hook 'doom-modeline-stop-gnus-listener)#@52 Show notifications of any unread emails in `gnus'. (defalias 'doom-modeline-segment--gnus #[0 "\304\305!\205^\205^ \205^\n\247\205^\n\306V\205^\307\310\311\312 #\307\310\311\312 \313\314%\307\315\316\317\320\321\322\323&\307\n V\203A\324\325 \"\202D\326\n!\311\327#Q\330\331\332\n\333U\203U\334\202Y\324\335\n\"%Q\266\202\207" [doom-modeline-gnus doom-modeline--gnus-started doom-modeline--gnus-unread-mail doom-modeline-number-limit doom-modeline--segment-visible gnus 0 propertize " " face doom-modeline-spc-face display ((space :relative-width 0.5)) doom-modeline-icon mdicon "nf-md-email" "📧" "#" :face doom-modeline-notification format "%d+" number-to-string (:inherit (doom-modeline-unread-number doom-modeline-notification)) mouse-face doom-modeline-highlight help-echo 1 "You have an unread email" "You have %s unread emails"] 11 (#$ . 110309)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist gnus doom-modeline-segment--gnus] 4)#@374 Shorten IRC buffer `name' according to IRC mode. Calls the mode specific function to return the shortened version of `NAME' if applicable: - Circe: `tracking-shorten' - ERC: `erc-track-shorten-function' - rcirc: `rcirc-shorten-buffer-name' The specific function will decide how to stylize the buffer name, read the individual functions documentation for more. (fn NAME) (defalias 'doom-modeline-shorten-irc #[257 "\301\302!\203\302C!@\206/\303\300!\203\"\304!\203\"C!@\206/\301\305!\203.\305!\206/\211\207" [erc-track-shorten-function fboundp tracking-shorten boundp functionp rcirc-short-buffer-name] 3 (#$ . 111297)])#@77 Logic to convert some irc BUFFERS to their font-awesome icon. (fn BUFFERS) (defalias 'doom-modeline--tracking-buffers #[257 "\300\301\302\303\304\305 \306\307%#\207" [mapconcat #[257 "\301!\302\303\304\305\306\"\307\310\311\312\313\314\315 \"\"& \207" [doom-modeline-irc-stylize propertize face (:inherit (doom-modeline-unread-number doom-modeline-notification)) help-echo format "IRC Notification: %s\nmouse-1: Switch to buffer" mouse-face doom-modeline-highlight local-map make-mode-line-mouse-map mouse-1 make-closure #[0 "\301\302\300!!\205 \303\300!\207" [V0 buffer-live-p get-buffer switch-to-buffer] 3 nil nil]] 15 "\n\n(fn B)"] propertize " " face doom-modeline-spc-face display ((space :relative-width 0.5))] 10 (#$ . 111938)])#@29 Check if `circe' is in use. (defalias 'doom-modeline--circe-p #[0 "\300\301!\207" [boundp tracking-mode-line-buffers] 2 (#$ . 112688)])#@27 Check if `erc' is in use. (defalias 'doom-modeline--erc-p #[0 "\300\301!\207" [boundp erc-modified-channels-alist] 2 (#$ . 112829)])#@29 Check if `rcirc' is in use. (defalias 'doom-modeline--rcirc-p #[0 "\301\300!\205\207" [rcirc-track-minor-mode boundp] 2 (#$ . 112967)])#@105 Return filtered `circe' buffers. The return value is based on the variable `tracking-faces-priorities'. (defalias 'doom-modeline--circe-mention-buffers #[0 "\203 \302\303 \"\207 \207" [doom-modeline-irc-priority-only tracking-buffers seq-filter #[257 "\301\302\303#>\207" [tracking-faces-priorities get-text-property 0 face] 5 "\n\n(fn BUF)"]] 3 (#$ . 113112)])#@69 Return filtered `rcirc' buffers based on variable `rcirc-keywords'. (defalias 'doom-modeline--rcirc-mention-buffers #[0 "\203 \302\303 \"\207 \207" [doom-modeline-irc-priority-only rcirc-activity seq-filter #[257 "r\211q\210\301>)\207" [rcirc-activity-types keyword] 3 "\n\n(fn BUF)"]] 3 (#$ . 113483)])#@38 Gets the buffers that have activity. (defalias 'doom-modeline--get-buffers #[0 "\301 \203\302 \207\303 \203\304\305\"\207\306 \205\304\307\310 \"\207" [erc-modified-channels-alist doom-modeline--circe-p doom-modeline--circe-mention-buffers doom-modeline--erc-p mapcar #[257 "\300@!\207" [buffer-name] 3 "\n\n(fn L)"] doom-modeline--rcirc-p #[257 "\300!\207" [buffer-name] 3 "\n\n(fn B)"] doom-modeline--rcirc-mention-buffers] 3 (#$ . 113795)])#@44 The list of shortened, unread irc buffers. (defalias 'doom-modeline-segment--irc-buffers #[0 "\205\"\301\302!\205\"\303 \211G\304\305\306\307 #\310V\205 \211\311!Q\266\203\207" [doom-modeline-irc doom-modeline--segment-visible irc-buffers doom-modeline--get-buffers propertize " " face doom-modeline-spc-face 0 doom-modeline--tracking-buffers] 6 (#$ . 114253)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist irc-buffers doom-modeline-segment--irc-buffers] 4)#@48 A notification icon for any unread irc buffer. (defalias 'doom-modeline-segment--irc #[0 "\205\252\302\303!\205\252\304 \211G\305\306\307\310 #\305\306\307\310 \311\312%\313V\205\250\305\314\315\316\317\320\321\322&\305\323!\307\324#Q\325\326\327\330\331 \332#\333 \203I\334\202X\335 \203R\336\202X\337 \205X\340#\341\342\343\344 \333 \203r\345\346\347#\210\345\350\351#\210\202\227\335 \203\206\345\352\353#\210\345\354\355#\210\202\227\337 \203\227\345\356\357#\210\345\360\361#\210\211\262& \205\246\362!PR\266\204\207" [doom-modeline-irc doom-modeline-irc-buffers doom-modeline--segment-visible irc doom-modeline--get-buffers propertize " " face doom-modeline-spc-face display ((space :relative-width 0.5)) 0 doom-modeline-icon mdicon "nf-md-message_processing" "🗊" "#" :face doom-modeline-notification number-to-string (:inherit (doom-modeline-unread-number doom-modeline-notification)) help-echo format "IRC Notifications: %s\n%s" mapconcat #[257 "!\207" [doom-modeline-irc-stylize] 3 "\n\n(fn B)"] ", " doom-modeline--circe-p "mouse-1: Switch to previous unread buffer\nmouse-3: Switch to next unread buffer" doom-modeline--erc-p "mouse-1: Switch to buffer\nmouse-3: Switch to next unread buffer" doom-modeline--rcirc-p "mouse-1: Switch to server buffer\nmouse-3: Switch to next unread buffer" mouse-face doom-modeline-highlight local-map make-sparse-keymap define-key [mode-line mouse-1] tracking-previous-buffer [mode-line mouse-3] tracking-next-buffer [mode-line mouse-1] erc-switch-to-buffer [mode-line mouse-3] erc-track-switch-buffer [mode-line mouse-1] rcirc-switch-to-server-buffer [mode-line mouse-3] rcirc-next-active-buffer doom-modeline--tracking-buffers] 17 (#$ . 114752)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist irc doom-modeline-segment--irc] 4)#@37 Override default `rcirc' mode-line. (defalias 'doom-modeline-override-rcirc #[0 "\203$\305\301!\203$ \203$\n\203\306 >\204\307 \310\"\311\306\f\"\211\207\n\205@\306\f>?\205@\306 >\203:\311\306 \"\307\f\312\"\211\207" [doom-modeline-irc doom-modeline-mode rcirc-track-minor-mode doom-modeline-tab-bar-string global-mode-string boundp rcirc-activity-string append (rcirc-activity-string) delq (rcirc-activity-string)] 3 (#$ . 116599)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\304\305\306\"\207" [add-hook rcirc-track-minor-mode-hook doom-modeline-override-rcirc doom-modeline-mode-hook doom-modeline-add-variable-watcher doom-modeline-irc #[1028 "\301=\205\n\302 \207" [doom-modeline-irc set doom-modeline-override-rcirc] 6 "\n\n(fn SYM VAL OP WHERE)"]] 3)#@144 Displays the battery ICON with FACE. UNICODE and TEXT are fallbacks. Uses `nerd-icons-mdicon' to fetch the icon. (fn ICON UNICODE TEXT FACE) (defalias 'doom-modeline-battery-icon #[1028 "\300\301\302&\207" [doom-modeline-icon mdicon :face] 11 (#$ . 117388)]) (defvar doom-modeline--battery-status nil)#@24 Update battery status. (defalias 'doom-modeline-update-battery-status #[0 "\205\272\306\301!\205\272 \205\272\n\205\n \307\236A\211\310\230\206!\211\311\230\312\313\236A\206*\314!@\211\247\205:\211\315Y\205:\211 X\211\203h\203F\316\202i\fW\203P\317\202i\320W\203Z\321\202i\322W\203d\323\202i\324\202i\325\203d\326Y\203\204\327\203|\330\202}\331\332\333$\202j\334Y\203\233\327\203\223\335\202\224\336\332\333$\202j\337Y\203\262\327\203\252\340\202\253\341\332\333$\202j\342Y\203\311\327\203\301\343\202\302\344\332\333$\202j\345Y\203\340\327\203\330\346\202\331\347\332\333$\202j\350Y\203\367\327\203\357\351\202\360\352\332\333$\202j\353Y\203\327\203\354\202\355\332\333$\202j\356Y\203%\327\203\357\202\360\332\333$\202j\361Y\203<\327\2034\362\2025\363\332\333$\202j\364Y\203S\327\203K\365\202L\366\367\333$\202j\327\203\\\370\202]\371\367\372$\202j\327\373\374\375$\203x\376\377\201B#\202{\201C \203\222\203\222\203\222\201D  \"\202\225\201E\201F\201G\n\"\210\201H\201I#\201H\201J\201I%B\266\211\211@\203\365@@\201K!\201L!\201M!\201N=\206\337\201M!??\205\344\266\203\201K@A!P\315\201OOA\201P\201Q!\207" [doom-modeline-battery display-battery-mode battery-status-function battery-mode-line-limit battery-load-critical battery-echo-area-format boundp 76 "AC" "on-line" read-from-string 112 "ERR" 0 doom-modeline-battery-charging doom-modeline-battery-critical 25 doom-modeline-battery-warning 95 doom-modeline-battery-normal doom-modeline-battery-full doom-modeline-battery-error 100 doom-modeline-battery-icon "nf-md-battery_charging_100" "nf-md-battery" "🔋" "-" 90 "nf-md-battery_charging_90" "nf-md-battery_90" 80 "nf-md-battery_charging_80" "nf-md-battery_80" 70 "nf-md-battery_charging_70" "nf-md-battery_70" 60 "nf-md-battery_charging_60" "nf-md-battery_60" 50 "nf-md-battery_charging_50" "nf-md-battery_50" 40 "nf-md-battery_charging_40" "nf-md-battery_40" 30 "nf-md-battery_charging_30" "nf-md-battery_30" 20 "nf-md-battery_charging_20" "nf-md-battery_20" 10 "nf-md-battery_charging_10" "nf-md-battery_10" "đŸĒĢ" "nf-md-battery_charging_outline" "nf-md-battery_outline" "!" "nf-md-battery_alert" "⚠" "N/A" format "%d%s" doom-modeline--battery-status battery-mode-line-string "%%" "" battery-format "Battery status not available" run-hook-with-args battery-update-functions propertize help-echo face substring-no-properties string-to-char char-displayable-p unicode -1 force-mode-line-update t] 17 (#$ . 117703)]) (byte-code "\300\301\302\"\210\300\303\304\"\207" [doom-modeline-add-variable-watcher doom-modeline-icon #[1028 "\301=\205\n\302 \207" [doom-modeline-icon set doom-modeline-update-battery-status] 6 "\n\n(fn SYM VAL OP WHERE)"] doom-modeline-unicode-fallback #[1028 "\301=\205\n\302 \207" [doom-modeline-unicode-fallback set doom-modeline-update-battery-status] 6 "\n\n(fn SYM VAL OP WHERE)"]] 3)#@25 Display battery status. (defalias 'doom-modeline-segment--battery #[0 "\205-\303\301!\205- \205-\304\305!\205-\306\307\310\311 #\306\307\310\311 \312\313%\n@\nA\260\266\202\207" [doom-modeline-battery display-battery-mode doom-modeline--battery-status boundp doom-modeline--segment-visible battery propertize " " face doom-modeline-spc-face display ((space :relative-width 0.5))] 7 (#$ . 120698)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist battery doom-modeline-segment--battery] 4)#@37 Override default battery mode-line. (defalias 'doom-modeline-override-battery #[0 "\2031\306\301!\2031 \2031\307\310\311\312#\210\313\n>\204\314\n\315\"\316\313 \"\306\304!\2050\f\205[\310 \207\317\310\312\"\210\f\205[ \205[\205[\313 >?\205[\313\n>\203U\316\313\n\"\314 \320\"\211\207" [doom-modeline-battery doom-modeline-mode doom-modeline-tab-bar-string global-mode-string display-battery-mode battery-status-function boundp advice-add battery-update :override doom-modeline-update-battery-status battery-mode-line-string append (battery-mode-line-string) delq advice-remove (battery-mode-line-string) battery-mode-line-format] 4 (#$ . 121227)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\304\305\306\"\207" [add-hook display-battery-mode-hook doom-modeline-override-battery doom-modeline-mode-hook doom-modeline-add-variable-watcher doom-modeline-battery #[1028 "\301=\205\n\302 \207" [doom-modeline-battery set doom-modeline-override-battery] 6 "\n\n(fn SYM VAL OP WHERE)"]] 3)#@27 Show package information. (defalias 'doom-modeline-segment--package #[0 "\303\304\305!!\205/ \205/\306\307\310\311 #\300\312\313\314\211\315\316\n\203\"\317\202#\320!&\306\307\310\311 \321\322%Q\303\304\323!!Q\207" [doom-modeline-icon doom-modeline-major-mode-icon doom-modeline-major-mode-color-icon doom-modeline-display-text format-mode-line mode-line-front-space propertize " " face doom-modeline-spc-face faicon "nf-fa-archive" nil :face doom-modeline-face nerd-icons-silver mode-line display ((space :relative-width 0.5)) mode-line-buffer-identification] 10 (#$ . 122244)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist package doom-modeline-segment--package] 4)#@102 Alist of custom helm buffer names to use. The cdr can also be a function that returns a name to use. (defvar doom-modeline--helm-buffer-ids '(("*helm*" . "HELM") ("*helm M-x*" . "HELM M-x") ("*swiper*" . "SWIPER") ("*Projectile Perspectives*" . "HELM Projectile Perspectives") ("*Projectile Layouts*" . "HELM Projectile Layouts") ("*helm-ag*" lambda nil (format "HELM Ag: Using %s" (car (split-string helm-ag-base-command))))) (#$ . 122953))#@26 Helm session identifier. (defalias 'doom-modeline-segment--helm-buffer-id #[0 "\305\300!\205c\205c\306\307\310\311 #\211 \205&\301\312\313\314\211\315\316\n\205!\317!&P\306\320\321 \"A\322\323\324\307\321 #;\203?\202W\325!\203J \202W\326\327\"\210\330\331\332\333\"!P)\266\203\310\316\334!#R\262\207" [helm-alive-p doom-modeline-icon doom-modeline-major-mode-color-icon doom-modeline--helm-buffer-ids case-fold-search boundp propertize " " face doom-modeline-spc-face sucicon "nf-custom-emacs" nil :face doom-modeline-face nerd-icons-blue assoc buffer-name t replace-regexp-in-string "-" functionp string-match "\\*helm:? \\(mode \\)?\\([^\\*]+\\)\\*" "HELM " capitalize match-string 2 doom-modeline-buffer-file] 12 (#$ . 123400)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist helm-buffer-id doom-modeline-segment--helm-buffer-id] 4)#@28 Number of helm candidates. (defalias 'doom-modeline-segment--helm-number #[0 "\301\300!\205$\205$\302\303\304\305 \306\307!#\310\311\312!#\302\303\313\306 \"\310\311\314!#P\207" [helm-alive-p boundp propertize format " %d/%d" helm-candidate-number-at-point helm-get-candidate-number t face doom-modeline-face doom-modeline-buffer-path " (%d total) " doom-modeline-info] 6 (#$ . 124290)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist helm-number doom-modeline-segment--helm-number] 4)#@24 Helm keybindings help. (defalias 'doom-modeline-segment--helm-help #[0 "\301\300!\205\205\302\303\304\"\207" [helm-alive-p boundp mapcar #[257 "\300\301\"\203\302\303!\304\305\306!#\207\207" [string-prefix-p "\\<" propertize substitute-command-keys face doom-modeline-face doom-modeline-buffer-file] 6 "\n\n(fn S)"] ("\\\\[helm-help]" "(help) " "\\\\[helm-select-action]" "(actions) " "\\\\[helm-maybe-exit-minibuffer]/F1/F2..." "(action) ")] 3 (#$ . 124811)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist helm-help doom-modeline-segment--helm-help] 4)#@23 Helm prefix argument. (defalias 'doom-modeline-segment--helm-prefix-argument #[0 "\304\300!\205(\205( \205(\305\n\206 !\211\306U?\205&\307\310\311\"\312\313\314!#\262\207" [helm-alive-p helm--mode-line-display-prefarg prefix-arg current-prefix-arg boundp prefix-numeric-value 1 propertize format "C-u %s" face doom-modeline-face doom-modeline-info] 6 (#$ . 125437)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist helm-prefix-argument doom-modeline-segment--helm-prefix-argument] 4)#@35 The currently active helm source. (defvar doom-modeline--helm-current-source nil (#$ . 125961))#@24 Helm follow indicator. (defalias 'doom-modeline-segment--helm-follow #[0 "\302\300!\205\205 \205\303 \236A\304=\205\305\207" [helm-alive-p doom-modeline--helm-current-source boundp follow 1 "HF"] 2 (#$ . 126062)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist helm-follow doom-modeline-segment--helm-follow] 4)#@34 git-timemachine modeline segment (defalias 'doom-modeline-segment--git-timemachine #[0 "\306\307\310\311 #\205< \205<\n\206\312 \211\205:\211\211\313\230\262?\205: \203,\314!\2021\315\316 \"\306\307\310\311 \317\320%P\262\f\205^\321 \211\205\\\211\211\313\230\262?\205\\\314!\306\307\310\311 \317\320%P\262\322 !R\207" [doom-modeline-icon doom-modeline-major-mode-icon doom-modeline--buffer-file-icon doom-modeline-major-mode-color-icon doom-modeline-buffer-state-icon mode-line-buffer-identification propertize " " face doom-modeline-spc-face doom-modeline-update-buffer-file-icon "" doom-modeline-display-icon doom-modeline-propertize-icon doom-modeline-face display ((space :relative-width 0.5)) doom-modeline-update-buffer-file-state-icon format-mode-line] 10 (#$ . 126415)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist git-timemachine doom-modeline-segment--git-timemachine] 4)#@23 grip modeline segment (defalias 'doom-modeline-segment--grip #[0 "\302\300!\205b\205b\303\304\305\306 #\211\307 \203-\310 !\211\311\267\202'\312\202(\313\202(\314\262\202.\314!\303\315\316\317\320\321\322&\323\324\325\326 \"\327\330\331\332 \333\334\335#\210\333\336\337#\210\333\340\341#\210\211\262&\262Q\262\207" [grip-mode grip--process boundp propertize " " face doom-modeline-spc-face doom-modeline-face process-status #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (run 31 exit 35)) doom-modeline-info doom-modeline-warning doom-modeline-urgent doom-modeline-icon codicon "nf-cod-preview" "🗐" "@" :face help-echo format "Preview on %s\nmouse-1: Preview in browser\nmouse-2: Stop preview\nmouse-3: Restart preview" grip--preview-url mouse-face doom-modeline-highlight local-map make-sparse-keymap define-key [mode-line mouse-1] grip-browse-preview [mode-line mouse-2] grip-stop-preview [mode-line mouse-3] grip-restart-preview] 15 (#$ . 127352)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist grip doom-modeline-segment--grip] 4)#@25 follow modeline segment (defalias 'doom-modeline-segment--follow #[0 "\301\300!\205)\205)\302 \211G\303 >GS\304\305\306\307 #\304\310\311Z#\306\312#P\266\203\207" [follow-mode boundp follow-all-followers selected-window propertize " " face doom-modeline-spc-face format "Follow %d/%d" doom-modeline-buffer-minor-mode] 9 (#$ . 128482)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist follow doom-modeline-segment--follow] 4)#@56 Length of the hour hand as a proportion of the radius. (defconst doom-modeline--clock-hour-hand-ratio 0.45 (#$ . 128946))#@58 Length of the minute hand as a proportion of the radius. (defconst doom-modeline--clock-minute-hand-ratio 0.7 (#$ . 129073))#@138 Construct an SVG clock showing the time HOUR:MINUTE. The clock will be of the specified RADIUS and COLOR. (fn HOUR MINUTE RADIUS COLOR) (defalias 'doom-modeline--create-clock-svg #[1028 "\303\304!\305\306Z\307\245Z\306\245_!_ _\310\306Z\307\245Z\306\245_!_ _\305\311Z\311\245_!_\n_\310\311 Z\311\245_!_\n_\312\313_\313 _\314 $\315 \211\211\nZ\316\317\320\313_&\210\315 \211 \316\f\314\317&\210\321 \211\211 \\\f \\\320\313 _&\210\321 \211\211\\\f\\\320\322 _&\210\207" [float-pi doom-modeline--clock-hour-hand-ratio doom-modeline--clock-minute-hand-ratio image-compute-scaling-factor auto sin 6 60.0 cos 30 svg-create 2 :stroke svg-circle :fill "none" :stroke-width svg-line 1.5] 20 (#$ . 129204)])#@53 The last result of `doom-modeline--generate-clock'. (defvar doom-modeline--clock-cache nil (#$ . 129959))#@122 Return a string containing the current time as an analogue clock svg. When the svg library is not available, return nil. (defalias 'doom-modeline--generate-clock #[0 "\304\305 \306_\" @\232\203 \206R\307\310\311\312#\205R\304\305 \306_\"\313\314\315\316\317\320\321\322!!\304\320\321\323!!\"_\n\250\203=\n\202B \324_\n_\325$\326\327\330\331%\332\333\334\335&B\211A\207" [doom-modeline-time-clock-minute-resolution doom-modeline--clock-cache doom-modeline-time-clock-size doom-modeline-height truncate float-time 60 require svg nil t propertize " " display svg-image doom-modeline--create-clock-svg string-to-number format-time-string "%-I" "%-M" 0.5 "currentColor" :scale 1 :ascent center face doom-modeline-time help-echo #[771 "\300\301!\207" [format-time-string "%c"] 5 "\n\n(fn WINDOW OBJECT POS)"]] 11 (#$ . 130071)])#@25 Displays the time icon. (defalias 'doom-modeline-time-icon #[0 "\203 \203\302 \203\303 \206b\304\305\203[\306 AA@\307\246\211\310\267\202U\311\202V\312\202V\313\202V\314\202V\315\202V\316\202V\317\202V\320\202V\321\202V\322\202V\323\202V\324\202V\325\262\202\\\326\327\330\331\332&\207" [doom-modeline-time-live-icon doom-modeline-time-analogue-clock display-graphic-p doom-modeline--generate-clock doom-modeline-icon mdicon decode-time 12 #s(hash-table size 12 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (0 37 1 41 2 45 3 49 4 53 5 57 6 61 7 65 8 69 9 73 10 77 11 81)) "nf-md-clock_time_twelve_outline" "nf-md-clock_time_one_outline" "nf-md-clock_time_two_outline" "nf-md-clock_time_three_outline" "nf-md-clock_time_four_outline" "nf-md-clock_time_five_outline" "nf-md-clock_time_six_outline" "nf-md-clock_time_seven_outline" "nf-md-clock_time_eight_outline" "nf-md-clock_time_nine_outline" "nf-md-clock_time_ten_outline" "nf-md-clock_time_eleven_outline" nil "nf-md-clock_outline" "⏰" "" :face (:inherit doom-modeline-time :weight normal)] 7 (#$ . 130911)])#@23 time modeline segment (defalias 'doom-modeline-segment--time #[0 "\2059\306\301!\2059 \2059\307\310!\2059\311\312\313\314 #\n\2051\302 \204(\f\2050\311\312\313\314 \315\316%P\311 \313\317\300!#Q\207" [doom-modeline-time display-time-mode doom-modeline-time-icon doom-modeline-icon doom-modeline-unicode-fallback display-time-string boundp doom-modeline--segment-visible time propertize " " face doom-modeline-spc-face display ((space :relative-width 0.5)) doom-modeline-face] 8 (#$ . 132025)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist time doom-modeline-segment--time] 4)#@44 Override default `display-time' mode-line. (defalias 'doom-modeline-override-time #[0 "\204\304 \203&\305\302!\203&\n\203&\306 >\204\307 \310\"\311\306\"\211\207\306>\206=\306 >\2037\311\306 \"\307\312\"\211\207" [global-mode-string doom-modeline-time doom-modeline-mode doom-modeline-tab-bar-string ("") boundp display-time-string append (display-time-string) delq (display-time-string)] 3 (#$ . 132644)]) (byte-code "\300\301\302\"\210\300\303\302\"\210\304\305\306\"\207" [add-hook display-time-mode-hook doom-modeline-override-time doom-modeline-mode-hook doom-modeline-add-variable-watcher doom-modeline-time #[1028 "\301=\205\n\302 \207" [doom-modeline-time set doom-modeline-override-time] 6 "\n\n(fn SYM VAL OP WHERE)"]] 3)#@30 compilation modeline segment (defalias 'doom-modeline-segment--compilation #[0 "\301\300!\205\205\302\303\304\305\306!\307\310\311\312\313\314\315\316\"& \207" [compilation-in-progress boundp propertize "[Compiling] " face doom-modeline-face doom-modeline-compilation help-echo "Compiling; mouse-2: Goto Buffer" mouse-face doom-modeline-highlight local-map make-mode-line-mouse-map mouse-2 compilation-goto-in-progress-buffer] 12 (#$ . 133403)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist compilation doom-modeline-segment--compilation] 4)#@24 eldoc modeline segment (defalias 'doom-modeline-segment--eldoc #[0 "\301\300!\205 \205 \302\207" [eldoc-mode boundp (eldoc-mode-line-string (" " eldoc-mode-line-string " "))] 2 (#$ . 133984)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist eldoc doom-modeline-segment--eldoc] 4)#@309 Display message specified by FORMAT-STRING and ARGS on the mode-line as needed. This function displays the message produced by formatting ARGS with FORMAT-STRING on the mode line when the current buffer is a minibuffer. Otherwise, it displays the message like `message' would. (fn FORMAT-STRING &rest ARGS) (defalias 'doom-modeline-eldoc-minibuffer-message #[385 "\301 \203/\302\303\304\305\306$\210r\307\310\311\312 \"\206\313 \206\314 !q\210;\205*\315\316#\317 )\207\315\320#\207" [eldoc-mode-line-string minibufferp add-hook minibuffer-exit-hook #[0 "\302\211\211\207" [eldoc-mode-line-string eldoc-last-message nil] 3] nil t window-buffer window-in-direction above minibuffer-window minibuffer-selected-window get-largest-window apply format-message force-mode-line-update message] 7 (#$ . 134299)])#@32 speedbar-info modeline segment (defalias 'doom-modeline-segment--speedbar-info #[0 "\300\301\302\303 \304\305%\300\306\302\307 #P\207" [propertize "%l" face doom-modeline-face mouse-face doom-modeline-highlight " " doom-modeline-spc-face] 6 (#$ . 135123)]) (byte-code "\300\301\302\303B\"\207" [add-to-list doom-modeline--fn-alist speedbar-info doom-modeline-segment--speedbar-info] 4)#@22 k8s modeline segment (defalias 'doom-modeline-segment--k8s #[0 "\303\300!\205o\205o\304\305!\205o\306\307\310\"\311\307\310\"\312\313\314\315\211$\316\317\320\321 #\322\323\"C\2038\324\322\325\"C\"\262\211\326\327\330#\266\202\262\316 \205V\205V\322\331 \"\260\332\333 \334\335\n#\210\211\262\336\337\340&\266\205\207" [kele-mode doom-modeline-k8s-show-namespace kele-menu-map boundp doom-modeline--segment-visible k8s kele-current-context-name :wait nil kele-current-namespace doom-modeline-icon mdicon "nf-md-kubernetes" "K8s:" propertize " " face doom-modeline-spc-face format "Current context: %s" append "Current namespace: %s" "\n" mapconcat identity "(%s)" local-map make-sparse-keymap define-key [mode-line down-mouse-1] mouse-face doom-modeline-highlight help-echo] 13 (#$ . 135514)]) (byte-code "\300\301\302\303B\"\210\304\305!\207" [add-to-list doom-modeline--fn-alist k8s doom-modeline-segment--k8s provide doom-modeline-segments] 4)