;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\210\303\304\305\306\307\310\307\311\312\313\312\314\312\315& \210\316\317\320\321\322DD\323\324\325\312\313\312\304\312\326\327\330& \210\316\331\320\321\332DD\333\324\334\312\304\327\335\336\337& \210\316\340\320\321\341DD\342\324\343\312\304\327\335& \207" [require magit-git autorevert custom-declare-group magit-auto-revert nil "Revert buffers when files in repository change." :link (custom-group-link auto-revert) (info-link "(magit)Automatic Reverting of File-Visiting Buffers") :group auto-revert magit-essentials magit-modes custom-declare-variable auto-revert-buffer-list-filter funcall function #[0 "\300\207" [nil] 1] "Filter that determines which buffers `auto-revert-buffers' reverts.\n\nThis option is provided by Magit, which also advises\n`auto-revert-buffers' to respect it. Magit users who do not turn\non the local mode `auto-revert-mode' themselves, are best served\nby setting the value to `magit-auto-revert-repository-buffer-p'.\n\nHowever the default is nil, so as not to disturb users who do use\nthe local mode directly. If you experience delays when running\nMagit commands, then you should consider using one of the\npredicates provided by Magit - especially if you also use Tramp.\n\nUsers who do turn on `auto-revert-mode' in buffers in which Magit\ndoesn't do that for them, should likely not use any filter.\nUsers who turn on `global-auto-revert-mode', do not have to worry\nabout this option, because it is disregarded if the global mode\nis enabled." :package-version (magit . "2.4.2") magit-related :type (radio (const :tag "No filter" nil) (function-item magit-auto-revert-buffer-p) (function-item magit-auto-revert-repository-buffer-p) function) magit-auto-revert-tracked-only #[0 "\300\207" [t] 1] "Whether `magit-auto-revert-mode' only reverts tracked files." (magit . "2.4.0") boolean :set #[514 "L\210\301\300!\205\205\302\303!\205\300\304!\210\300 \207" [magit-auto-revert-mode boundp featurep magit-autorevert -1] 4 "\n\n(fn VAR VAL)"] magit-auto-revert-immediately #[0 "\300\207" [t] 1] "Whether Magit reverts buffers immediately.\n\nIf this is non-nil and either `global-auto-revert-mode' or\n`magit-auto-revert-mode' is enabled, then Magit immediately\nreverts buffers by explicitly calling `auto-revert-buffers'\nafter running Git for side-effects.\n\nIf `auto-revert-use-notify' is non-nil (and file notifications\nare actually supported), then `magit-auto-revert-immediately'\ndoes not have to be non-nil, because the reverts happen\nimmediately anyway.\n\nIf `magit-auto-revert-immediately' and `auto-revert-use-notify'\nare both nil, then reverts happen after `auto-revert-interval'\nseconds of user inactivity. That is not desirable." (magit . "2.4.0")] 14) #@23 (fn &optional FILE) (defalias 'magit-turn-on-auto-revert-mode-if-desired #[256 "\211\203\306!\211\205r\211q\210\307 )\207\205P\310!\205P \311W\2044\3121/\313\n\314\"0\2021\210\314\205P\315 \205P \203C\316!\205P\f?\205P ?\205P\304\317!\207" [buffer-file-name emacs-major-version magit-git-executable magit-auto-revert-tracked-only auto-revert-mode global-auto-revert-mode find-buffer-visiting magit-turn-on-auto-revert-mode-if-desired file-readable-p 27 (wrong-number-of-arguments) executable-find t magit-toplevel magit-file-tracked-p 1] 4 (#$ . 2846)]) (put 'magit-auto-revert-mode 'globalized-minor-mode t) (defvar auto-revert-mode-major-mode nil nil) (byte-code "\300\301!\210\302\303\304\305\306DD\307\310\311\312\313\314\315\316\317\316\320\321\322\323\324&\207" [make-variable-buffer-local auto-revert-mode-major-mode custom-declare-variable magit-auto-revert-mode funcall function #[0 "\206 ?\207" [global-auto-revert-mode noninteractive] 1] "Non-nil if Magit-Auto-Revert mode is enabled.\nSee the `magit-auto-revert-mode' command\nfor a description of this minor mode.\nSetting this variable directly does not take effect;\neither customize it (see the info node `Easy Customization')\nor call the function `magit-auto-revert-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :type boolean :group magit-auto-revert magit-essentials :package-version (magit . "2.4.0") :link (info-link "(magit)Automatic Reverting of File-Visiting Buffers")] 18) #@388 Toggle Auto-Revert mode in all buffers. With prefix ARG, enable Magit-Auto-Revert mode if ARG is positive; otherwise, disable it. If called from Lisp, enable the mode if ARG is omitted or nil. Auto-Revert mode is enabled in all buffers where `magit-turn-on-auto-revert-mode-if-desired' would do it. See `auto-revert-mode' for more information on Auto-Revert mode. (fn &optional ARG) (defalias 'magit-auto-revert-mode #[256 "\303 \304\301\305=\203\306\301!?\202!\247\203 \307W\203 \310\202!\311\"\210\312\300!\2038\313\301\"\306\301!\2038\301B \203N\314\315\316\"\210\314\317\320\"\210\314\321\322\"\210\202]\323\315\316\"\210\323\317\320\"\210\323\321\322\"\210\324 \211\203\203\211@r\211q\210 \203s\325 \210\202{\n\203{\302\326!\210)A\266\202\202_\210\327\330\306\301!\203\220\331\202\221\332\"\210\333\334!\203\271\335\301!\210\303 \203\251\211\303 \232\203\271\336\337\306\301!\203\265\340\202\266\341\342#\210\210\343 \210\306\301!\207" [global-minor-modes magit-auto-revert-mode auto-revert-mode current-message set-default toggle default-value 1 nil t boundp delq add-hook after-change-major-mode-hook magit-auto-revert-mode-enable-in-buffers find-file-hook magit-auto-revert-mode-check-buffers change-major-mode-hook magit-auto-revert-mode-cmhh remove-hook buffer-list magit-turn-on-auto-revert-mode-if-desired -1 run-hooks magit-auto-revert-mode-hook magit-auto-revert-mode-on-hook magit-auto-revert-mode-off-hook called-interactively-p any customize-mark-as-set message "Magit-Auto-Revert mode %sabled%s" "en" "dis" "" force-mode-line-update] 6 (#$ . 4353) (byte-code "\203\n\301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)]) (defvar magit-auto-revert-mode-hook nil) (byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\310\313\300!\205#\310\211%\207" [magit-auto-revert-mode-map magit-auto-revert-mode-hook variable-documentation put "Hook run after entering or leaving `magit-auto-revert-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" custom-type hook standard-value nil add-minor-mode magit-auto-revert-mode boundp] 6) (defvar auto-revert-mode-set-explicitly nil nil) (make-variable-buffer-local 'auto-revert-mode-set-explicitly) (defalias 'auto-revert-mode-set-explicitly #[0 "\301\211\207" [auto-revert-mode-set-explicitly t] 2]) (byte-code "\300\301\302\303#\210\304\305\301\"\207" [put auto-revert-mode-set-explicitly definition-name magit-auto-revert-mode add-hook auto-revert-mode-hook] 4) (defvar magit-auto-revert-mode-buffers nil) (defalias 'magit-auto-revert-mode-enable-in-buffers #[0 "\305\211\211\2059\211@\306!\2032r\211q\210 \204/\n =\204/\f\203,\304\307!\210\310 \210\202/\310 \210 )A\266\202\202\207" [magit-auto-revert-mode-buffers auto-revert-mode-set-explicitly auto-revert-mode-major-mode major-mode auto-revert-mode nil buffer-live-p -1 magit-turn-on-auto-revert-mode-if-desired] 5]) (put 'magit-auto-revert-mode-enable-in-buffers 'definition-name 'magit-auto-revert-mode) (defalias 'magit-auto-revert-mode-check-buffers #[0 "\300 \210\301\302\303\"\207" [magit-auto-revert-mode-enable-in-buffers remove-hook post-command-hook magit-auto-revert-mode-check-buffers] 3]) (put 'magit-auto-revert-mode-check-buffers 'definition-name 'magit-auto-revert-mode) (defalias 'magit-auto-revert-mode-cmhh #[0 "\300\301p\"\210\302\303\304\"\207" [add-to-list magit-auto-revert-mode-buffers add-hook post-command-hook magit-auto-revert-mode-check-buffers] 3]) (put 'magit-auto-revert-mode-cmhh 'definition-name 'magit-auto-revert-mode) #@238 This is an internal kludge to be used on `after-init-hook'. Do not use this function elsewhere, and don't remove it from the `after-init-hook'. For more information see the comments and code surrounding the definition of this function. (defalias 'magit-auto-revert-mode--init-kludge #[0 "\203+\301 \302\303!\210\300\304!\210\302\305\306\307\310\"!\211\311V\203&\312\313\314 G#\202'\315\262\"\207\300\316!\207" [magit-auto-revert-mode current-time magit-message "Turning on magit-auto-revert-mode..." 1 "Turning on magit-auto-revert-mode...done%s" float-time time-subtract nil 0.2 format " (%.3fs, %s buffers checked)" buffer-list "" -1] 8 (#$ . 8030)]) (byte-code "\203\n\301 \210\202\302\303\301\304#\210\305\306\307\310#\207" [after-init-time magit-auto-revert-mode--init-kludge add-hook after-init-hook t put magit-auto-revert-mode function-documentation "Toggle Magit Auto Revert mode.\nIf called interactively, enable Magit Auto Revert mode if ARG is\npositive, and disable it if ARG is zero or negative. If called\nfrom Lisp, also enable the mode if ARG is omitted or nil, and\ntoggle it if ARG is `toggle'; disable the mode otherwise.\n\nMagit Auto Revert mode is a global minor mode that reverts\nbuffers associated with a file that is located inside a Git\nrepository when the file changes on disk. Use `auto-revert-mode'\nto revert a particular buffer. Or use `global-auto-revert-mode'\nto revert all file-visiting buffers, not just those that visit\na file located inside a Git repository.\n\nThis global mode works by turning on the buffer-local mode\n`auto-revert-mode' at the time a buffer is first created. The\nlocal mode is turned on if the visited file is being tracked in\na Git repository at the time when the buffer is created.\n\nIf `magit-auto-revert-tracked-only' is non-nil (the default),\nthen only tracked files are reverted. But if you stage a\npreviously untracked file using `magit-stage', then this mode\nnotices that.\n\nUnlike `global-auto-revert-mode', this mode never reverts any\nbuffers that are not visiting files.\n\nThe behavior of this mode can be customized using the options\nin the `autorevert' and `magit-autorevert' groups.\n\nThis function calls the hook `magit-auto-revert-mode-hook'.\n\nLike nearly every mode, this mode should be enabled or disabled\nby calling the respective mode function, the reason being that\nchanging the state of a mode involves more than merely toggling\na single switch, so setting the mode variable is not enough.\nAlso, you should not use `after-init-hook' to disable this mode."] 4) (defalias 'magit-auto-revert-buffers #[0 "\205 \204\n\205 \205\f\206\305\306 )\207" [magit-auto-revert-immediately global-auto-revert-mode magit-auto-revert-mode auto-revert-buffer-list auto-revert-buffer-list-filter magit-auto-revert-repository-buffer-p auto-revert-buffers] 1]) (defvar magit-auto-revert-toplevel nil) #@56 Incremented each time `auto-revert-buffers' is called. (defvar magit-auto-revert-counter 1 (#$ . 10947)) #@215 Return non-nil if BUFFER visits a file inside the current repository. The current repository is the one containing `default-directory'. If there is no current repository, then return t for any BUFFER. (fn BUFFER) (defalias 'magit-auto-revert-buffer-p #[257 "\300\301\"\207" [magit-auto-revert-repository-buffer-p t] 4 (#$ . 11059)]) #@265 Return non-nil if BUFFER visits a file inside the current repository. The current repository is the one containing `default-directory'. If there is no current repository, then return FALLBACK (which defaults to nil) for any BUFFER. (fn BUFFER &optional FALLBACK) (defalias 'magit-auto-revert-repository-buffer-p #[513 "\203 A U\204\302 \206\303 B@\211\303=\203\207\304\305\"\306!\306!\232\2050\307\"\207" [magit-auto-revert-toplevel magit-auto-revert-counter magit-toplevel no-repo buffer-local-value default-directory file-remote-p file-in-directory-p] 7 (#$ . 11401)]) #@11 (fn FN) (defalias 'auto-revert-buffers--buffer-list-filter #[257 "T \204\n\203 \204\211 \207\305 \n\"\211 \210)\f?\205\"\306 \207" [magit-auto-revert-counter global-auto-revert-mode auto-revert-buffer-list auto-revert-buffer-list-filter auto-revert-timer -filter auto-revert-set-timer] 4 (#$ . 11997)]) (byte-code "\300\301\302\303#\210\304\305!\207" [advice-add auto-revert-buffers :around auto-revert-buffers--buffer-list-filter provide magit-autorevert] 4)