;ELC ;;; Compiled ;;; in Emacs version 29.3 ;;; with all optimizations. (require 'magit)#@54 Return non-nil if working tree is a sparse checkout. (defalias 'magit-sparse-checkout-enabled-p #[0 "\300\301!\207" [magit-get-boolean "core.sparsecheckout"] 2 (#$ . 100)]) (defalias 'magit-sparse-checkout--auto-enable #[0 "\300 \203\301\302!?\205\303\304!\207\305\306\307\310#\207" [magit-sparse-checkout-enabled-p magit-get-boolean "core.sparsecheckoutcone" user-error "Magit's sparse checkout functionality requires cone mode" magit-run-git "sparse-checkout" "init" "--cone"] 4])#@184 Return directories that are recursively included in the sparse checkout. See the "git sparse-checkout" manpage for details about "recursive" versus "parent" directories in cone mode. (defalias 'magit-sparse-checkout-directories #[0 "\300\301!\205 \302\303\304\305\306\"\"\207" [magit-get-boolean "core.sparsecheckoutcone" mapcar file-name-as-directory magit-git-lines "sparse-checkout" "list"] 5 (#$ . 593)]) (defalias 'magit-sparse-checkout #[0 "\300\301!\207" [transient-setup magit-sparse-checkout] 2 nil nil]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312$#\210\313\301\314\315\316\317\320\321F\322\323\324\316\325\326\327\310\300\330\302\303#\210\300\330\331\332#\210\333\330\334\"\210\330\257 C#\314\335\316\336D\314\315\320\321D\337\323\340\316\341\310\342\257C#\314\315\343\321D\337\323\344\316\345\310\346\257\337\323\347\316\350\310\351\257D#\314\315\352\337\323\353\316\354\310\355\257\337\323\356\316\357\310\360\257D#E#D\"\207" [put magit-sparse-checkout interactive-only t function-documentation "Create and manage sparse checkouts." transient--prefix transient-prefix :command :man-page "git-sparse-checkout" transient--set-layout vector transient-column :description "Arguments for enabling" :if-not magit-sparse-checkout-enabled-p transient-switch :key "-i" "Use sparse index" :argument "--sparse-index" transient:magit-sparse-checkout:--sparse-index completion-predicate transient--suffix-only defalias transient--default-infix-command transient-columns "Actions" transient-suffix "e" "Enable sparse checkout" magit-sparse-checkout-enable :if "d" "Disable sparse checkout" magit-sparse-checkout-disable "r" "Reapply rules" magit-sparse-checkout-reapply nil "s" "Set directories" magit-sparse-checkout-set "a" "Add directories" magit-sparse-checkout-add] 19)#@69 Convert the working tree to a sparse checkout. (fn &optional ARGS) (defalias 'magit-sparse-checkout-enable #[256 "\300\301\302\303$\207" [magit-run-git-async "sparse-checkout" "init" "--cone"] 6 (#$ . 2421) (byte-code "\300\301!C\207" [transient-args magit-sparse-checkout] 2)])#@168 Restrict working tree to DIRECTORIES. To extend rather than override the currently configured directories, call `magit-sparse-checkout-add' instead. (fn DIRECTORIES) (defalias 'magit-sparse-checkout-set #[257 "\300 \210\301\302\303#\207" [magit-sparse-checkout--auto-enable magit-run-git-async "sparse-checkout" "set"] 5 (#$ . 2708) (byte-code "\300\301\302\303!\"C\207" [magit-completing-read-multiple "Include these directories: " magit-revision-directories "HEAD"] 4)])#@167 Add DIRECTORIES to the working tree. To override rather than extend the currently configured directories, call `magit-sparse-checkout-set' instead. (fn DIRECTORIES) (defalias 'magit-sparse-checkout-add #[257 "\300 \210\301\302\303#\207" [magit-sparse-checkout--auto-enable magit-run-git-async "sparse-checkout" "add"] 5 (#$ . 3189) (byte-code "\300\301\302\303\304\305 !P\306\307\"\262\310\311!\"\"C\207" [magit-completing-read-multiple "Add these directories: " seq-remove "\\`" regexp-opt magit-sparse-checkout-directories make-closure #[257 "\300\301\302\303$\207" [V0 nil string-match t] 9 "\n\n(fn %)"] magit-revision-directories "HEAD"] 7)])#@231 Reapply the sparse checkout rules to the working tree. Some operations such as merging or rebasing may need to check out files that aren't included in the sparse checkout. Call this command to reset to the sparse checkout state. (defalias 'magit-sparse-checkout-reapply #[0 "\300\301\302\"\207" [magit-run-git-async "sparse-checkout" "reapply"] 3 (#$ . 3851) nil])#@204 Convert sparse checkout to full checkout. Note that disabling the sparse checkout does not clear the configured directories. Call `magit-sparse-checkout-enable' to restore the previous sparse checkout. (defalias 'magit-sparse-checkout-disable #[0 "\300\301\302\"\207" [magit-run-git-async "sparse-checkout" "disable"] 3 (#$ . 4223) nil])#@148 Insert header line with sparse checkout information. This header is not inserted by default. To enable it, add it to `magit-status-headers-hook'. (defalias 'magit-sparse-checkout-insert-header #[0 "\300 \205.\301\302\303\304\"\305\306#c\210\307 \211G\211\310\267\202\"\311\202&@\202&\302\312\"\262\262c\210\313c\207" [magit-sparse-checkout-enabled-p propertize format "%-10s" "Sparse! " font-lock-face magit-section-heading magit-sparse-checkout-directories #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (0 25 1 29)) "top-level directory" "%d directories" 10] 5 (#$ . 4568)]) (provide 'magit-sparse-checkout)