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

Chizi123
2018-11-18 21067e7cbe6d7a0f65ff5c317a96b5c337b0b3d8
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
;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\302\303\304\305\306DD\307\310\311\312\313\314\315&    \210\302\316\304\305\317DD\320\310\321\312\313\314\322&    \210\302\323\304\305\324DD\325\310\326\312\313\314\327&    \207" [require magit custom-declare-variable magit-clone-set-remote-head funcall function #[0 "\300\207" [nil] 1] "Whether cloning creates the symbolic-ref `<remote>/HEAD'." :package-version (magit . "2.4.2") :group magit-commands :type boolean magit-clone-set-remote\.pushDefault #[0 "\300\207" [ask] 1] "Whether to set the value of `remote.pushDefault' after cloning.\n\nIf t, then set without asking.  If nil, then don't set.  If\n`ask', then ask." (magit . "2.4.0") (choice (const :tag "set" t) (const :tag "ask" ask) (const :tag "don't set" nil)) magit-clone-default-directory #[0 "\300\207" [nil] 1] "Default directory to use when `magit-clone' reads destination.\nIf nil (the default), then use the value of `default-directory'.\nIf a directory, then use that.  If a function, then call that\nwith the remote url as only argument and use the returned value." (magit . "2.90.0") (choice (const :tag "value of default-directory") (directory :tag "constant directory") (function :tag "function's value"))] 10)
#@115 Clone the REPOSITORY to DIRECTORY.
Then show the status buffer for the new repository.
 
(fn REPOSITORY DIRECTORY)
(defalias 'magit-clone #[514 "\211C\211\301\302\242!!\240\210\303\304\305\242!#\210\306\307\310#\210\311\312\313\314\315\316!\317\"\320\321%\"\207" [magit-this-process file-name-as-directory expand-file-name magit-run-git-async "clone" magit-convert-filename-for-git process-put inhibit-refresh t set-process-sentinel make-byte-code 514 "\305!\306>\203\307\310\"\210)\305!\311=\205M\312!\313U\205M\300\242 \307=\2043 \2038\314\315!\2038\316\317\320\"\210\f\204@\321\317!\210)r\322\323\"q\210\324\300\242!)\207" vconcat vector [magit-process-raise-error default-directory magit-clone-set-remote\.pushDefault magit-clone-set-remote-head process-status (exit signal) t magit-process-sentinel exit process-exit-status 0 y-or-n-p "Set `remote.pushDefault' to \"origin\"? " magit-set "origin" "remote.pushDefault" magit-remote-unset-head process-get command-buf magit-status-internal] 5 "\n\n(fn PROCESS EVENT)"] 11 (#$ . 1612) (byte-code "\301\302!\211\303\304\305!\203!\202\306\211\307\310\"\205\"\311\312\"%D\207" [magit-clone-default-directory magit-read-string-ns "Clone repository" read-directory-name "Clone to: " functionp nil string-match "\\([^/:]+?\\)\\(/?\\.git\\)?$" match-string 1] 10)])
(provide 'magit-clone)