;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\311\312\311\313& \210\303\314\305\315\307\316\311\304&\210\317\320\321\322\323DD\324\325\326\311\304\327\330& \210\317\331\321\322\332DD\333\325\334\311\314\327\330& \210\317\335\321\322\336DD\337\325\340\311\314\327\330& \210\317\341\321\322\342DD\343\325\344\311\314\327\330& \210\317\345\321\322\346DD\347\325\350\311\314\327\330& \210\317\351\321\322\352DD\353\325\354\311\304\327\355& \210\317\356\321\322\357DD\360\325\361\311\304\327\330& \210\317\362\321\322\363DD\364\365\366\367\370\327\355\325\371&\207" [require magit-core magit-log custom-declare-group magit-wip nil "Automatically commit to work-in-progress refs." :link (info-link "(magit)Wip Modes") :group magit-modes magit-essentials magit-wip-legacy "It is better to not use these modes individually." (info-link "(magit)Legacy Wip Modes") custom-declare-variable magit-wip-mode-lighter funcall function #[0 "\300\207" [#1=" Wip"] 1 #1#] "Lighter for Magit-Wip mode." :package-version (magit . "2.90.0") :type string magit-wip-after-save-local-mode-lighter #[0 "\300\207" [#2=""] 1 #2#] "Lighter for Magit-Wip-After-Save-Local mode." (magit . "2.1.0") magit-wip-after-apply-mode-lighter #[0 "\300\207" [#2#] 1 #2#] "Lighter for Magit-Wip-After-Apply mode." (magit . "2.1.0") magit-wip-before-change-mode-lighter #[0 "\300\207" [#2#] 1 #2#] "Lighter for Magit-Wip-Before-Change mode." (magit . "2.1.0") magit-wip-initial-backup-mode-lighter #[0 "\300\207" [#2#] 1 #2#] "Lighter for Magit-Wip-Initial Backup mode." (magit . "2.1.0") magit-wip-merge-branch #[0 "\300\207" [nil] 1] "Whether to merge the current branch into its wip ref.\n\nIf non-nil and the current branch has new commits, then it is\nmerged into the wip ref before creating a new wip commit. This\nmakes it easier to inspect wip history and the wip commits are\nnever garbage collected.\n\nIf nil and the current branch has new commits, then the wip ref\nis reset to the tip of the branch before creating a new wip\ncommit. With this setting wip commits are eventually garbage\ncollected. This is currently the default." (magit . "2.90.0") boolean magit-wip-namespace #[0 "\300\207" [#3="refs/wip/"] 1 #3#] "Namespace used for work-in-progress refs.\nThe wip refs are named \"index/\"\nand \"wtree/\". When snapshots\nare created while the `HEAD' is detached then \"HEAD\"\nis used as `branch-ref'." (magit . "2.1.0") magit-wip-mode #[0 "\300\207" [nil] 1] "Non-nil if Magit-Wip mode is enabled.\nSee the `magit-wip-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-wip-mode'." :set custom-set-minor-mode :initialize custom-initialize-default (magit . "2.90.0")] 12)
#@999 Save uncommitted changes to work-in-progress refs.
This is a minor mode. If called interactively, toggle the
`Magit-Wip mode' mode. If the prefix argument is positive,
enable the mode, and if it is zero or negative, disable the mode.
If called from Lisp, toggle the mode if ARG is `toggle'. Enable
the mode if ARG is nil, omitted, or is a positive number.
Disable the mode if ARG is a negative number.
To check whether the minor mode is enabled in the current buffer,
evaluate `(default-value 'magit-wip-mode)'.
The mode's hook is called both when the mode is enabled and when
it is disabled.
Whenever appropriate (i.e. when dataloss would be a possibility
otherwise) this mode causes uncommitted changes to be committed
to dedicated work-in-progress refs.
For historic reasons this mode is implemented on top of four
other `magit-wip-*' modes, which can also be used individually,
if you want finer control over when the wip refs are updated;
but that is discouraged.
(fn &optional ARG)
(defalias 'magit-wip-mode #[256 "\302 \303\301\304=\203 \305\301!?\202! \247\203 \306W\203 \307\202! \310\"\210\311\300!\2038 \312\301\"\305\301!\2038 \301B \203@ \306\202A \313\314!\210\315!\210\316!\210\317!\266\320\321\305\301!\203^ \322\202_ \323\"\210\324\325!\203\207 \326\301!\210\302 \203w \211\302 \232\203\207 \327\330\305\301!\203\203 \331\202\204 \332\333#\210\210\334 \210\305\301!\207" [global-minor-modes magit-wip-mode current-message set-default toggle default-value 1 nil t boundp delq -1 magit-wip-after-save-mode magit-wip-after-apply-mode magit-wip-before-change-mode magit-wip-initial-backup-mode run-hooks magit-wip-mode-hook magit-wip-mode-on-hook magit-wip-mode-off-hook called-interactively-p any customize-mark-as-set message "Magit-Wip mode %sabled%s" "en" "dis" "" force-mode-line-update] 6 (#$ . 2952) (byte-code "\203\n \301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar magit-wip-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\313\314\300!\205# \310\211%\207" [magit-wip-mode-map magit-wip-mode-hook variable-documentation put "Hook run after entering or leaving `magit-wip-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-wip-mode magit-wip-mode-lighter boundp] 6)
#@131 Non-nil if Magit-Wip-After-Save-Local mode is enabled.
Use the command `magit-wip-after-save-local-mode' to change this
variable.
(defvar magit-wip-after-save-local-mode nil (#$ . 5418))
(make-variable-buffer-local 'magit-wip-after-save-local-mode)
#@896 After saving, also commit to a worktree work-in-progress ref.
This is a minor mode. If called interactively, toggle the
`Magit-Wip-After-Save-Local mode' mode. If the prefix argument
is positive, enable the mode, and if it is zero or negative,
disable the mode.
If called from Lisp, toggle the mode if ARG is `toggle'. Enable
the mode if ARG is nil, omitted, or is a positive number.
Disable the mode if ARG is a negative number.
To check whether the minor mode is enabled in the current buffer,
evaluate `magit-wip-after-save-local-mode'.
The mode's hook is called both when the mode is enabled and when
it is disabled.
After saving the current file-visiting buffer this mode also
commits the changes to the worktree work-in-progress ref for
the current branch.
This mode should be enabled globally by turning on the globalized
variant `magit-wip-after-save-mode'.
(fn &optional ARG)
(defalias 'magit-wip-after-save-local-mode #[256 "\303 \304=\203
?\202 \247\203 \305W\203 \306\202 \307\310\301!\2031 \311\300 \"\2031 \300 B\203R \n\203I \312\307!\203I \313\314\315\307\211$\210\202X \306\316\317!\210\202X \320\314\315\307#\210\321\322\203b \323\202c \324\"\210\325\326!\203\205 \303 \203w \211\303 \232\203\205 \327\330\203\201 \331\202\202 \332\333#\210\210\334 \210\207" [magit-wip-after-save-local-mode local-minor-modes buffer-file-name current-message toggle 1 nil t boundp delq magit-inside-worktree-p add-hook after-save-hook magit-wip-commit-buffer-file user-error "Need a worktree and a file" remove-hook run-hooks magit-wip-after-save-local-mode-hook magit-wip-after-save-local-mode-on-hook magit-wip-after-save-local-mode-off-hook called-interactively-p any message "Magit-Wip-After-Save-Local mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 7 (#$ . 5674) (byte-code "\203\n \301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar magit-wip-after-save-local-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\313\314\300!\205# \310\211%\207" [magit-wip-after-save-local-mode-map magit-wip-after-save-local-mode-hook variable-documentation put "Hook run after entering or leaving `magit-wip-after-save-local-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-wip-after-save-local-mode magit-wip-after-save-local-mode-lighter boundp] 6)
(defalias 'magit-wip-after-save-local-mode-turn-on #[0 "\205 \301\302!\205 \303!\205 \304 \207" [buffer-file-name magit-inside-worktree-p t magit-file-tracked-p magit-wip-after-save-local-mode] 2])
(put 'magit-wip-after-save-mode 'globalized-minor-mode t)
(defvar magit-wip-after-save-local-mode-major-mode nil nil)
(byte-code "\300\301!\210\302\303\304\305\306DD\307\310\311\312\313\314\315\316\317\320\321&
\207" [make-variable-buffer-local magit-wip-after-save-local-mode-major-mode custom-declare-variable magit-wip-after-save-mode funcall function #[0 "\300\207" [nil] 1] "Non-nil if Magit-Wip-After-Save mode is enabled.\nSee the `magit-wip-after-save-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-wip-after-save-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :type boolean :group magit-wip :package-version (magit . "2.1.0")] 14)
#@449 Toggle Magit-Wip-After-Save-Local mode in all buffers.
With prefix ARG, enable Magit-Wip-After-Save mode if ARG is
positive; otherwise, disable it. If called from Lisp, enable the mode if ARG
is omitted or nil.
Magit-Wip-After-Save-Local mode is enabled in all buffers where
`magit-wip-after-save-local-mode-turn-on' would do it.
See `magit-wip-after-save-local-mode' for more information on
Magit-Wip-After-Save-Local mode.
(fn &optional ARG)
(defalias 'magit-wip-after-save-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-wip-after-save-mode magit-wip-after-save-local-mode current-message set-default toggle default-value 1 nil t boundp delq add-hook after-change-major-mode-hook magit-wip-after-save-mode-enable-in-buffers find-file-hook magit-wip-after-save-mode-check-buffers change-major-mode-hook magit-wip-after-save-mode-cmhh remove-hook buffer-list magit-wip-after-save-local-mode-turn-on -1 run-hooks magit-wip-after-save-mode-hook magit-wip-after-save-mode-on-hook magit-wip-after-save-mode-off-hook called-interactively-p any customize-mark-as-set message "Magit-Wip-After-Save mode %sabled%s" "en" "dis" "" force-mode-line-update] 6 (#$ . 9240) (byte-code "\203\n \301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar magit-wip-after-save-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-wip-after-save-mode-map magit-wip-after-save-mode-hook variable-documentation put "Hook run after entering or leaving `magit-wip-after-save-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-wip-after-save-mode boundp] 6)
(defvar magit-wip-after-save-local-mode-set-explicitly nil nil)
(make-variable-buffer-local 'magit-wip-after-save-local-mode-set-explicitly)
(defalias 'magit-wip-after-save-local-mode-set-explicitly #[0 "\301\211\207" [magit-wip-after-save-local-mode-set-explicitly t] 2])
(byte-code "\300\301\302\303#\210\304\305\301\"\207" [put magit-wip-after-save-local-mode-set-explicitly definition-name magit-wip-after-save-mode add-hook magit-wip-after-save-local-mode-hook] 4)
(defvar magit-wip-after-save-mode-buffers nil)
(defalias 'magit-wip-after-save-mode-enable-in-buffers #[0 "\305\211\211\2059 \211@\306!\2032 r\211q\210 \204/ \n=\204/ \f\203, \304\307!\210\310 \210\202/ \310 \210)A\266\202\202 \207" [magit-wip-after-save-mode-buffers magit-wip-after-save-local-mode-set-explicitly magit-wip-after-save-local-mode-major-mode major-mode magit-wip-after-save-local-mode nil buffer-live-p -1 magit-wip-after-save-local-mode-turn-on] 5])
(put 'magit-wip-after-save-mode-enable-in-buffers 'definition-name 'magit-wip-after-save-mode)
(defalias 'magit-wip-after-save-mode-check-buffers #[0 "\300 \210\301\302\303\"\207" [magit-wip-after-save-mode-enable-in-buffers remove-hook post-command-hook magit-wip-after-save-mode-check-buffers] 3])
(put 'magit-wip-after-save-mode-check-buffers 'definition-name 'magit-wip-after-save-mode)
(defalias 'magit-wip-after-save-mode-cmhh #[0 "\300\301p\"\210\302\303\304\"\207" [add-to-list magit-wip-after-save-mode-buffers add-hook post-command-hook magit-wip-after-save-mode-check-buffers] 3])
(put 'magit-wip-after-save-mode-cmhh 'definition-name 'magit-wip-after-save-mode)
#@207 Commit visited file to a worktree work-in-progress ref.
Also see `magit-wip-after-save-mode' which calls this function
automatically whenever a buffer visiting a tracked file is saved.
(fn &optional MSG)
(defalias 'magit-wip-commit-buffer-file #[256 "\302 \211\2053 \303 \211\203/ \211\304 !\305C\306\206&