;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\302\303\304\305\306\307\310\311&\210\312\313\314\315\316DD\317\320\321\310\303\322\323& \210\312\324\314\315\325DD\326\320\327\310\303\322\323& \210\312\330\314\315\331DD\332\320\333\310\303\334\335\322\336& \210\337\330\340\341#\210\337\330\342\343#\210\312\344\314\315\345DD\346\320\347\310\303\322\350& \207" [require magit custom-declare-group magit-refs nil "Inspect and manipulate Git branches and tags." :link (info-link "(magit)References Buffer") :group magit-modes custom-declare-variable magit-refs-mode-hook funcall function #[0 "\300\207" [nil] 1] "Hook run after entering Magit-Refs mode." :package-version (magit . "2.1.0") :type hook magit-refs-sections-hook #[0 "\300\207" [(magit-insert-error-header magit-insert-branch-description magit-insert-local-branches magit-insert-remote-branches magit-insert-tags)] 1] "Hook run to insert sections into a references buffer." (magit . "2.1.0") magit-refs-show-commit-count #[0 "\300\207" [nil] 1] "Whether to show commit counts in Magit-Refs mode buffers.\n\nall Show counts for branches and tags.\nbranch Show counts for branches only.\nnil Never show counts.\n\nTo change the value in an existing buffer use the command\n`magit-refs-show-commit-count'" (magit . "2.1.0") :safe #[257 "\211\300>\207" [(all branch nil)] 3 "\n\n(fn VAL)"] (choice (const all :tag "For branches and tags") (const branch :tag "For branches only") (const nil :tag "Never")) put safe-local-variable symbolp permanent-local t magit-refs-pad-commit-counts #[0 "\300\207" [nil] 1] "Whether to pad all counts on all sides in `magit-refs-mode' buffers.\n\nIf this is nil, then some commit counts are displayed right next\nto one of the branches that appear next to the count, without any\nspace in between. This might look bad if the branch name faces\nlook too similar to `magit-dimmed'.\n\nIf this is non-nil, then spaces are placed on both sides of all\ncommit counts." (magit . "2.12.0") boolean] 12) #@277 Whether to show the push-remotes of local branches. Also show the commits that the local branch is ahead and behind the push-target. Unfortunately there is a bug in Git that makes this useless (the commits ahead and behind the upstream are shown), so this isn't enabled yet. (defvar magit-refs-show-push-remote nil (#$ . 2060)) (byte-code "\301\302\303\304\305DD\306\307\310\311\312\313\314& \210\301\315\303\304\316DD\317\307\320\311\312\311\321\322\323\313\324\325\326\327\330\331\332\333\"&\210\301\334\303\304\335DD\336\307\337\311\312\311\321\313\314& \210\301\340\303\304\341DD\342\307\343\311\312\313\344& \210\301\345\303\304\346DD\347\307\350\311\312\313\351& \210\301\352\303\304\353DD\354\307\355\311\312\313\356& \210\301\357\303\304\360DD\361\307\362\311\312\311\363\364\365\313\366& \207" [magit-log-margin--custom-type custom-declare-variable magit-refs-show-remote-prefix funcall function #[0 "\300\207" [nil] 1] "Whether to show the remote prefix in lists of remote branches.\n\nThis is redundant because the name of the remote is already shown\nin the heading preceding the list of its branches." :package-version (magit . "2.12.0") :group magit-refs :type boolean magit-refs-margin #[0 "\301A@\302\301\3038\257\207" [magit-log-margin nil magit-log-margin-width 4] 6] "Format of the margin in `magit-refs-mode' buffers.\n\nThe value has the form (INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH).\n\nIf INIT is non-nil, then the margin is shown initially.\nSTYLE controls how to format the author or committer date.\n It can be one of `age' (to show the age of the commit),\n `age-abbreviated' (to abbreviate the time unit to a character),\n or a string (suitable for `format-time-string') to show the\n actual date. Option `magit-log-margin-show-committer-date'\n controls which date is being displayed.\nWIDTH controls the width of the margin. This exists for forward\n compatibility and currently the value should not be changed.\nAUTHOR controls whether the name of the author is also shown by\n default.\nAUTHOR-WIDTH has to be an integer. When the name of the author\n is shown, then this specifies how much space is used to do so." (magit . "2.9.0") magit-margin :safe #[257 "\211\300>\207" [(all branch nil)] 3 "\n\n(fn VAL)"] :initialize magit-custom-initialize-reset :set-after (magit-log-margin) :set apply-partially magit-margin-set-variable magit-refs-mode magit-refs-margin-for-tags #[0 "\300\207" [nil] 1] "Whether to show information about tags in the margin.\n\nThis is disabled by default because it is slow if there are many\ntags." (magit . "2.9.0") magit-refs-primary-column-width #[0 "\300\301B\207" [16 32] 2] "Width of the focus column in `magit-refs-mode' buffers.\n\nThe primary column is the column that contains the name of the\nbranch that the current row is about.\n\nIf this is an integer, then the column is that many columns wide.\nOtherwise it has to be a cons-cell of two integers. The first\nspecifies the minimal width, the second the maximal width. In that\ncase the actual width is determined using the length of the names\nof the shown local branches. (Remote branches and tags are not\ntaken into account when calculating to optimal width.)" (magit . "2.12.0") (choice (integer :tag "Constant wide") (cons :tag "Wide constrains" (integer :tag "Minimum") (integer :tag "Maximum"))) magit-refs-focus-column-width #[0 "\300\207" [5] 1] "Width of the focus column in `magit-refs-mode' buffers.\n\nThe focus column is the first column, which marks one\nbranch (usually the current branch) as the focused branch using\n\"*\" or \"@\". For each other reference, this column optionally\nshows how many commits it is ahead of the focused branch and \"<\", or\nif it isn't ahead then the commits it is behind and \">\", or if it\nisn't behind either, then a \"=\".\n\nThis column may also display only \"*\" or \"@\" for the focused\nbranch, in which case this option is ignored. Use \"L v\" to\nchange the verbosity of this column." (magit . "2.12.0") integer magit-refs-filter-alist #[0 "\300\207" [nil] 1] "Alist controlling which refs are omitted from `magit-refs-mode' buffers.\n\nThe purpose of this option is to forgo displaying certain refs\nbased on their name. If you want to not display any refs of a\ncertain type, then you should remove the appropriate function\nfrom `magit-refs-sections-hook' instead.\n\nAll keys are tried in order until one matches. Then its value\nis used and subsequent elements are ignored. If the value is\nnon-nil, then the reference is displayed, otherwise it is not.\nIf no element matches, then the reference is displayed.\n\nA key can either be a regular expression that the refname has to\nmatch, or a function that takes the refname as only argument and\nreturns a boolean. A remote branch such as \"origin/master\" is\ndisplayed as just \"master\", however for this comparison the\nformer is used." (magit . "2.12.0") (alist :key-type (choice :tag "Key" regexp function) :value-type (boolean :tag "Value" :on "show (non-nil)" :off "omit (nil)")) magit-visit-ref-behavior #[0 "\300\207" [nil] 1] "Control how `magit-visit-ref' behaves in `magit-refs-mode' buffers.\n\nBy default `magit-visit-ref' behaves like `magit-show-commit',\nin all buffers, including `magit-refs-mode' buffers. When the\ntype of the section at point is `commit' then \"RET\" is bound to\n`magit-show-commit', and when the type is either `branch' or\n`tag' then it is bound to `magit-visit-ref'.\n\n\"RET\" is one of Magit's most essential keys and at least by\ndefault it should behave consistently across all of Magit,\nespecially because users quickly learn that it does something\nvery harmless; it shows more information about the thing at point\nin another buffer.\n\nHowever \"RET\" used to behave differently in `magit-refs-mode'\nbuffers, doing surprising things, some of which cannot really be\ndescribed as \"visit this thing\". If you have grown accustomed\nto such inconsistent, but to you useful, behavior, then you can\nrestore that by adding one or more of the below symbols to the\nvalue of this option. But keep in mind that by doing so you\ndon't only introduce inconsistencies, you also lose some\nfunctionality and might have to resort to `M-x magit-show-commit'\nto get it back.\n\n`magit-visit-ref' looks for these symbols in the order in which\nthey are described here. If the presence of a symbol applies to\nthe current situation, then the symbols that follow do not affect\nthe outcome.\n\n`focus-on-ref'\n\n With a prefix argument update the buffer to show commit counts\n and lists of cherry commits relative to the reference at point\n instead of relative to the current buffer or `HEAD'.\n\n Instead of adding this symbol, consider pressing \"C-u y o RET\".\n\n`create-branch'\n\n If point is on a remote branch, then create a new local branch\n with the same name, use the remote branch as its upstream, and\n then check out the local branch.\n\n Instead of adding this symbol, consider pressing \"b c RET RET\",\n like you would do in other buffers.\n\n`checkout-any'\n\n Check out the reference at point. If that reference is a tag\n or a remote branch, then this results in a detached `HEAD'.\n\n Instead of adding this symbol, consider pressing \"b b RET\",\n like you would do in other buffers.\n\n`checkout-branch'\n\n Check out the local branch at point.\n\n Instead of adding this symbol, consider pressing \"b b RET\",\n like you would do in other buffers." (magit . "2.9.0") magit-commands :options (focus-on-ref create-branch checkout-any checkout-branch) (list :convert-widget custom-hook-convert-widget)] 22) #@31 Keymap for `magit-refs-mode'. (defvar magit-refs-mode-map (byte-code "\301 \302\"\210\303\304\305#\210\303\306\307#\210\207" [magit-mode-map make-sparse-keymap set-keymap-parent define-key "" magit-refs-set-show-commit-count "L" magit-margin-settings] 5) (#$ . 9723)) (defvar magit-refs-mode-hook nil) (byte-code "\300\301N\204\f\302\300\301\303#\210\304\305!\204\302\305\306\307#\210\300\207" [magit-refs-mode-hook variable-documentation put "Hook run after entering Magit Refs mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" boundp magit-refs-mode-map definition-name magit-refs-mode] 4) (defvar magit-refs-mode-map (make-sparse-keymap)) (byte-code "\301\302N\204\303\301\302\304\305!#\210\306\307!\204\303\307\310\311#\210\312\313 !\210\307\302N\204-\303\307\302\304\314!#\210\306\300!\204B\303\300\310\311#\210\315\316\300\317\"\210!\210\300\302N\204P\303\300\302\304\320!#\210\303\311\321\322#\210\303\311\323\324#\207" [magit-refs-mode-abbrev-table magit-refs-mode-map variable-documentation put purecopy "Keymap for `magit-refs-mode'." boundp magit-refs-mode-syntax-table definition-name magit-refs-mode (lambda (def-tmp-var) (defvar magit-refs-mode-syntax-table def-tmp-var)) make-syntax-table "Syntax table for `magit-refs-mode'." (lambda (def-tmp-var) (defvar magit-refs-mode-abbrev-table def-tmp-var)) define-abbrev-table nil "Abbrev table for `magit-refs-mode'." derived-mode-parent magit-mode custom-mode-group magit-refs] 5) #@781 Mode which lists and compares references. This mode is documented in info node `(magit)References Buffer'. \Type \[magit-refresh] to refresh the current buffer. Type \[magit-section-toggle] to expand or hide the section at point. Type \[magit-visit-thing] or \[magit-diff-show-or-scroll-up] to visit the commit or branch at point. Type \[magit-branch] to see available branch commands. Type \[magit-merge] to merge the branch or commit at point. Type \[magit-cherry-pick] to apply the commit at point. Type \[magit-reset] to reset `HEAD' to the commit at point. \{magit-refs-mode-map} In addition to any hooks its parent mode `magit-mode' might have run, this mode runs the hook `magit-refs-mode-hook', as the final or penultimate step during initialization. (defalias 'magit-refs-mode #[0 "\306\300!\210\307\310 \210\311\312\310\313N\203\314\311\313\310\313N#\210\315 !\204'\316 \317 \"\210\320\f!\211\2035\211\321 =\203;\322\f\323 \"\210\210\324 \325\"\204R =\204R\326 \325C#\210\327 !\210\330\f!\210 \331 \210\332)\333\334!\207" [delay-mode-hooks major-mode mode-name magit-refs-mode-map magit-refs-mode-syntax-table magit-refs-mode-abbrev-table make-local-variable t magit-mode magit-refs-mode "Magit Refs" mode-class put keymap-parent set-keymap-parent current-local-map char-table-parent standard-syntax-table set-char-table-parent syntax-table abbrev-table-get :parents abbrev-table-put use-local-map set-syntax-table hack-dir-local-variables-non-file-buffer magit-imenu--refs-create-index-function run-mode-hooks magit-refs-mode-hook local-abbrev-table imenu-create-index-function] 5 (#$ . 11271) nil]) #@17 (fn REF ARGS) (defalias 'magit-refs-setup-buffer #[514 "\300\301\302\303D\304DD#\207" [magit-setup-buffer-internal magit-refs-mode nil magit-buffer-upstream magit-buffer-arguments] 8 (#$ . 12927)]) (defalias 'magit-refs-refresh-buffer #[0 "\306 ?\307 !\204\f\310\311\312\313 \314\315 \316##!\210\317\320!\203\"\320\202*\320\f\236A\206*\321\322\317\320!\2039\323\320\f\"@\206:\320\324\310\325\326 \327 &\330\331\332\333\"\211\203T\211\334=\202\211<\205a\335\336!<\"\211\203l\337\331\"\202\207\340=\"\211\205\205\341!\203\202\211!\262\211\334=\262\262\262#\210\211<\206\236 ?\205\236>><?\3422R\343\344!\210\345\346!\210\347!\210\350\337\351\"\352\"\210\330\353\326 #\354\355\"\356\312\357\337\360\"\"!\356\312\361\337\360\"\"!\203\342J\206\365\362!\203\355J\206\365\362!\205\365\211J\212\337\351\"b\210`W\203,\363`\321\"\206 \364`\321\"\204%\365`\321\n$\210\203%\365`\355$\210\211b\266\202\375)\266\211>=\203@\310@\366!)\202Q\330\337\367\"\370\337\211\367\"\370\"C\244#0\210+\210\371\372\373\"\207" [magit-set-buffer-margin-refresh magit-buffer-upstream magit-refs-show-commit-count magit-buffer-arguments magit--section-type-alist magit-insert-section--parent magit-buffer-margin-p magit-rev-verify nil magit-set-header-line-format format "%s %s" mapconcat identity " " class-p branchbuf magit-section :type rassq :value :start point-marker :parent eieio-oset hidden run-hook-with-args-until-success magit-section-set-visibility-hook hide magit-get-section magit-section-ident eieio-oref magit-section-match-assoc functionp cancel-section magit-run-section-hook magit-refs-sections-hook run-hooks magit-insert-section-hook magit-insert-child-count set-marker-insertion-type start t end eieio-oref-default keymap intern "magit-%s-section-map" type "forge-%s-section-map" boundp next-single-property-change get-text-property put-text-property magit-section-show parent children add-hook kill-buffer-hook magit-preserve-section-visibility-cache magit-insert-section--oldroot magit-section-initial-visibility-alist magit-root-section magit-insert-section--current magit-section-cache-visibility] 12]) (cl-generic-define-method 'magit-buffer-value nil '(&context (major-mode magit-refs-mode)) nil #[0 " B\207" [magit-buffer-upstream magit-buffer-arguments] 2]) #@28 (fn &optional TRANSIENT) (defalias 'magit-show-refs #[256 "\211\203\300\301!\207\302\303\304 \"\207" [transient-setup magit-show-refs magit-refs-setup-buffer "HEAD" magit-show-refs-arguments] 4 (#$ . 15279) (byte-code "\301\302!\206C\207" [current-prefix-arg derived-mode-p magit-refs-mode] 2)]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312\313\314&#\210\300\301\315\316#\207" [put magit-show-refs interactive-only t function-documentation "List and compare references in a dedicated buffer." transient--prefix transient-prefix :command :man-page "git-branch" :value #[0 "\301!\207" [magit-prefix-use-buffer-arguments magit-show-refs-arguments] 2] transient--layout ([1 transient-column (:description "Arguments") ((1 transient-suffix (:command magit-for-each-ref:--contains)) (1 transient-option (:key "-M" :description "Merged" :argument "--merged=" :command transient:magit-show-refs:--merged= :reader magit-transient-read-revision)) (1 transient-switch (:key "-m" :description "Merged to HEAD" :argument "--merged" :command transient:magit-show-refs:--merged)) (1 transient-option (:key "-N" :description "Not merged" :argument "--no-merged=" :command transient:magit-show-refs:--no-merged= :reader magit-transient-read-revision)) (1 transient-switch (:key "-n" :description "Not merged to HEAD" :argument "--no-merged" :command transient:magit-show-refs:--no-merged)) (1 transient-suffix (:command magit-for-each-ref:--sort)))] [1 transient-column (:description "Actions") ((1 transient-suffix (:key "y" :description "Show refs, comparing them with HEAD" :command magit-show-refs-head)) (1 transient-suffix (:key "c" :description "Show refs, comparing them with current branch" :command magit-show-refs-current)) (1 transient-suffix (:key "o" :description "Show refs, comparing them with other branch" :command magit-show-refs-other)))])] 10) #@34 (fn &optional USE-BUFFER-ARGS) (defalias 'magit-show-refs-arguments #[256 "\211\204\262\305 \306=\203\307\306!\207\n\310=\203 \207\311>\2037\312\310\305\313=#\211\2052\314\303\"\262\315\262\204=\316\306\f\"\262\207" [magit-direct-use-buffer-arguments transient-current-command major-mode magit-buffer-arguments transient-values nil magit-show-refs transient-args magit-refs-mode (always selected) magit-get-mode-buffer selected buffer-local-value t alist-get] 7 (#$ . 17184)]) (defalias 'magit-for-each-ref:--contains #[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-for-each-ref:--contains interactive-only t function-documentation nil transient--suffix transient-option :command :description "Contains" :key "-c" :argument "--contains=" :reader magit-transient-read-revision] 14) (defalias 'magit-for-each-ref:--sort #[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-for-each-ref:--sort interactive-only t function-documentation nil transient--suffix transient-option :command :description "Sort" :key "-s" :argument "--sort=" :reader magit-read-ref-sort] 14) #@37 (fn PROMPT INITIAL-INPUT HISTORY) (defalias 'magit-read-ref-sort #[771 "\300\301\302\211%\207" [magit-completing-read ("-committerdate" "-authordate" "committerdate" "authordate") nil] 9 (#$ . 18702)]) #@95 List and compare references in a dedicated buffer. Compared with `HEAD'. (fn &optional ARGS) (defalias 'magit-show-refs-head #[256 "\300\301\"\207" [magit-refs-setup-buffer "HEAD"] 4 (#$ . 18915) (byte-code "\300 C\207" [magit-show-refs-arguments] 1)]) #@134 List and compare references in a dedicated buffer. Compare with the current branch or `HEAD' if it is detached. (fn &optional ARGS) (defalias 'magit-show-refs-current #[256 "\300\301 \"\207" [magit-refs-setup-buffer magit-get-current-branch] 4 (#$ . 19177) (byte-code "\300 C\207" [magit-show-refs-arguments] 1)]) #@120 List and compare references in a dedicated buffer. Compared with a branch read from the user. (fn &optional REF ARGS) (defalias 'magit-show-refs-other #[512 "\300\"\207" [magit-refs-setup-buffer] 5 (#$ . 19500) (byte-code "\300\301!\302 D\207" [magit-read-other-branch "Compare with" magit-show-refs-arguments] 2)]) #@50 Change for which refs the commit count is shown. (defalias 'magit-refs-set-show-commit-count #[0 "\301\300!\210\302\303\304\305\306\307\310E\311#\312Q\313\"\211\314\267\202$\315\202%\316\202%\317\202%\317\262\320\321!\210\322 \207" [magit-refs-show-commit-count make-local-variable read-char-choice "Show commit counts for " mapconcat identity "[a]ll refs" "[b]ranches only" "[n]othing" ", " " " (97 98 110) #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (97 24 98 28 110 32)) all t nil message "" magit-refresh] 7 (#$ . 19825) nil]) #@426 Visit the reference or revision at point in another buffer. If there is no revision at point or with a prefix argument prompt for a revision. This command behaves just like `magit-show-commit', except if point is on a reference in a `magit-refs-mode' buffer (a buffer listing branches and tags), in which case the behavior may be different, but only if you have customized the option `magit-visit-ref-behavior' (which see). (defalias 'magit-visit-ref #[0 "\303\304!\203\311\305\306!\203\311\307\310 \311\"\203,\312 >\203!\313\314 \"\207 \205\310\315\316\317!)\207\320 >\203\251\305\321!\203\251\322!A\323!\203\235\324\"\203Q\325\326\"\210\202\244\327\330\331#\262\327\330\332#\262\333\334\327\335\330\336#\211\211&\337\"\340\341!\210\211\342\267\210\202\244\325\326\"\266\202\244\325\326\343$\266\202\244\344\345!\266\202\244\210\202\244\325\326\346$\210\211\347 \207\350 >\204\273\351 >\203\305\305\352!\203\305\325\326\"\210\211\347 \207\316\317!\207\316\317!\207" [current-prefix-arg magit-visit-ref-behavior magit-buffer-upstream derived-mode-p magit-refs-mode magit-section-match (branch tag) eieio-oref magit-current-section value focus-on-ref magit-refs-setup-buffer magit-show-refs-arguments nil call-interactively magit-show-commit create-branch [branch remote] magit-split-branch-name magit-branch-p magit-rev-eq magit-call-git "checkout" propertize face magit-branch-local magit-branch-remote read-char-choice format "Branch %s already exists.\n [c]heckout %s as-is\n [r]reset %s to %s and checkout %s\n [a]bort " minibuffer-prompt (99 114 97) message "" #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (99 124 114 133 97 145)) "-B" user-error "Abort" "-b" magit-refresh checkout-any checkout-branch [branch local]] 10 (#$ . 20410) nil]) #@31 Keymap for `remote' sections. (defvar magit-remote-section-map (byte-code "\300 \301\302\303#\210\301\304\305#\210\207" [make-sparse-keymap define-key [remap magit-delete-thing] magit-remote-remove "R" magit-remote-rename] 5) (#$ . 22254)) #@31 Keymap for `branch' sections. (defvar magit-branch-section-map (byte-code "\300 \301\302\303#\210\301\304\305#\210\301\306\307#\210\207" [make-sparse-keymap define-key [remap magit-visit-thing] magit-visit-ref [remap magit-delete-thing] magit-branch-delete "R" magit-branch-rename] 5) (#$ . 22502)) #@28 Keymap for `tag' sections. (defvar magit-tag-section-map (byte-code "\300 \301\302\303#\210\301\304\305#\210\207" [make-sparse-keymap define-key [remap magit-visit-thing] magit-visit-ref [remap magit-delete-thing] magit-tag-delete] 5) (#$ . 22810)) #@277 Insert header containing the description of the current branch. Insert a header line with the name and description of the current branch. The description is taken from the Git variable `branch..description'; if that is undefined then no header line is inserted at all. (defalias 'magit-insert-branch-description #[0 "\306 \211\205 \307\310\311#\211\205\312\313\"\211\205s\314!@\315\232\203%\316!\262\317\320!\203/\320\2027\320\236A\2067\321\322\317\320!\203F\323\320\"@\206G\320\324\325\326 \327 &\330\331\332\333\"\211\203b\211\334=\202\230\n\205m\335\336!\n\"\211\203x\337\331\"\202\226\340 \"\211\203\223\341!\203\215\211!\262\211\334=\202\224\342\262\262\262#\210\211\n\206\252 ?\205\252\f\3432n\344\345@#\210A\203\310\346\347A\313#c\210\350c\210\351\352!\210\353!\210\354\337\355\"\342\"\210\330\356\326 #\357\360\"\361\362\363\337\364\"\"!\361\362\365\337\364\"\"!\203\377J\206\366!\203\nJ\206\366!\205\211J\212\337\355\"b\210`W\203I\367`\321\"\206(\370`\321\"\204B\371`\321\n$\210\203B\371`\360$\210\211b\266\202)\266\211\f=\203\\\372>\373!)\202m\330\337\374\"\375\337\211\374\"\375\"C\244#0\210+\211\262\207" [magit--section-type-alist magit-insert-section--parent magit-insert-section--oldroot magit-section-initial-visibility-alist magit-root-section magit-insert-section--current magit-get-current-branch magit-get "branch" "description" split-string "\n" last "" butlast class-p branchdesc magit-section :type rassq :value :start point-marker :parent eieio-oset hidden run-hook-with-args-until-success magit-section-set-visibility-hook hide magit-get-section magit-section-ident eieio-oref magit-section-match-assoc functionp t cancel-section magit-insert-heading ": " mapconcat identity "\n\n" run-hooks magit-insert-section-hook magit-insert-child-count set-marker-insertion-type start end eieio-oref-default keymap intern format "magit-%s-section-map" type "forge-%s-section-map" boundp next-single-property-change get-text-property put-text-property nil magit-section-show parent children magit-section-cache-visibility] 15 (#$ . 23068)]) #@35 Insert sections showing all tags. (defalias 'magit-insert-tags #[0 "\306\307\310\311$\211\205\312\313\314!\210\315\316!\203\316\202!\316 \236A\206!\317\320\315\316!\2030\321\316 \"@\2061\316\322\312\323\324 \325\n&\326\327\330\331\"\211\203K\211\332=\202} \205V\333\334! \"\211\203a\335\327\"\202{\336\f\"\211\205y\337!\203v\211!\262\211\332=\262\262\262#\210\211 \206\217\n?\205\217 @\3402\341\342!\210\211\203A\211@\343\344\"\210\345\346\"\345\347\"\350!\2038\315\351!\203\277\351\202\307\351 \236A\206\307\317\320\315\351!\203\326\321\351 \"@\206\327\351\322\323\324 \325\n&\326\327\330\331\"\211\203\361\211\332=\202' \205\374\333\334! \"\211\203\335\327\"\202%\336\f\"\211\203\"\337!\203\211!\262\211\332=\202#\352\262\262\262#\210\211 \2069\n?\2059 @\34025\341\353\351\"\354\355\356#\357\346AGZ]\360\"\205_\361\312\"$\210B\203o\362 \203o\363!\210\364!\210\365\366!\210\367!\210\370\335\371\"\352\"\210\326\372\324 #\373\374\"\375\376\377\335\201D\"\"!\375\376\201E\335\201D\"\"!\203\260J\206\307\201F!\203\275J\206\307\201F!\205\307\211J\212\335\371\"b\210`W\203\201G`\317\"\206\337\201H`\317\"\204\377\201I`\317\n$\210\203\377\201I`\374$\210\211b\266\202\317)\266\211 =\203\312C\201J!)\2024\326\335\201K\"\201L\335\211\201K\"\201L\"C\244#0\210+\210\266A\266\202\202\234\210\201Mc\210\201N\312\352\"\210\365\366!\210\367!\210\370\335\371\"\352\"\210\326\372\324 #\373\374\"\375\376\377\335\201D\"\"!\375\376\201E\335\201D\"\"!\203\213J\206\242\201F!\203\230J\206\242\201F!\205\242\211J\212\335\371\"b\210`W\203\341\201G`\317\"\206\272\201H`\317\"\204\332\201I`\317\n$\210\203\332\201I`\374$\210\211b\266\202\252)\266\211 =\203\366\312C\201J!)\202\326\335\201K\"\201L\335\211\201K\"\201L\"C\244#0\210+\211\262\262\207" [magit-buffer-arguments magit--section-type-alist magit-insert-section--parent magit-insert-section--oldroot magit-section-initial-visibility-alist magit-root-section magit-git-lines "tag" "--list" "-n" nil magit-rev-parse "HEAD" class-p tags magit-section :type rassq :value :start point-marker :parent eieio-oset hidden run-hook-with-args-until-success magit-section-set-visibility-hook hide magit-get-section magit-section-ident eieio-oref magit-section-match-assoc functionp cancel-section magit-insert-heading "Tags:" string-match "^\\([^ ]+\\)[ ]+\\([^ \n].*\\)?" match-string 1 2 magit-refs--insert-refname-p tag t magit-refs--format-focus-column propertize font-lock-face magit-tag make-string 32 magit-log-propertize-keywords magit-buffer-margin-p magit-refs--format-margin magit-refs--insert-cherry-commits run-hooks magit-insert-section-hook magit-insert-child-count set-marker-insertion-type start end eieio-oref-default keymap intern format "magit-%s-section-map" magit-insert-section--current magit-refs-primary-column-width magit-refs-margin-for-tags magit-section-cache-visibility type "forge-%s-section-map" boundp next-single-property-change get-text-property put-text-property magit-section-show parent children 10 magit-make-margin-overlay] 19 (#$ . 25238)]) #@55 Insert sections showing all remote-tracking branches. (defalias 'magit-insert-remote-branches #[0 "\306 \211\205\266\211@\307\310!\203\310\202\310\236A\206\311\312\307\310!\203)\313\310\"@\206*\310\314\315\316 \317 &\320\321\322\323\"\211\203D\211\324=\202v\n\205O\325\326!\n\"\211\203Z\327\321\"\202t\330 \"\211\205r\331!\203o\211!\262\211\324=\262\262\262#\210\211\n\206\210 ?\205\210\f\3322\254\333\334\335\336#\334\335\337#\340\341\342\343\344#\341\343\345#\211\205\260\205\260\346Q#\266\202!\210\347\350\351\352\353P@$\211\203\302\211@\354\355\347\356\357\"#\211\242\243\211\242\243\211\242\243\211\242\243\203\377\360P\232\204\367\361\362!\210\262\266 \202\273\363!\203\271\307\364!\203\364\202\364\236A\206\311\312\307\364!\203&\313\364\"@\206'\364\314\315\316 \317 &\320\321\322\323\"\211\203B\211\324=\202x\n\205M\325\326!\n\"\211\203X\327\321\"\202v\330 \"\211\203s\331!\203m\211!\262\211\324=\202t\365\262\262\262#\210\211\n\206\212 ?\205\212\f\3322\266\232A\203\236\202\245GT\347O\333\366!\367\205\264\370#\371\372BGZ]\373\"\205\312\374\347 \"$\266\375 \203\326\376!\210\377!\210\201D\201E!\210\201F!\210\201G\327\201H\"\365\"\210\320\201I\316 #\201J\201K\"\201L\340\201M\327\201N\"\"!\201L\340\201O\327\201N\"\"!\203-J\206D\201P!\203:J\206D\201P!\205D\211J\212\327\201H\"b\210`W\203\207\201Q`\311\"\206^\201R`\311\"\204\200\201S`\311\n$\210\203\200\201S`\201K$\210\211b\266\202N)\266\211\f=\203\234\347C\201T!)\202\265\320\327\201U\"\201V\327\211\201U\"\201V\"C\244#0\210+\210\266 A\266\202\202\302\266\201Wc\210\201X\347\365\"\210\201D\201E!\210\201F!\210\201G\327\201H\"\365\"\210\320\201I\316 #\201J\201K\"\201L\340\201M\327\201N\"\"!\201L\340\201O\327\201N\"\"!\203#J\206:\201P!\2030J\206:\201P!\205:\211J\212\327\201H\"b\210`W\203}\201Q`\311\"\206T\201R`\311\"\204v\201S`\311\n$\210\203v\201S`\201K$\210\211b\266\202D)\266\211\f=\203\222\347C\201T!)\202\253\320\327\201U\"\201V\327\211\201U\"\201V\"C\244#0\210+\210A\266\202\202\207" [magit--section-type-alist magit-insert-section--parent magit-insert-section--oldroot magit-section-initial-visibility-alist magit-root-section magit-insert-section--current magit-list-remotes class-p remote magit-section :type rassq :value :start point-marker :parent eieio-oset hidden run-hook-with-args-until-success magit-section-set-visibility-hook hide magit-get-section magit-section-ident eieio-oref magit-section-match-assoc functionp cancel-section magit-insert-heading magit-get "remote" "url" "pushurl" format propertize "Remote %s (%s):" font-lock-face magit-section-heading magit-branch-remote ", " nil magit-git-lines "for-each-ref" "--format=%(symref:short)%00%(refname:short)%00%(refname)%00%(subject)" "refs/remotes/" -replace "" split-string "" #1="/HEAD" cl--assertion-failed (equal branch (concat remote #1#)) magit-refs--insert-refname-p branch t magit-refs--format-focus-column magit-refs--propertize-branch magit-branch-remote-head make-string 1 32 magit-log-propertize-keywords magit-buffer-margin-p magit-refs--format-margin magit-refs--insert-cherry-commits magit-buffer-arguments magit-refs-show-remote-prefix magit-refs-primary-column-width magit-section-cache-visibility run-hooks magit-insert-section-hook magit-insert-child-count set-marker-insertion-type start end eieio-oref-default keymap intern "magit-%s-section-map" type "forge-%s-section-map" boundp next-single-property-change get-text-property put-text-property magit-section-show parent children 10 magit-make-margin-overlay] 31 (#$ . 28472)]) #@45 Insert sections showing all local branches. (defalias 'magit-insert-local-branches #[0 "\306\307!\203\n\307\202\307\236A\206\310\311\306\307!\203!\312\307\"@\206\"\307\313\314\315\316 \317 &\320\321\322\323\"\211\203<\211\324=\202n\n\205G\325\326!\n\"\211\203R\327\321\"\202l\330 \"\211\205j\331!\203g\211!\262\211\324=\262\262\262#\210\211\n\206\200 ?\205\200\f\3322\246\333\334!\210\335 \211\203\367\211@\211\242\243\203\241\336\202\242\337\306!\203\254\211\202\264\211\236A\206\264\310\311\306!\203\303\312\"@\206\304\313\206\315\340\341!\315\316 \317 &\320\321\322\323\"\211\203\345\211\324=\202\n\205\360\325\326!\n\"\211\203\373\327\321\"\202\330 \"\211\203\331!\203\211!\262\211\324=\202\342\262\262\262#\210\211\n\206- ?\205-\f\3322\354\343\333\"\210\344 \203B\345!\210\346!\210\347\350!\210\351!\210\352\327\353\"\342\"\210\320\354\316 #\355\356\"\357\360\361\327\362\"\"!\357\360\363\327\362\"\"!\203}J\206\220\364!\203\210J\206\220\364!\205\220\211J\212\327\353\"b\210`W\203\307\365`\310\"\206\246\366`\310\"\204\300\367`\310\n$\210\203\300\367`\356$\210\211b\266\202\230)\266\211\f=\203\332\314=\370!)\202\353\320\327\371\"\372\327\211\371\"\372\"C\244#0\210+\266A\266\202\202\215\210\373c\210\374\314\342\"\210\347\350!\210\351!\210\352\327\353\"\342\"\210\320\354\316 #\355\356\"\357\360\361\327\362\"\"!\357\360\363\327\362\"\"!\2037J\206J\364!\203BJ\206J\364!\205J\211J\212\327\353\"b\210`W\203\201\365`\310\"\206`\366`\310\"\204z\367`\310\n$\210\203z\367`\356$\210\211b\266\202R)\266\211\f=\203\224\314=\370!)\202\245\320\327\371\"\372\327\211\371\"\372\"C\244#0\210+\207" [magit--section-type-alist magit-insert-section--parent magit-insert-section--oldroot magit-section-initial-visibility-alist magit-root-section magit-insert-section--current class-p local magit-section :type rassq :value nil :start point-marker :parent eieio-oset hidden run-hook-with-args-until-success magit-section-set-visibility-hook hide magit-get-section magit-section-ident eieio-oref magit-section-match-assoc functionp cancel-section magit-insert-heading "Branches:" magit-refs--format-local-branches branch commit magit-rev-parse "HEAD" t apply magit-buffer-margin-p magit-refs--format-margin magit-refs--insert-cherry-commits run-hooks magit-insert-section-hook magit-insert-child-count set-marker-insertion-type start end eieio-oref-default keymap intern format "magit-%s-section-map" type "forge-%s-section-map" boundp next-single-property-change get-text-property put-text-property magit-section-show parent children 10 magit-make-margin-overlay magit-section-cache-visibility] 20 (#$ . 32262)]) (defalias 'magit-refs--format-local-branches #[0 "\303\304\305\306\307\203 \310\202\311P\312 $\"\313 \204#\304\314\315\316!P!B\262\317\302!\210\320\302!\211:\2043\211\202F\211\242\243\211\321\322\323\324 \"#^\266\204\262\323\325\"\207" [magit-refs-show-push-remote magit-buffer-arguments magit-refs-primary-column-width -keep magit-refs--format-local-branch magit-git-lines "for-each-ref" "--format=%(HEAD)%00%(refname:short)%00%(refname)%00%(upstream:short)%00%(upstream)%00%(upstream:track)%00" "%(push:remotename)%00%(push)%00%(push:track)%00%(subject)" "%00%00%00%(subject)" "refs/heads" magit-get-current-branch "*" magit-rev-format "%s" make-local-variable default-value apply max mapcar car #[257 "\211\243\211\242\243\211\242\243\211\242\243\211\242\243\211\242\243\211\242\243\211\242\243\211\242\243\211\242\243\211\242\243 \f \n     \301\302RGZ]\303\"\n\n\n\n\n\257 \207" [magit-refs-primary-column-width make-string 1 32] 44 "\n\n(fn ARG0)"]] 13]) #@13 (fn LINE) (defalias 'magit-refs--format-local-branch #[257 "\302\303\304\305\306\"#\211\242\243\211\242\243\211\242\243\211\242\243\211\242\243\211\242\243\211\242\243\211\242\243\211\242\243\211\242\243 \f \n\203P\307 !\205E \310\232\205g\205g\311!\205g\232?\n\203z\312  \205v\313#\202~\314\315\316\"\205\232\317\320 \"\205\232\314 \205\221\321\322\323 \"\324Q\325\"\205\266\317\326\n\"\205\266\314\327\322\323\f\" \205\263\321Q\325\"\205\326\205\326\317\320\"\205\326\314\322\323 \"\324 \205\323\321Q\330\"\205\366\205\366\317\326 \"\205\366\314\327\322\323 \" \205\363\321Q\325\"RGT\331\n\"\205)\332\232\203!\314\333\"\202'\312\"\321P \2057\314\330\"\321Q\205A\334\304\"\257\n\266\207\207" [magit-refs-show-push-remote magit-refs-pad-commit-counts -replace "" nil split-string "" magit-refs--insert-refname-p "*" magit-rev-verify magit-refs--propertize-branch magit-branch-current magit--propertize-face "(detached)" font-lock-warning-face string-match "ahead \\([0-9]+\\)" " " match-string 1 ">" magit-dimmed "behind \\([0-9]+\\)" "<" magit-branch-remote magit-refs--format-focus-column "[gone]" error magit-log-propertize-keywords] 51 (#$ . 36085)]) #@27 (fn REF &optional TYPE) (defalias 'magit-refs--format-focus-column #[513 " \203 \n\202\n\303\304\211\305\"\232\204!\306=\2038\307\232\2038\310\307\232\203,\311\202-\312\313S\314\"P\315\"\202\316=\203D \317=\202E \203~\320\"\211\242\243\211\242\243\310\321V\203f\322\323!P\202u\321V\203t\323!\324P\202u\325\326\"\266\206\262\202\327\"\207" [magit-buffer-upstream magit-refs-show-commit-count magit-refs-focus-column-width 1 format "%%%ss " t "HEAD" magit--propertize-face "@" "*" make-string 32 magit-section-heading tag all magit-rev-diff-count 0 "<" number-to-string ">" "=" magit-dimmed ""] 17 (#$ . 37372)]) #@39 (fn BRANCH REF &optional HEAD-FACE) (defalias 'magit-refs--propertize-branch #[770 "\301\302\303\"\"A\304\203D\202\"\207" [magit-ref-namespaces cl-find-if make-closure #[257 "\211\242\211\211\300\302\303\304#)\207" [V0 inhibit-changing-match-data nil t string-match] 10 "\n\n(fn ARG0)"] magit--propertize-face] 8 (#$ . 38030)]) #@16 (fn REFNAME) (defalias 'magit-refs--insert-refname-p #[257 "\301\302\303\"\"\211\203\211A\207\304\207" [magit-refs-filter-alist -first make-closure #[257 "\211\242\211\302!\203 \211\300!\207\211\300\303\304\305#)\207" [V0 inhibit-changing-match-data functionp nil t string-match] 10 "\n\n(fn ARG0)"] t] 5 (#$ . 38381)]) #@12 (fn REF) (defalias 'magit-refs--insert-cherry-commits #[257 "\301\302\"\303\304\"\203\305\306\301\307##\207 \207" [magit-insert-section--current make-closure #[0 "`\303\304\305\306\307\"\310\311\312 \n\300&\210`U\203\313\314\300\"\202\"\315\303\316\")\207" [V0 magit-insert-section--current magit-buffer-upstream nil magit-git-wash apply-partially magit-log-wash-log cherry "cherry" "-v" magit-abbrev-arg message "No cherries for %s" magit-make-margin-overlay t] 8] eieio-oref hidden eieio-oset washer #[0 "\300 \210\302\301!\207" [V0 V1 magit-section-maybe-remove-visibility-indicator] 2]] 10 (#$ . 38719)]) #@15 (fn COMMIT) (defalias 'magit-refs--format-margin #[257 "\212\300\301!b\210\302\303\"\304\305\306O\301\305O#\262)\207" [line-beginning-position 0 magit-rev-format "%ct%cN" magit-log-format-margin 10 nil] 8 (#$ . 39353)]) (provide 'magit-refs)