;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (require 'magit) (defalias 'magit-subtree #[0 "\300\301!\207" [transient-setup magit-subtree] 2 nil nil]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312$#\210\300\301\313\314#\207" [put magit-subtree interactive-only t function-documentation "Import or export subtrees." transient--prefix transient-prefix :command :man-page "git-subtree" transient--layout ([1 transient-column (:description "Actions") ((1 transient-suffix (:key "i" :description "Import" :command magit-subtree-import)) (1 transient-suffix (:key "e" :description "Export" :command magit-subtree-export)))])] 8) (defalias 'magit-subtree-import #[0 "\300\301!\207" [transient-setup magit-subtree-import] 2 nil nil]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312$#\210\300\301\313\314#\207" [put magit-subtree-import interactive-only t function-documentation "Import subtrees." transient--prefix transient-prefix :command :man-page "git-subtree" transient--layout ([1 transient-column (:description "Arguments") ((1 transient-suffix (:command magit-subtree:--prefix)) (1 transient-suffix (:command magit-subtree:--message)) (1 transient-switch (:key "-s" :description "Squash" :argument "--squash" :command transient:magit-subtree-import:--squash)))] [1 transient-columns (:description "Actions") ([1 transient-column nil ((1 transient-suffix (:key "a" :description "Add" :command magit-subtree-add)) (1 transient-suffix (:key "c" :description "Add commit" :command magit-subtree-add-commit)))] [1 transient-column nil ((1 transient-suffix (:key "m" :description "Merge" :command magit-subtree-merge)) (1 transient-suffix (:key "f" :description "Pull" :command magit-subtree-pull)))])])] 8) (defalias 'magit-subtree-export #[0 "\300\301!\207" [transient-setup magit-subtree-export] 2 nil nil]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312$#\210\300\301\313\314#\207" [put magit-subtree-export interactive-only t function-documentation "Export subtrees." transient--prefix transient-prefix :command :man-page "git-subtree" transient--layout ([1 transient-column (:description "Arguments") ((1 transient-suffix (:command magit-subtree:--prefix)) (1 transient-suffix (:command magit-subtree:--annotate)) (1 transient-suffix (:command magit-subtree:--branch)) (1 transient-suffix (:command magit-subtree:--onto)) (1 transient-switch (:key "-i" :description "Ignore joins" :argument "--ignore-joins" :command transient:magit-subtree-export:--ignore-joins)) (1 transient-switch (:key "-j" :description "Rejoin" :argument "--rejoin" :command transient:magit-subtree-export:--rejoin)))] [1 transient-column (:description "Actions") ((1 transient-suffix (:key "p" :description "Push" :command magit-subtree-push)) (1 transient-suffix (:key "s" :description "Split" :command magit-subtree-split)))])] 8) (defalias 'magit-subtree:--prefix #[0 "\300 \301\302!\"\266\303 \207" [transient-suffix-object transient-infix-set transient-infix-read transient--show] 5 nil nil]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312\313\314\315\316\317\320&\n#\207" [put magit-subtree:--prefix interactive-only t function-documentation nil transient--suffix transient-option :command :description "Prefix" :shortarg "-P" :argument "--prefix=" :reader magit-subtree-read-prefix] 14) #@41 (fn PROMPT &optional DEFAULT HISTORY) (defalias 'magit-subtree-read-prefix #[769 "\301\302 \303\304P#\305!\203'\306\"\203\307\"\202(\310\311#\202(\211)\207" [insert-default-directory nil magit-toplevel read-directory-name ": " file-name-absolute-p string-prefix-p file-relative-name user-error "%s isn't inside the repository at %s"] 9 (#$ . 3473)]) (defalias 'magit-subtree:--message #[0 "\300 \301\302!\"\266\303 \207" [transient-suffix-object transient-infix-set transient-infix-read transient--show] 5 nil nil]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312\313\314\315\316&#\207" [put magit-subtree:--message interactive-only t function-documentation nil transient--suffix transient-option :command :description "Message" :shortarg "-m" :argument "--message="] 12) (defalias 'magit-subtree:--annotate #[0 "\300 \301\302!\"\266\303 \207" [transient-suffix-object transient-infix-set transient-infix-read transient--show] 5 nil nil]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312\313\314\315\316&#\207" [put magit-subtree:--annotate interactive-only t function-documentation nil transient--suffix transient-option :command :description "Annotate" :key "-a" :argument "--annotate="] 12) (defalias 'magit-subtree:--branch #[0 "\300 \301\302!\"\266\303 \207" [transient-suffix-object transient-infix-set transient-infix-read transient--show] 5 nil nil]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312\313\314\315\316&#\207" [put magit-subtree:--branch interactive-only t function-documentation nil transient--suffix transient-option :command :description "Branch" :shortarg "-b" :argument "--branch="] 12) (defalias 'magit-subtree:--onto #[0 "\300 \301\302!\"\266\303 \207" [transient-suffix-object transient-infix-set transient-infix-read transient--show] 5 nil nil]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312\313\314\315\316\317\320&\n#\207" [put magit-subtree:--onto interactive-only t function-documentation nil transient--suffix transient-option :command :description "Onto" :key "-o" :argument "--onto=" :reader magit-transient-read-revision] 14) #@25 (fn TRANSIENT PROMPT) (defalias 'magit-subtree-prefix #[514 "\300\301!\302\300\211\211\2039\211A\262\242\262\262\211\262\2039\303\304\"\203,\300\262\2039\262\262T\262\202\266\211\262\211\203G\211\305\300O\207\306!\207" [nil transient-args 0 string-prefix-p "--prefix=" 9 magit-subtree-read-prefix] 11 (#$ . 5732)]) #@18 (fn TRANSIENT) (defalias 'magit-subtree-arguments #[257 "\300\301!\302\300\211\203)\211A\262\242\262\262T\262\303\304\"\204B\262\202\266\211\237\207" [nil transient-args 0 string-prefix-p "--prefix="] 9 (#$ . 6083)]) #@33 (fn SUBCMD PREFIX &rest ARGS) (defalias 'magit-git-subtree #[642 "\300\301\302P$\207" [magit-run-git-async "subtree" "--prefix="] 8 (#$ . 6327)]) #@86 Add REF from REPOSITORY as a new subtree at PREFIX. (fn PREFIX REPOSITORY REF ARGS) (defalias 'magit-subtree-add #[1028 "\300\301%\207" [magit-git-subtree "add"] 10 (#$ . 6484) (byte-code "\300\301\302\"\303\304!\211\305\306\"\307\301!E\262B\207" [magit-subtree-prefix magit-subtree-import "Add subtree" magit-read-remote-or-url "From repository" magit-read-refspec "Ref" magit-subtree-arguments] 6)]) #@65 Add COMMIT as a new subtree at PREFIX. (fn PREFIX COMMIT ARGS) (defalias 'magit-subtree-add-commit #[771 "\300\301$\207" [magit-git-subtree "add"] 8 (#$ . 6901) (byte-code "\300\301\302\"\303\304!\305\301!E\207" [magit-subtree-prefix magit-subtree-import "Add subtree" magit-read-string-ns "Commit" magit-subtree-arguments] 4)]) #@64 Merge COMMIT into the PREFIX subtree. (fn PREFIX COMMIT ARGS) (defalias 'magit-subtree-merge #[771 "\300\301$\207" [magit-git-subtree "merge"] 8 (#$ . 7240) (byte-code "\300\301\302\"\303\304!\305\301!E\207" [magit-subtree-prefix magit-subtree-import "Merge into subtree" magit-read-string-ns "Commit" magit-subtree-arguments] 4)]) #@84 Pull REF from REPOSITORY into the PREFIX subtree. (fn PREFIX REPOSITORY REF ARGS) (defalias 'magit-subtree-pull #[1028 "\300\301%\207" [magit-git-subtree "pull"] 10 (#$ . 7582) (byte-code "\300\301\302\"\303\304!\211\305\306\"\307\301!E\262B\207" [magit-subtree-prefix magit-subtree-import "Pull into subtree" magit-read-remote-or-url "From repository" magit-read-refspec "Ref" magit-subtree-arguments] 6)]) #@110 Extract the history of the subtree PREFIX and push it to REF on REPOSITORY. (fn PREFIX REPOSITORY REF ARGS) (defalias 'magit-subtree-push #[1028 "\300\301%\207" [magit-git-subtree "push"] 10 (#$ . 8006) (byte-code "\300\301\302\"\303\304!\305\306!\307\301!F\207" [magit-subtree-prefix magit-subtree-export "Push subtree" magit-read-remote-or-url "To repository" magit-read-string-ns "To reference" magit-subtree-arguments] 5)]) #@69 Extract the history of the subtree PREFIX. (fn PREFIX COMMIT ARGS) (defalias 'magit-subtree-split #[771 "\300\301$\207" [magit-git-subtree "split"] 8 (#$ . 8447) (byte-code "\300\301\302\"\303\304!\305\301!E\207" [magit-subtree-prefix magit-subtree-export "Split subtree" magit-read-string-ns "Commit" magit-subtree-arguments] 4)]) (provide 'magit-subtree)