;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& \207" [require magit custom-declare-variable magit-fetch-modules-jobs funcall function #[0 "\300\207" [4] 1] "Number of submodules to fetch in parallel.\nIgnored for Git versions before v2.8.0." :package-version (magit . "2.12.0") :group magit-commands :type (choice (const :tag "one at a time" nil) number)] 10)
|
#@55 Popup console for fetch commands.
|
|
(fn &optional ARG)
|
(defalias 'magit-fetch-popup #[256 "\300\301\302#\207" [magit-invoke-popup magit-fetch-popup nil] 5 (#$ . 798) "P"])
|
(defvar magit-fetch-popup (list :variable 'magit-fetch-arguments :man-page "git-fetch" :switches '((112 "Prune deleted branches" "--prune")) :actions '("Configure" (67 "variables..." magit-branch-config-popup) "Fetch from" (112 magit-get-push-remote magit-fetch-from-pushremote) (117 magit-get-remote magit-fetch-from-upstream) (101 "elsewhere" magit-fetch-other) (97 "all remotes" magit-fetch-all) "Fetch" (111 "another branch" magit-fetch-branch) (114 "explicit refspec" magit-fetch-refspec) (109 "submodules" magit-fetch-modules)) :default-action 'magit-fetch :max-action-columns 1))
|
(byte-code "\300\301!\210\302\303\304\305\306DD\307\310\311\312\313&\207" [magit-define-popup-keys-deferred magit-fetch-popup custom-declare-variable magit-fetch-arguments funcall function #[0 "\301\302\"\207" [magit-fetch-popup plist-get :default-arguments] 3] "" :group magit-git-arguments :type (repeat (string :tag "Argument"))] 8)
|
(defalias 'magit-fetch-arguments #[0 "\303=\203 \207\n\207" [magit-current-popup magit-current-popup-args magit-fetch-arguments magit-fetch-popup] 2])
|
(put 'magit-fetch-arguments 'definition-name 'magit-fetch-popup)
|
#@20
|
|
(fn REMOTE ARGS)
|
(defalias 'magit-git-fetch #[514 "\300\301!\210\302\303#\207" [run-hooks magit-credential-hook magit-run-git-async "fetch"] 6 (#$ . 2120)])
|
#@62 Fetch from the push-remote of the current branch.
|
|
(fn ARGS)
|
(defalias 'magit-fetch-from-pushremote #[257 "\300 \211\203 \301\"\202 \302 \211\203 \303\304\"\202 \303\305!\262\207" [magit-get-push-remote magit-git-fetch magit-get-current-branch user-error "No push-remote is configured for %s" "No branch is checked out"] 6 (#$ . 2287) (byte-code "\300 C\207" [magit-fetch-arguments] 1)])
|
#@70 Fetch from the upstream repository of the current branch.
|
|
(fn ARGS)
|
(defalias 'magit-fetch-from-upstream #[257 "\300 \211\203 \301\"\202 \302 \211\203 \303\304\"\202 \303\305!\262\207" [magit-get-remote magit-git-fetch magit-get-current-branch user-error "No upstream is configured for %s" "No branch is checked out"] 6 (#$ . 2689) (byte-code "\300 C\207" [magit-fetch-arguments] 1)])
|
#@50 Fetch from another repository.
|
|
(fn REMOTE ARGS)
|
(defalias 'magit-fetch-other #[514 "\300\"\207" [magit-git-fetch] 5 (#$ . 3089) (byte-code "\300\301!\302 D\207" [magit-read-remote "Fetch remote" magit-fetch-arguments] 2)])
|
#@56 Fetch a BRANCH from a REMOTE.
|
|
(fn REMOTE BRANCH ARGS)
|
(defalias 'magit-fetch-branch #[771 "\300B\"\207" [magit-git-fetch] 7 (#$ . 3321) (byte-code "\300\301!\211\302\303\"\304 E\207" [magit-read-remote-or-url "Fetch from remote or url" magit-read-remote-branch "Fetch branch" magit-fetch-arguments] 5)])
|
#@58 Fetch a REFSPEC from a REMOTE.
|
|
(fn REMOTE REFSPEC ARGS)
|
(defalias 'magit-fetch-refspec #[771 "\300B\"\207" [magit-git-fetch] 7 (#$ . 3636) (byte-code "\300\301!\211\302\303\"\304 E\207" [magit-read-remote-or-url "Fetch from remote or url" magit-read-refspec "Fetch using refspec" magit-fetch-arguments] 5)])
|
#@36 Fetch from all remotes.
|
|
(fn ARGS)
|
(defalias 'magit-fetch-all #[257 "\300\301!\210\302\303\304#\207" [run-hooks magit-credential-hook magit-run-git-async "remote" "update"] 5 (#$ . 3955) (byte-code "\300\301 \302\303D\304\305$C\207" [cl-intersection magit-fetch-arguments "--verbose" "--prune" :test equal] 5)])
|
#@129 Fetch from all remotes, and prune.
|
Prune remote tracking branches for branches that have been
|
removed on the respective remote.
|
(defalias 'magit-fetch-all-prune #[0 "\300\301!\210\302\303\304\305#\207" [run-hooks magit-credential-hook magit-run-git-async "remote" "update" "--prune"] 4 (#$ . 4275) nil])
|
#@25 Fetch from all remotes.
|
(defalias 'magit-fetch-all-no-prune #[0 "\300\301!\210\302\303\304\"\207" [run-hooks magit-credential-hook magit-run-git-async "remote" "update"] 3 (#$ . 4585) nil])
|
#@268 Fetch all submodules.
|
|
Option `magit-fetch-modules-jobs' controls how many submodules
|
are being fetched in parallel. Also fetch the super-repository,
|
because `git-fetch' does not support not doing that. With a
|
prefix argument fetch all remotes.
|
|
(fn &optional ALL)
|
(defalias 'magit-fetch-modules #[256 "\302 \211\203( \211\303\304\305\306 \205 \307\310\311 \"\205 \312\313 !D\205# \314%)\202* \315 \207" [default-directory magit-fetch-modules-jobs magit-toplevel magit-run-git-async "fetch" "--verbose" "--recurse-submodules" version<= "2.8.0" magit-git-version "-j" number-to-string "--all" magit--not-inside-repository-error] 9 (#$ . 4782) "P"])
|
(provide 'magit-fetch)
|
