;ELC
|
;;; Compiled
|
;;; in Emacs version 26.1
|
;;; with all optimizations.
|
|
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
|
|
;;; This file does not contain utf-8 non-ASCII characters,
|
;;; and so can be loaded in Emacs versions earlier than 23.
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
(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\311\304\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 \"<namespace/>index/<branchref>\"\nand \"<namespace/>wtree/<branchref>\". 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")] 14)
|
#@450 Save uncommitted changes to work-in-progress refs.
|
|
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 "\301 \302\300\303=\203 \304\300!?\202 \305!\306V\"\210\203 \307\202! \310\311!\210\312!\210\313!\210\314!\266\315\316\304\300!\203> \317\202? \320\"\210\321\322!\203i \323\300!\210\301 \203W \211\301 \232\203i \324\325\326\304\300!\203d \327\202e \330#\266\210\331 \210\304\300!\207" [magit-wip-mode current-message set-default toggle default-value prefix-numeric-value 0 1 -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] 7 (#$ . 3281) (byte-code "\206 \301C\207" [current-prefix-arg toggle] 1)])
|
(defvar magit-wip-mode-hook nil)
|
(byte-code "\301\302N\204\f \303\301\302\304#\210\305\306\307\310\300!\205 \311\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.)" add-minor-mode magit-wip-mode magit-wip-mode-lighter boundp nil] 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 (#$ . 4990))
|
(make-variable-buffer-local 'magit-wip-after-save-local-mode)
|
#@330 After saving, also commit to a worktree work-in-progress ref.
|
|
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 "\302 \303=\203 ?\202 \304!\305V\211\2034 \203+ \306\307!\203+ \310\311\312\307\211$\210\202: \313\314\315!\210\202: \316\311\312\307#\210\317\320\203D \321\202E \322\"\210\323\324!\203i \302 \203Y \211\302 \232\203i \325\326\327\203d \330\202e \331#\266\210\332 \210\207" [magit-wip-after-save-local-mode buffer-file-name current-message toggle prefix-numeric-value 0 magit-inside-worktree-p t add-hook after-save-hook magit-wip-commit-buffer-file nil 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 " in current buffer" message "Magit-Wip-After-Save-Local mode %sabled%s" "en" "dis" force-mode-line-update] 8 (#$ . 5246) (byte-code "\206 \301C\207" [current-prefix-arg toggle] 1)])
|
(defvar magit-wip-after-save-local-mode-hook nil)
|
(byte-code "\301\302N\204\f \303\301\302\304#\210\305\306\307\310\300!\205 \311\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.)" add-minor-mode magit-wip-after-save-local-mode magit-wip-after-save-local-mode-lighter boundp nil] 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])
|
(defvar magit-wip-after-save-local-mode-major-mode 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 :group magit-wip :type boolean :package-version (magit . "2.1.0")] 14)
|
#@448 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 "\302 \303\300\304=\203 \305\300!?\202 \306!\307V\"\210\203. \310\311\312\"\210\310\313\314\"\210\310\315\316\"\210\202= \317\311\312\"\210\317\313\314\"\210\317\315\316\"\210\320 \211\203c \211@r\211q\210\203S \321 \210\202[ \203[ \301\322!\210)A\266\202\202? \210\323\324\305\300!\203p \325\202q \326\"\210\327\330!\203\233 \331\300!\210\302 \203\211 \211\302 \232\203\233 \332\333\334\305\300!\203\226 \335\202\227 \336#\266\210\337 \210\305\300!\207" [magit-wip-after-save-mode magit-wip-after-save-local-mode current-message set-default toggle default-value prefix-numeric-value 0 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] 7 (#$ . 7991) (byte-code "\206 \301C\207" [current-prefix-arg toggle] 1)])
|
(defvar magit-wip-after-save-mode-hook nil)
|
(byte-code "\301\302N\204\f \303\301\302\304#\210\305\306\307\310\300!\205 \307\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.)" add-minor-mode magit-wip-after-save-mode nil 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 "\211\2056 \211@\305!\203/ r\211q\210 \204, \n =\204, \f\203) \304\306!\210\307 \210\202, \307 \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 buffer-live-p -1 magit-wip-after-save-local-mode-turn-on] 4])
|
(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 "\301 \210\302\303\304\305\"\207" [magit-wip-after-save-mode-buffers magit-wip-after-save-mode-enable-in-buffers nil 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& \307\310!\203% \311\202& \312\"#\262)\2021 \313 \262\207" [default-directory buffer-file-name magit-wip-get-ref magit-toplevel file-relative-name magit-wip-commit-worktree format called-interactively-p any "wip-save %s after save" "autosave %s after save" magit--not-inside-repository-error] 10 (#$ . 11786) nil])
|
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315\316\317& \207" [custom-declare-variable magit-wip-after-apply-mode funcall function #[0 "\300\207" [nil] 1] "Non-nil if Magit-Wip-After-Apply mode is enabled.\nSee the `magit-wip-after-apply-mode' command\nfor a description of this minor mode." :set custom-set-minor-mode :initialize custom-initialize-default :group magit-wip :type boolean :package-version (magit . "2.1.0")] 14)
|
#@377 Commit to work-in-progress refs.
|
|
After applying a change using any "apply variant"
|
command (apply, stage, unstage, discard, and reverse) commit the
|
affected files to the current wip refs. For each branch there
|
may be two wip refs; one contains snapshots of the files as found
|
in the worktree and the other contains snapshots of the entries
|
in the index.
|
|
(fn &optional ARG)
|
(defalias 'magit-wip-after-apply-mode #[256 "\300 \301\302\303=\203 \304\302!?\202 \305!\306V\"\210\307\310\304\302!\203$ \311\202% \312\"\210\313\314!\203O \315\302!\210\300 \203= \211\300 \232\203O \316\317\320\304\302!\203J \321\202K \322#\266\210\323 \210\304\302!\207" [current-message set-default magit-wip-after-apply-mode toggle default-value prefix-numeric-value 0 run-hooks magit-wip-after-apply-mode-hook magit-wip-after-apply-mode-on-hook magit-wip-after-apply-mode-off-hook called-interactively-p any customize-mark-as-set "" message "Magit-Wip-After-Apply mode %sabled%s" "en" "dis" force-mode-line-update] 7 (#$ . 12875) (byte-code "\206 \301C\207" [current-prefix-arg toggle] 1)])
|
(defvar magit-wip-after-apply-mode-hook nil)
|
(byte-code "\301\302N\204\f \303\301\302\304#\210\305\306\307\310\300!\205 \311\211%\207" [magit-wip-after-apply-mode-map magit-wip-after-apply-mode-hook variable-documentation put "Hook run after entering or leaving `magit-wip-after-apply-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" add-minor-mode magit-wip-after-apply-mode magit-wip-after-apply-mode-lighter boundp nil] 6)
|
#@28
|
|
(fn &optional FILES MSG)
|
(defalias 'magit-wip-commit-after-apply #[512 "\205 \301\"\207" [magit-wip-after-apply-mode magit-wip-commit] 5 (#$ . 14476)])
|
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315\316\317& \207" [custom-declare-variable magit-wip-before-change-mode funcall function #[0 "\300\207" [nil] 1] "Non-nil if Magit-Wip-Before-Change mode is enabled.\nSee the `magit-wip-before-change-mode' command\nfor a description of this minor mode." :set custom-set-minor-mode :initialize custom-initialize-default :group magit-wip :type boolean :package-version (magit . "2.1.0")] 14)
|
#@542 Commit to work-in-progress refs before certain destructive changes.
|
|
Before invoking a revert command or an "apply variant"
|
command (apply, stage, unstage, discard, and reverse) commit the
|
affected tracked files to the current wip refs. For each branch
|
there may be two wip refs; one contains snapshots of the files
|
as found in the worktree and the other contains snapshots of the
|
entries in the index.
|
|
Only changes to files which could potentially be affected by the
|
command which is about to be called are committed.
|
|
(fn &optional ARG)
|
(defalias 'magit-wip-before-change-mode #[256 "\300 \301\302\303=\203 \304\302!?\202 \305!\306V\"\210\307\310\304\302!\203$ \311\202% \312\"\210\313\314!\203O \315\302!\210\300 \203= \211\300 \232\203O \316\317\320\304\302!\203J \321\202K \322#\266\210\323 \210\304\302!\207" [current-message set-default magit-wip-before-change-mode toggle default-value prefix-numeric-value 0 run-hooks magit-wip-before-change-mode-hook magit-wip-before-change-mode-on-hook magit-wip-before-change-mode-off-hook called-interactively-p any customize-mark-as-set "" message "Magit-Wip-Before-Change mode %sabled%s" "en" "dis" force-mode-line-update] 7 (#$ . 15099) (byte-code "\206 \301C\207" [current-prefix-arg toggle] 1)])
|
(defvar magit-wip-before-change-mode-hook nil)
|
(byte-code "\301\302N\204\f \303\301\302\304#\210\305\306\307\310\300!\205 \311\211%\207" [magit-wip-before-change-mode-map magit-wip-before-change-mode-hook variable-documentation put "Hook run after entering or leaving `magit-wip-before-change-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" add-minor-mode magit-wip-before-change-mode magit-wip-before-change-mode-lighter boundp nil] 6)
|
#@28
|
|
(fn &optional FILES MSG)
|
(defalias 'magit-wip-commit-before-change #[512 "\205 \302 \211\203 \211\303\")\202 \304 \262\207" [magit-wip-before-change-mode default-directory magit-toplevel magit-wip-commit magit--not-inside-repository-error] 6 (#$ . 16889)])
|
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315\316\317& \207" [custom-declare-variable magit-wip-initial-backup-mode funcall function #[0 "\300\207" [nil] 1] "Non-nil if Magit-Wip-Initial-Backup mode is enabled.\nSee the `magit-wip-initial-backup-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-initial-backup-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :group magit-wip :type boolean :package-version (magit . "2.90.0")] 14)
|
#@85 Before saving a buffer for the first time, commit to a wip ref.
|
|
(fn &optional ARG)
|
(defalias 'magit-wip-initial-backup-mode #[256 "\301 \302\300\303=\203 \304\300!?\202 \305!\306V\"\210\203$ \307\310\311\"\210\202) \312\310\311\"\210\313\314\304\300!\2035 \315\2026 \316\"\210\317\320!\203` \321\300!\210\301 \203N \211\301 \232\203` \322\323\324\304\300!\203[ \325\202\\ \326#\266\210\327 \210\304\300!\207" [magit-wip-initial-backup-mode current-message set-default toggle default-value prefix-numeric-value 0 add-hook before-save-hook magit-wip-commit-initial-backup remove-hook run-hooks magit-wip-initial-backup-mode-hook magit-wip-initial-backup-mode-on-hook magit-wip-initial-backup-mode-off-hook called-interactively-p any customize-mark-as-set "" message "Magit-Wip-Initial-Backup mode %sabled%s" "en" "dis" force-mode-line-update] 7 (#$ . 17795) (byte-code "\206 \301C\207" [current-prefix-arg toggle] 1)])
|
(defvar magit-wip-initial-backup-mode-hook nil)
|
(byte-code "\301\302N\204\f \303\301\302\304#\210\305\306\307\310\300!\205 \311\211%\207" [magit-wip-initial-backup-mode-map magit-wip-initial-backup-mode-hook variable-documentation put "Hook run after entering or leaving `magit-wip-initial-backup-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" add-minor-mode magit-wip-initial-backup-mode magit-wip-initial-backup-mode-lighter boundp nil] 6)
|
(defvar magit-wip-buffer-backed-up nil nil)
|
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local magit-wip-buffer-backed-up put permanent-local t] 4)
|
#@640 Before saving, commit current file to a worktree wip ref.
|
|
The user has to add this function to `before-save-hook'.
|
|
Commit the current state of the visited file before saving the
|
current buffer to that file. This backs up the same version of
|
the file as `backup-buffer' would, but stores the backup in the
|
worktree wip ref, which is also used by the various Magit Wip
|
modes, instead of in a backup file as `backup-buffer' would.
|
|
This function ignores the variables that affect `backup-buffer'
|
and can be used along-side that function, which is recommended
|
because this function only backs up files that are tracked in
|
a Git repository.
|
(defalias 'magit-wip-commit-initial-backup #[0 "?\205 \205 \303\304!\205 \305 !\205 \306\307\310!\210)\304\211\207" [magit-wip-buffer-backed-up buffer-file-name magit-save-repository-buffers magit-inside-worktree-p t magit-file-tracked-p nil magit-wip-commit-buffer-file "autosave %s before save"] 2 (#$ . 19434)])
|
#@318 Commit all tracked files to the work-in-progress refs.
|
|
Interactively, commit all changes to all tracked files using
|
a generic commit message. With a prefix-argument the commit
|
message is read in the minibuffer.
|
|
Non-interactively, only commit changes to FILES using MSG as
|
commit message.
|
|
(fn &optional FILES MSG)
|
(defalias 'magit-wip-commit #[512 "\300 \211\205 \301#\210\302#\207" [magit-wip-get-ref magit-wip-commit-index magit-wip-commit-worktree] 7 (#$ . 20403) (byte-code "\301\203 \302\303!\202\f \304D\207" [current-prefix-arg nil magit-read-string "Wip commit message" "wip-save tracked files"] 3)])
|
#@22
|
|
(fn REF FILES MSG)
|
(defalias 'magit-wip-commit-index #[771 "\300!\301\"\302\303!\304 \305&\207" [magit--wip-index-ref magit-wip-get-parent magit-git-string "write-tree" magit-wip-update-wipref "index"] 14 (#$ . 21030)])
|
#@22
|
|
(fn REF FILES MSG)
|
(defalias 'magit-wip-commit-worktree #[771 "\304!\305\"\306\307\310\311\312!!!\313\314\315\316\317!\320\"\321$\216\322 \211\203\247 \211\211\203; \323\324\325\326P$\204; \327\330\"\210\210\331 !\203t \332P\nB\203W \333\334\335 #\210\202m \322 \211\203i \211\333\334\336\337#\210)\202l \340 \210\210\341\342!)\202\243 \332P B\203\211 \333\334\335 #\210\202\237 \322 \211\203\233 \211\333\334\336\337#\210)\202\236 \340 \210\210\341\342!))\202\251 \340 \262*\266\202\343 \344&\207" [magit--refresh-cache default-directory magit-tramp-process-environment process-environment magit--wip-wtree-ref magit-wip-get-parent nil magit-convert-filename-for-git make-temp-name magit-git-dir "index.magit." make-byte-code 0 "\3021 \303\304 !\300P!0\207\210\305\207" vconcat vector [default-directory (error) delete-file file-remote-p nil] 3 magit-toplevel magit-git-success "read-tree" "--reset" "--index-output=" error "Cannot read tree %s" file-remote-p "GIT_INDEX_FILE=" magit-call-git "add" "--" "-u" "." magit--not-inside-repository-error magit-git-string "write-tree" magit-wip-update-wipref "worktree"] 15 (#$ . 21270)])
|
#@51
|
|
(fn REF WIPREF TREE PARENT FILES MSG START-MSG)
|
(defalias 'magit-wip-update-wipref #[1799 "\232\2042 \203 \301!\2042 \302P\262\303\304\305\306\307\n\310 \311P&#\210\262\202s \203s \312\"\203P \312\304\313\314\315\316 %\317P\"\204s \320\321#\262\303\304\305\306\307\f\307\310 \311P& #\210\262\322\323\324\325&\205\306 \203\216 \326H\327U\203\264 G\211\326U\203\232 \330\202\257 \211\331V\203\247 \320\332\"\202\257 \333\334@\335 \"PP\262\210\303\304\305\306\307\n\310\n&#\207" [magit-wip-merge-branch magit-rev-verify "start autosaving " magit-update-ref magit-git-string "commit-tree" "--no-gpg-sign" "-p" "-m" "^{tree}" magit-rev-ancestor-p "log" "--format=%H" "-1" "--merges" "^2" format "merge %s into %s" magit-git-failure "diff-tree" "--quiet" "--" 0 32 "autosave tracked files" 1 "autosave %s files" "autosave " file-relative-name magit-toplevel] 21 (#$ . 22446)])
|
(defalias 'magit-wip-get-ref #[0 "\300\301\302\"\206 \302\303!\205 \211\207" [magit-git-string "symbolic-ref" "HEAD" magit-rev-verify] 3])
|
#@19
|
|
(fn REF WIPREF)
|
(defalias 'magit-wip-get-parent #[514 "\300!\203 \301\302#\300!\232\203 \207\207" [magit-rev-verify magit-git-string "merge-base"] 6 (#$ . 23531)])
|
#@22
|
|
(fn &optional REF)
|
(defalias 'magit--wip-index-ref #[256 "\300\301\"\207" [magit--wip-ref "index/"] 4 (#$ . 23710)])
|
#@22
|
|
(fn &optional REF)
|
(defalias 'magit--wip-wtree-ref #[256 "\300\301\"\207" [magit--wip-ref "wtree/"] 4 (#$ . 23836)])
|
#@32
|
|
(fn NAMESPACE &optional REF)
|
(defalias 'magit--wip-ref #[513 "\203 \301\302\"\203 \206$ \206 \303 \211\205 \304P\262\206$ \305Q\207" [magit-wip-namespace string-prefix-p "refs/" magit-get-current-branch "refs/heads/" "HEAD"] 7 (#$ . 23962)])
|
(defalias 'magit-wip-maybe-add-commit-hook #[0 "\205 \301 \205 \302\303\304\305\306$\207" [magit-wip-merge-branch magit-wip-any-enabled-p add-hook git-commit-post-finish-hook magit-wip-commit nil t] 5])
|
(defalias 'magit-wip-any-enabled-p #[0 "\206 \206 \n\206 \206 \f\206 \207" [magit-wip-mode magit-wip-after-save-local-mode magit-wip-after-save-mode magit-wip-after-apply-mode magit-wip-before-change-mode magit-wip-initial-backup-mode] 1])
|
#@72 Show log for the index wip ref of the current branch.
|
|
(fn ARGS FILES)
|
(defalias 'magit-wip-log-index #[514 "\300\301 C#\207" [magit-git-log magit--wip-index-ref] 6 (#$ . 24679) (magit-log-arguments)])
|
#@75 Show log for the worktree wip ref of the current branch.
|
|
(fn ARGS FILES)
|
(defalias 'magit-wip-log-worktree #[514 "\300\301 C#\207" [magit-git-log magit--wip-wtree-ref] 6 (#$ . 24889) (magit-log-arguments)])
|
#@251 Show log for the current branch and its wip refs.
|
With a negative prefix argument only show the worktree wip ref.
|
The absolute numeric value of the prefix argument controls how
|
many "branches" of each wip ref are shown.
|
|
(fn BRANCH ARGS FILES COUNT)
|
(defalias 'magit-wip-log-current #[1028 "\300$\207" [magit-wip-log] 9 (#$ . 25106) (byte-code "\301 \206 \302C\303 \244\304!C\244\207" [current-prefix-arg magit-get-current-branch "HEAD" magit-log-arguments prefix-numeric-value] 3)])
|
#@241 Show log for a branch and its wip refs.
|
With a negative prefix argument only show the worktree wip ref.
|
The absolute numeric value of the prefix argument controls how
|
many "branches" of each wip ref are shown.
|
|
(fn BRANCH ARGS FILES COUNT)
|
(defalias 'magit-wip-log #[1028 "\300C\301\302!\303!\"\244\304Y\205 \301\305!\303!\"\244#\207" [magit-git-log magit-wip-log-get-tips magit--wip-wtree-ref abs 0 magit--wip-index-ref] 10 (#$ . 25603) (byte-code "\301\302\303\304 \305\"\306\307\306\310\311 \206 \312 \206 \305&C\313 \244\314!C\244\207" [current-prefix-arg magit-completing-read "Log branch and its wip refs" -snoc magit-list-local-branch-names "HEAD" nil t magit-revision-history magit-branch-at-point magit-get-current-branch magit-log-arguments prefix-numeric-value] 8)])
|
#@21
|
|
(fn WIPREF COUNT)
|
(defalias 'magit-wip-log-get-tips #[514 "\300\301\"\211\205F \302\203@ \303V\203@ \304\305\306\307$\262A@\2034 \310\311A@\"\2034 \312\303A@\"B\262AA\262S\262\202 \237B\262\207" [magit-git-lines "reflog" nil 1 cl-member "^[^ ]+ [^:]+: restart autosaving" :test string-match-p string-match "^[^ ]+ \\([^:]+\\)" match-string] 9 (#$ . 26402)])
|
(provide 'magit-wip)
|
