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

Chizi123
2018-11-19 a4b9172aefa91861b587831e06f55b1e19f3f3be
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
;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.
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
(require 'magit)
(defvar magit-find-file-hook nil)
(add-hook 'magit-find-file-hook 'magit-blob-mode)
#@116 View FILE from REV.
Switch to a buffer visiting blob REV:FILE,
creating one if none already exists.
 
(fn REV FILE)
(defalias 'magit-find-file #[514 "\300\301\"!\207" [switch-to-buffer magit-find-file-noselect] 6 (#$ . 510) (magit-find-file-read-args "Find file")])
#@129 View FILE from REV, in another window.
Like `magit-find-file', but create a new window or reuse an
existing one.
 
(fn REV FILE)
(defalias 'magit-find-file-other-window #[514 "\300\301\"!\207" [switch-to-buffer-other-window magit-find-file-noselect] 6 (#$ . 784) (magit-find-file-read-args "Find file in other window")])
#@15 
 
(fn PROMPT)
(defalias 'magit-find-file-read-args #[257 "\300\301!\211\302\"D\207" [magit-read-branch-or-commit "Find file from revision" magit-read-file-from-rev] 6 (#$ . 1112)])
#@134 Read FILE from REV into a buffer and return the buffer.
FILE must be relative to the top directory of the repository.
 
(fn REV FILE)
(defalias 'magit-find-file-noselect #[514 "\300\301#\207" [magit-find-file-noselect-1 magit-find-file-hook] 6 (#$ . 1302)])
#@190 Read FILE from REV into a buffer and return the buffer.
FILE must be relative to the top directory of the repository.
An empty REV stands for index.
 
(fn REV FILE HOOKVAR &optional REVERT)
(defalias 'magit-find-file-noselect-1 #[1027 "\305 \306!\203\307\"\262r\310\"q\210\203-\311=\203)\312\313\314\315 \"!\204-\203d\316\230\2037\317\202<\320\321\"\322\"\323!\324!\203Q\211\202R\262\325\304!\210\326\327\330\211\"\210\331!\210p)\207" [magit-buffer-file-name magit-buffer-revision magit-buffer-refname default-directory revert-buffer-function magit-toplevel file-name-absolute-p file-relative-name magit-get-revision-buffer-create ask-revert y-or-n-p format "%s already exists; revert it? " buffer-name "" "{index}" magit-rev-format "%H" expand-file-name file-name-directory file-exists-p make-local-variable magit-revert-rev-file-buffer revert-buffer t run-hooks] 9 (#$ . 1568)])
#@17 
 
(fn REV FILE)
(defalias 'magit-get-revision-buffer-create #[514 "\300\301#\207" [magit-get-revision-buffer t] 6 (#$ . 2489)])
#@34 
 
(fn REV FILE &optional CREATE)
(defalias 'magit-get-revision-buffer #[770 "\211\203\300\202    \301\302\303\304\232\203\305\202\306\307\310    ##!\207" [get-buffer-create get-buffer format "%s.~%s~" "" "index" subst-char-in-string 47 95] 11 (#$ . 2625)])
#@30 
 
(fn IGNORE-AUTO NOCONFIRM)
(defalias 'magit-revert-rev-file-buffer #[514 "\211\204B\306 \204-\3072*\211\205'\211@\310    \"\203 \311\307\312\"\210A\266\202\202\2620\204B\313\314\315\n\316\232\203:\317\202=\320\nP\"!\205z\312\321 \322    ! \206O\323\324 \210\325\326\327\n\330Q#\210+\210    \331\332 \" !\333\312!\210*\312\"\334\335!\210eb\207" [revert-without-query magit-buffer-file-name magit-buffer-refname inhibit-read-only default-directory coding-system-for-read buffer-modified-p found string-match throw t yes-or-no-p format "Revert buffer from git %s? " "" "{index}" "revision " magit-toplevel file-relative-name undecided erase-buffer magit-git-insert "cat-file" "-p" ":" remq global-diff-hl-mode-enable-in-buffers normal-mode set-buffer-modified-p nil last-coding-system-used buffer-file-coding-system after-change-major-mode-hook buffer-file-name buffer-read-only] 9 (#$ . 2893)])
(defvar magit-find-index-hook nil)
#@156 Read FILE from the index into a buffer and return the buffer.
FILE must to be relative to the top directory of the repository.
 
(fn FILE &optional REVERT)
(defalias 'magit-find-file-index-noselect #[513 "\300\301\302\206    \303$\207" [magit-find-file-noselect-1 "" magit-find-index-hook ask-revert] 7 (#$ . 3849)])
#@167 Update the index with the contents of the current buffer.
The current buffer has to be visiting a file in the index, which
is done using `magit-find-index-noselect'.
(defalias 'magit-update-index #[0 "\306 \307\232\204 \310\311\"\210\312\313\314\315 \"!\203\223\316\317!p    \203%\320C\321\"\210\n\322\323\324!!\325\326\327\330\331!\332\"\333$\216r\211q\210\334!\210)r\211q\210\335\336\211\336\326%\210*\266)\337 \211\203|\211\340\341\342\343\344\345    #\326\346O\343\347\350\351\352\353 P\354 &%\210)\202\355 \210\210\356\336!\210 \203\216\357C\360\"\210\266\202\227\361\362!\210\210\363\364!\211\203\247r\211q\210\365 \210)\210\366\207" [magit-buffer-refname magit-wip-before-change-mode buffer-file-coding-system coding-system-for-write default-directory magit-wip-after-apply-mode magit-file-relative-name "" user-error "%s isn't visiting the index" y-or-n-p format "Update index with contents of %s" buffer-name make-temp-file "index" magit-wip-commit-before-change " before un-/stage" get-buffer-create generate-new-buffer-name " *temp file*" make-byte-code 0 "\301\300!\205    \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 insert-buffer-substring write-region nil magit-toplevel magit-call-git "update-index" "--cacheinfo" magit-git-string "ls-files" "-s" 6 "hash-object" "-t" "blob" "-w" "--path=" "--" magit--not-inside-repository-error set-buffer-modified-p magit-wip-commit-after-apply " after un-/stage" message "Abort" magit-mode-get-buffer magit-status-mode magit-refresh t] 16 (#$ . 4172) nil])
#@400 Edit a file located in the current repository's git directory.
 
When ".git", located at the root of the working tree, is a
regular file, then that makes it cumbersome to open a file
located in the actual git directory.
 
This command is like `find-file', except that it temporarily
binds `default-directory' to the actual git directory, while
reading the FILENAME.
 
(fn FILENAME &optional WILDCARDS)
(defalias 'magit-find-git-config-file #[513 "\300\"\207" [find-file] 5 (#$ . 5721) (byte-code "\301 \302\303\304 \")\207" [default-directory magit-git-dir find-file-read-args "Find file: " confirm-nonexistent-file-or-buffer] 3)])
#@432 Edit a file located in the current repository's git directory, in another window.
 
When ".git", located at the root of the working tree, is a
regular file, then that makes it cumbersome to open a file
located in the actual git directory.
 
This command is like `find-file-other-window', except that it
temporarily binds `default-directory' to the actual git
directory, while reading the FILENAME.
 
(fn FILENAME &optional WILDCARDS)
(defalias 'magit-find-git-config-file-other-window #[513 "\300\"\207" [find-file-other-window] 5 (#$ . 6360) (byte-code "\301 \302\303\304 \")\207" [default-directory magit-git-dir find-file-read-args "Find file in other window: " confirm-nonexistent-file-or-buffer] 3)])
#@430 Edit a file located in the current repository's git directory, in another frame.
 
When ".git", located at the root of the working tree, is a
regular file, then that makes it cumbersome to open a file
located in the actual git directory.
 
This command is like `find-file-other-frame', except that it
temporarily binds `default-directory' to the actual git
directory, while reading the FILENAME.
 
(fn FILENAME &optional WILDCARDS)
(defalias 'magit-find-git-config-file-other-frame #[513 "\300\"\207" [find-file-other-frame] 5 (#$ . 7073) (byte-code "\301 \302\303\304 \")\207" [default-directory magit-git-dir find-file-read-args "Find file in other frame: " confirm-nonexistent-file-or-buffer] 3)])
#@31 Keymap for `magit-file-mode'.
(defvar magit-file-mode-map (byte-code "\300 \301\302\303#\210\301\304\305#\210\301\306\307#\210\211\207" [make-sparse-keymap define-key "g" magit-status "\347" magit-dispatch-popup "\347" magit-file-popup] 5) (#$ . 7780))
#@80 Popup console for Magit commands in file-visiting buffers.
 
(fn &optional ARG)
(defalias 'magit-file-popup #[256 "\300\301\302#\207" [magit-invoke-popup magit-file-popup nil] 5 (#$ . 8045) "P"])
(defvar magit-file-popup (list :variable 'magit-file-arguments :actions '((115 "Stage" magit-stage-file) (68 "Diff..." magit-diff-buffer-file-popup) (76 "Log..." magit-log-buffer-file-popup) (66 "Blame..." magit-blame-popup) nil (117 "Unstage" magit-unstage-file) (100 "Diff" magit-diff-buffer-file) (108 "Log" magit-log-buffer-file) (98 "Blame" magit-blame-addition) (112 "Prev blob" magit-blob-previous) (99 "Commit" magit-commit-popup) nil (116 "Trace" magit-log-trace-definition) (114 (lambda nil (with-current-buffer magit-pre-popup-buffer (and (not buffer-file-name) (propertize "...removal" 'face 'default)))) magit-blame-removal) (110 "Next blob" magit-blob-next) (101 "Edit line" magit-edit-line-commit) nil nil (102 (lambda nil (with-current-buffer magit-pre-popup-buffer (and (not buffer-file-name) (propertize "...reverse" 'face 'default)))) magit-blame-reverse) nil) :max-action-columns 5))
(byte-code "\300\301!\210\302\303\304\305\306DD\307\310\311\312\313&\207" [magit-define-popup-keys-deferred magit-file-popup custom-declare-variable magit-file-arguments funcall function #[0 "\301\302\"\207" [magit-file-popup plist-get :default-arguments] 3] "" :group magit-git-arguments :type (repeat (string :tag "Argument"))] 8)
(defalias 'magit-file-arguments #[0 "\303=\203    \207\n\207" [magit-current-popup magit-current-popup-args magit-file-arguments magit-file-popup] 2])
(put 'magit-file-arguments 'definition-name 'magit-file-popup)
(defvar magit-file-mode-lighter "")
#@99 Non-nil if Magit-File mode is enabled.
Use the command `magit-file-mode' to change this variable.
(defvar magit-file-mode nil (#$ . 9736))
(make-variable-buffer-local 'magit-file-mode)
#@153 Enable some Magit features in a file-visiting buffer.
 
Currently this only adds the following key bindings.
 
\{magit-file-mode-map}
 
(fn &optional ARG)
(defalias 'magit-file-mode #[256 "\301 \302=\203 ?\202\303!\304V\305\306\203\307\202\310\"\210\311\312!\203B\301 \2032\211\301 \232\203B\313\314\315\203=\316\202>\317#\266\210\320 \210\207" [magit-file-mode current-message toggle prefix-numeric-value 0 run-hooks magit-file-mode-hook magit-file-mode-on-hook magit-file-mode-off-hook called-interactively-p any " in current buffer" message "Magit-File mode %sabled%s" "en" "dis" force-mode-line-update] 7 (#$ . 9928) (byte-code "\206\301C\207" [current-prefix-arg toggle] 1)])
(defvar magit-file-mode-hook nil)
(byte-code "\301\302N\204\f\303\301\302\304#\210\305\306\307\310\211%\207" [magit-file-mode-map magit-file-mode-hook variable-documentation put "Hook run after entering or leaving `magit-file-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-file-mode magit-file-mode-lighter nil] 6)
(defalias 'magit-file-mode-turn-on #[0 "\205\f\301\302!\205\f\303 \207" [buffer-file-name magit-inside-worktree-p t magit-file-mode] 2])
(defvar magit-file-mode-major-mode nil)
(byte-code "\300\301!\210\302\303\304\305\306DD\307\310\311\312\313\314\315\314\316\317\320\321\322\323\324&\207" [make-variable-buffer-local magit-file-mode-major-mode custom-declare-variable global-magit-file-mode funcall function #[0 "\300\207" [t] 1] "Non-nil if Global Magit-File mode is enabled.\nSee the `global-magit-file-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 `global-magit-file-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :group magit-essentials magit-modes :type boolean :package-version (magit . "2.13.0") :link (info-link "(magit)Minor Mode for Buffers Visiting Files")] 18)
#@365 Toggle Magit-File mode in all buffers.
With prefix ARG, enable Global Magit-File mode if ARG is positive;
otherwise, disable it.  If called from Lisp, enable the mode if
ARG is omitted or nil.
 
Magit-File mode is enabled in all buffers where
`magit-file-mode-turn-on' would do it.
See `magit-file-mode' for more information on Magit-File mode.
 
(fn &optional ARG)
(defalias 'global-magit-file-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" [global-magit-file-mode magit-file-mode current-message set-default toggle default-value prefix-numeric-value 0 add-hook after-change-major-mode-hook global-magit-file-mode-enable-in-buffers find-file-hook global-magit-file-mode-check-buffers change-major-mode-hook global-magit-file-mode-cmhh remove-hook buffer-list magit-file-mode-turn-on -1 run-hooks global-magit-file-mode-hook global-magit-file-mode-on-hook global-magit-file-mode-off-hook called-interactively-p any customize-mark-as-set "" message "Global Magit-File mode %sabled%s" "en" "dis" force-mode-line-update] 7 (#$ . 12013) (byte-code "\206\301C\207" [current-prefix-arg toggle] 1)])
(defvar global-magit-file-mode-hook nil)
(byte-code "\301\302N\204\f\303\301\302\304#\210\305\306\307\310\300!\205\307\211%\207" [global-magit-file-mode-map global-magit-file-mode-hook variable-documentation put "Hook run after entering or leaving `global-magit-file-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 global-magit-file-mode nil boundp] 6)
(defvar magit-file-mode-set-explicitly nil nil)
(make-variable-buffer-local 'magit-file-mode-set-explicitly)
(defalias 'magit-file-mode-set-explicitly #[0 "\301\211\207" [magit-file-mode-set-explicitly t] 2])
(byte-code "\300\301\302\303#\210\304\305\301\"\207" [put magit-file-mode-set-explicitly definition-name global-magit-file-mode add-hook magit-file-mode-hook] 4)
(defvar global-magit-file-mode-buffers nil)
(defalias 'global-magit-file-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" [global-magit-file-mode-buffers magit-file-mode-set-explicitly magit-file-mode-major-mode major-mode magit-file-mode buffer-live-p -1 magit-file-mode-turn-on] 4])
(put 'global-magit-file-mode-enable-in-buffers 'definition-name 'global-magit-file-mode)
(defalias 'global-magit-file-mode-check-buffers #[0 "\301 \210\302\303\304\305\"\207" [global-magit-file-mode-buffers global-magit-file-mode-enable-in-buffers nil remove-hook post-command-hook global-magit-file-mode-check-buffers] 3])
(put 'global-magit-file-mode-check-buffers 'definition-name 'global-magit-file-mode)
(defalias 'global-magit-file-mode-cmhh #[0 "\300\301p\"\210\302\303\304\"\207" [add-to-list global-magit-file-mode-buffers add-hook post-command-hook global-magit-file-mode-check-buffers] 3])
(byte-code "\301\302\303\300#\210\203\300\304!\210\301\207" [global-magit-file-mode put global-magit-file-mode-cmhh definition-name 1] 4)
#@31 Keymap for `magit-blob-mode'.
(defvar magit-blob-mode-map (byte-code "\300 \301\302!\203)\303\304\305#\210\303\306\307#\210\303\310\311#\210\303\312\313#\210\303\314\315#\210\202G\303\316\305#\210\303\317\307#\210\303\320\311#\210\303\321\313#\210\303\314\315#\210\303\322\323#\210\211\207" [make-sparse-keymap featurep jkl define-key "i" magit-blob-previous "k" magit-blob-next "j" magit-blame-addition "l" magit-blame-removal "f" magit-blame-reverse "p" "n" "b" "r" "q" magit-kill-this-buffer] 5) (#$ . 15505))
#@99 Non-nil if Magit-Blob mode is enabled.
Use the command `magit-blob-mode' to change this variable.
(defvar magit-blob-mode nil (#$ . 16037))
(make-variable-buffer-local 'magit-blob-mode)
#@152 Enable some Magit features in blob-visiting buffers.
 
Currently this only adds the following key bindings.
 
\{magit-blob-mode-map}
 
(fn &optional ARG)
(defalias 'magit-blob-mode #[256 "\301 \302=\203 ?\202\303!\304V\305\306\203\307\202\310\"\210\311\312!\203B\301 \2032\211\301 \232\203B\313\314\315\203=\316\202>\317#\266\210\320 \210\207" [magit-blob-mode current-message toggle prefix-numeric-value 0 run-hooks magit-blob-mode-hook magit-blob-mode-on-hook magit-blob-mode-off-hook called-interactively-p any " in current buffer" message "Magit-Blob mode %sabled%s" "en" "dis" force-mode-line-update] 7 (#$ . 16230) (byte-code "\206\301C\207" [current-prefix-arg toggle] 1)])
(defvar magit-blob-mode-hook nil)
(byte-code "\301\302N\204\f\303\301\302\304#\210\305\306\307\310\300!\205\307\211%\207" [magit-blob-mode-map magit-blob-mode-hook variable-documentation put "Hook run after entering or leaving `magit-blob-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-blob-mode nil boundp] 6)
#@54 Visit the next blob which modified the current file.
(defalias 'magit-blob-next #[0 "\203\302\303    \"\206 \304 \"\207\305\306 !\203\307\310!\207\307\311!\207" [magit-buffer-file-name magit-buffer-revision magit-blob-visit magit-blob-successor line-number-at-pos buffer-file-name buffer-base-buffer user-error "You have reached the end of time" "Buffer isn't visiting a file or blob"] 4 (#$ . 17362) nil])
#@58 Visit the previous blob which modified the current file.
(defalias 'magit-blob-previous #[0 "\206\302\303 !\211\203$\304    \"\211\203\305\306 \"\202\307\310!\262\202'\307\311!\207" [magit-buffer-file-name magit-buffer-revision buffer-file-name buffer-base-buffer magit-blob-ancestor magit-blob-visit line-number-at-pos user-error "You have reached the beginning of time" "Buffer isn't visiting a file or blob"] 5 (#$ . 17780) nil])
#@26 
 
(fn BLOB-OR-FILE LINE)
(defalias 'magit-blob-visit #[514 ";\203\f\300!\210\202,@A\211@A\301\"\210\302\303\304\305\306\"\307\305\310\"!$\266eb\210\211Sy\207" [find-file magit-find-file apply message "%s (%s %s ago)" magit-rev-format "%s" magit--age "%ct"] 16 (#$ . 18228)])
#@17 
 
(fn REV FILE)
(defalias 'magit-blob-ancestor #[514 "\301 \211\203\211\302\303\304\305\306\307\206\310\311    &)\202\312 \262\203+\211AA\202/\313\314\"\207" [default-directory magit-toplevel magit-git-lines "log" "-2" "--format=%H" "--name-only" "--follow" "HEAD" "--" magit--not-inside-repository-error butlast 2] 12 (#$ . 18524)])
#@17 
 
(fn REV FILE)
(defalias 'magit-blob-successor #[514 "\301 \211\203\211\302\303\304\305\306\307\310&)\202\311 \262\3122A\211\205@\3138\232\2038\314\312@A@D\"\210\202\211AA\262\2020\207" [default-directory magit-toplevel magit-git-lines "log" "--format=%H" "--name-only" "--follow" "HEAD" "--" magit--not-inside-repository-error found 2 throw] 11 (#$ . 18877)])
#@111 Rename the FILE to NEWNAME.
If FILE isn't tracked in Git, fallback to using `rename-file'.
 
(fn FILE NEWNAME)
(defalias 'magit-file-rename #[514 "\302\303!!\203M\304!\211\203\305!\203\306\307\"\210\310!\203%\306\311\"\210\312\313\303!\303!#\210\211\205Lr\211q\210\314!\210)\315\316!\203I\316 \202K\317 )\207\320    #\210\321 \207" [buffer-read-only current-prefix-arg magit-file-tracked-p magit-convert-filename-for-git get-file-buffer buffer-modified-p user-error "Save %s before moving it" file-exists-p "%s already exists" magit-run-git "mv" set-visited-file-name fboundp vc-refresh-state vc-find-file-hook rename-file magit-refresh] 8 (#$ . 19267) (byte-code "\300\301!\302!\303\304\305\"\205\306!\"\306\307 \"\306!D\207" [magit-read-file "Rename file" file-name-directory read-file-name format "Rename %s to file: " expand-file-name magit-toplevel] 6)])
#@189 Untrack the selected FILES or one file read in the minibuffer.
 
With a prefix argument FORCE do so even when the files have
staged as well as unstaged changes.
 
(fn FILES &optional FORCE)
(defalias 'magit-file-untrack #[513 "\300\301\302\205\303\304%\207" [magit-run-git "rm" "--cached" "--force" "--"] 8 (#$ . 20160) (byte-code "\301\302\303\"\211\203\304@!\204\305\306!\210\307\310\311#\202\312\313!C\262D\207" [current-prefix-arg magit-region-values file t magit-file-tracked-p user-error "Already untracked" magit-confirm-files untrack "Untrack" magit-read-tracked-file "Untrack file"] 5)])
#@256 Delete the selected FILES or one file read in the minibuffer.
 
With a prefix argument FORCE do so even when the files have
uncommitted changes.  When the files aren't being tracked in
Git, then fallback to using `delete-file'.
 
(fn FILES &optional FORCE)
(defalias 'magit-file-delete #[513 "\300@!\203\301\302\205\303\304$\210\202/\305 \211\203-\211@\306\307\"\310\"\210A\266\202\202\266\311 \207" [magit-file-tracked-p magit-call-git "rm" "--force" "--" magit-toplevel delete-file expand-file-name t magit-refresh] 9 (#$ . 20777) (byte-code "\301\302\303\"\211\203\304\305\306#\202\307\310!C\262D\207" [current-prefix-arg magit-region-values file t magit-confirm-files delete "Delete" magit-read-file "Delete file"] 5)])
#@40 Checkout FILE from REV.
 
(fn REV FILE)
(defalias 'magit-file-checkout #[514 "\301 \211\203\211\302\303\304$)\202\305 \207" [default-directory magit-toplevel magit-run-git "checkout" "--" magit--not-inside-repository-error] 8 (#$ . 21528) (byte-code "\301\302\"\211\303\304\"D\207" [magit-buffer-revision magit-read-branch-or-commit "Checkout from revision" magit-read-file-from-rev "Checkout file"] 5)])
(defvar magit-read-file-hist nil)
#@37 
 
(fn REV PROMPT &optional DEFAULT)
(defalias 'magit-read-file-from-rev #[770 "\300!\301\302\303\302\304\206\305 \235@&\207" [magit-revision-files magit-completing-read nil t magit-read-file-hist magit-current-file] 13 (#$ . 21981)])
#@38 
 
(fn PROMPT &optional TRACKED-ONLY)
(defalias 'magit-read-file #[513 "\300 ?\205    \301 \244\302\303\304\303\211\305\306!\206\307\303\n\"\235@&\207" [magit-list-files magit-untracked-files magit-completing-read nil t magit-section-value-if (file submodule) magit-file-relative-name] 13 (#$ . 22231)])
#@15 
 
(fn PROMPT)
(defalias 'magit-read-tracked-file #[257 "\300\301\"\207" [magit-read-file t] 4 (#$ . 22547)])
#@319 Read file from FILES.
 
If FILES has only one member, return that instead of prompting.
If FILES has no members, give a user error.  ERROR can be given
to provide a more informative error.
 
If DEFAULT is non-nil, use this as the default value instead of
`magit-current-file'.
 
(fn PROMPT FILES &optional ERROR DEFAULT)
(defalias 'magit-read-file-choice #[1026 "G\211\300\267\202\301\206\302!\202+@\202+\303\304\305\304\306\206%\307  \235@&\207" [#s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (0 8 1 18)) user-error "No file choices" magit-completing-read nil t magit-read-file-hist magit-current-file] 14 (#$ . 22664)])
#@46 
 
(fn REV-OR-RANGE PROMPT &optional DEFAULT)
(defalias 'magit-read-changed-file #[770 "\300\301!\302P$\207" [magit-read-file-choice magit-changed-files "No file changed in "] 9 (#$ . 23344)])
#@32 
 
(fn PROMPT INITIAL-CONTENTS)
(defalias 'magit-read-files #[514 "\300\301\302\206\303\304 \305\211%\306#\207" [mapconcat identity completing-read-multiple "File,s: " magit-list-files nil ","] 10 (#$ . 23547)])
(provide 'magit-files)