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\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)
16 #@115 Clone the REPOSITORY to DIRECTORY.
17 Then show the status buffer for the new repository.
18
19 (fn REPOSITORY DIRECTORY)
20 (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)])
21 (provide 'magit-clone)