mirror of https://github.com/Chizi123/.emacs.d.git

Chizi123
2018-11-18 8f6f2705a38e2515b6c57fda12c5be29fb9a798f
commit | author | age
5cb5f7 1 ;ELC
C 2 ;;; Compiled
3 ;;; in Emacs version 26.1
4 ;;; with all optimizations.
5
6 ;;; This file uses dynamic docstrings, first added in Emacs 19.29.
7
8 ;;; This file does not contain utf-8 non-ASCII characters,
9 ;;; and so can be loaded in Emacs versions earlier than 23.
10
11 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
12 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
13
14
15 (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)
16 #@450 Save uncommitted changes to work-in-progress refs.
17
18 Whenever appropriate (i.e. when dataloss would be a possibility
19 otherwise) this mode causes uncommitted changes to be committed
20 to dedicated work-in-progress refs.
21
22 For historic reasons this mode is implemented on top of four
23 other `magit-wip-*' modes, which can also be used individually,
24 if you want finer control over when the wip refs are updated;
25 but that is discouraged.
26
27 (fn &optional ARG)
28 (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)])
29 (defvar magit-wip-mode-hook nil)
30 (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)
31 #@131 Non-nil if Magit-Wip-After-Save-Local mode is enabled.
32 Use the command `magit-wip-after-save-local-mode' to change this variable.
33 (defvar magit-wip-after-save-local-mode nil (#$ . 4990))
34 (make-variable-buffer-local 'magit-wip-after-save-local-mode)
35 #@330 After saving, also commit to a worktree work-in-progress ref.
36
37 After saving the current file-visiting buffer this mode also
38 commits the changes to the worktree work-in-progress ref for
39 the current branch.
40
41 This mode should be enabled globally by turning on the globalized
42 variant `magit-wip-after-save-mode'.
43
44 (fn &optional ARG)
45 (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)])
46 (defvar magit-wip-after-save-local-mode-hook nil)
47 (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)
48 (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])
49 (defvar magit-wip-after-save-local-mode-major-mode nil)
50 (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)
51 #@448 Toggle Magit-Wip-After-Save-Local mode in all buffers.
52 With prefix ARG, enable Magit-Wip-After-Save mode if ARG is positive;
53 otherwise, disable it.  If called from Lisp, enable the mode if
54 ARG is omitted or nil.
55
56 Magit-Wip-After-Save-Local mode is enabled in all buffers where
57 `magit-wip-after-save-local-mode-turn-on' would do it.
58 See `magit-wip-after-save-local-mode' for more information on Magit-Wip-After-Save-Local mode.
59
60 (fn &optional ARG)
61 (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)])
62 (defvar magit-wip-after-save-mode-hook nil)
63 (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)
64 (defvar magit-wip-after-save-local-mode-set-explicitly nil nil)
65 (make-variable-buffer-local 'magit-wip-after-save-local-mode-set-explicitly)
66 (defalias 'magit-wip-after-save-local-mode-set-explicitly #[0 "\301\211\207" [magit-wip-after-save-local-mode-set-explicitly t] 2])
67 (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)
68 (defvar magit-wip-after-save-mode-buffers nil)
69 (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])
70 (put 'magit-wip-after-save-mode-enable-in-buffers 'definition-name 'magit-wip-after-save-mode)
71 (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])
72 (put 'magit-wip-after-save-mode-check-buffers 'definition-name 'magit-wip-after-save-mode)
73 (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])
74 (put 'magit-wip-after-save-mode-cmhh 'definition-name 'magit-wip-after-save-mode)
75 #@207 Commit visited file to a worktree work-in-progress ref.
76
77 Also see `magit-wip-after-save-mode' which calls this function
78 automatically whenever a buffer visiting a tracked file is saved.
79
80 (fn &optional MSG)
81 (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])
82 (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)
83 #@377 Commit to work-in-progress refs.
84
85 After applying a change using any "apply variant"
86 command (apply, stage, unstage, discard, and reverse) commit the
87 affected files to the current wip refs.  For each branch there
88 may be two wip refs; one contains snapshots of the files as found
89 in the worktree and the other contains snapshots of the entries
90 in the index.
91
92 (fn &optional ARG)
93 (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)])
94 (defvar magit-wip-after-apply-mode-hook nil)
95 (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)
96 #@28 
97
98 (fn &optional FILES MSG)
99 (defalias 'magit-wip-commit-after-apply #[512 "\205\301\"\207" [magit-wip-after-apply-mode magit-wip-commit] 5 (#$ . 14476)])
100 (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)
101 #@542 Commit to work-in-progress refs before certain destructive changes.
102
103 Before invoking a revert command or an "apply variant"
104 command (apply, stage, unstage, discard, and reverse) commit the
105 affected tracked files to the current wip refs.  For each branch
106 there may be two wip refs; one contains snapshots of the files
107 as found in the worktree and the other contains snapshots of the
108 entries in the index.
109
110 Only changes to files which could potentially be affected by the
111 command which is about to be called are committed.
112
113 (fn &optional ARG)
114 (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)])
115 (defvar magit-wip-before-change-mode-hook nil)
116 (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)
117 #@28 
118
119 (fn &optional FILES MSG)
120 (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)])
121 (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)
122 #@85 Before saving a buffer for the first time, commit to a wip ref.
123
124 (fn &optional ARG)
125 (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)])
126 (defvar magit-wip-initial-backup-mode-hook nil)
127 (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)
128 (defvar magit-wip-buffer-backed-up nil nil)
129 (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local magit-wip-buffer-backed-up put permanent-local t] 4)
130 #@640 Before saving, commit current file to a worktree wip ref.
131
132 The user has to add this function to `before-save-hook'.
133
134 Commit the current state of the visited file before saving the
135 current buffer to that file.  This backs up the same version of
136 the file as `backup-buffer' would, but stores the backup in the
137 worktree wip ref, which is also used by the various Magit Wip
138 modes, instead of in a backup file as `backup-buffer' would.
139
140 This function ignores the variables that affect `backup-buffer'
141 and can be used along-side that function, which is recommended
142 because this function only backs up files that are tracked in
143 a Git repository.
144 (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)])
145 #@318 Commit all tracked files to the work-in-progress refs.
146
147 Interactively, commit all changes to all tracked files using
148 a generic commit message.  With a prefix-argument the commit
149 message is read in the minibuffer.
150
151 Non-interactively, only commit changes to FILES using MSG as
152 commit message.
153
154 (fn &optional FILES MSG)
155 (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)])
156 #@22 
157
158 (fn REF FILES MSG)
159 (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)])
160 #@22 
161
162 (fn REF FILES MSG)
163 (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)])
164 #@51 
165
166 (fn REF WIPREF TREE PARENT FILES MSG START-MSG)
167 (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\264G\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)])
168 (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])
169 #@19 
170
171 (fn REF WIPREF)
172 (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)])
173 #@22 
174
175 (fn &optional REF)
176 (defalias 'magit--wip-index-ref #[256 "\300\301\"\207" [magit--wip-ref "index/"] 4 (#$ . 23710)])
177 #@22 
178
179 (fn &optional REF)
180 (defalias 'magit--wip-wtree-ref #[256 "\300\301\"\207" [magit--wip-ref "wtree/"] 4 (#$ . 23836)])
181 #@32 
182
183 (fn NAMESPACE &optional REF)
184 (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)])
185 (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])
186 (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])
187 #@72 Show log for the index wip ref of the current branch.
188
189 (fn ARGS FILES)
190 (defalias 'magit-wip-log-index #[514 "\300\301 C#\207" [magit-git-log magit--wip-index-ref] 6 (#$ . 24679) (magit-log-arguments)])
191 #@75 Show log for the worktree wip ref of the current branch.
192
193 (fn ARGS FILES)
194 (defalias 'magit-wip-log-worktree #[514 "\300\301 C#\207" [magit-git-log magit--wip-wtree-ref] 6 (#$ . 24889) (magit-log-arguments)])
195 #@251 Show log for the current branch and its wip refs.
196 With a negative prefix argument only show the worktree wip ref.
197 The absolute numeric value of the prefix argument controls how
198 many "branches" of each wip ref are shown.
199
200 (fn BRANCH ARGS FILES COUNT)
201 (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)])
202 #@241 Show log for a branch and its wip refs.
203 With a negative prefix argument only show the worktree wip ref.
204 The absolute numeric value of the prefix argument controls how
205 many "branches" of each wip ref are shown.
206
207 (fn BRANCH ARGS FILES COUNT)
208 (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)])
209 #@21 
210
211 (fn WIPREF COUNT)
212 (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)])
213 (provide 'magit-wip)