| 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 "\301\302!\210\303\304\305\306\307\310\311\312&\210\313\314\315\316\317DD\320\311\304\321\322&\210\313\323\315\316\324DD\325\326\327\311\304\321\322\330\331& \210\313\332\315\316\333DD\334\326\335\311\304\321\322& \210\313\336\315\316\337DD\340\326\341\311\304\321\342& \210\313\343\315\316\344DD\345\326\346\311\304\321\347& \210\313\350\315\316\351DD\352\326\353\311\304\311\354\321\355\356\357\360\361\362\363\364\"&\207" [magit-log-margin--custom-type require magit custom-declare-group magit-status nil "Inspect and manipulate Git repositories." :link (info-link "(magit)Status Buffer") :group magit-modes custom-declare-variable magit-status-mode-hook funcall function #[0 "\300\207" [nil] 1] "Hook run after entering Magit-Status mode." :type hook magit-status-headers-hook #[0 "\300\207" [(magit-insert-error-header magit-insert-diff-filter-header magit-insert-head-branch-header magit-insert-upstream-branch-header magit-insert-push-branch-header magit-insert-tags-header)] 1] "Hook run to insert headers into the status buffer.\n\nThis hook is run by `magit-insert-status-headers', which in turn\nhas to be a member of `magit-status-sections-hook' to be used at\nall." :package-version (magit . "2.1.0") :options (magit-insert-error-header magit-insert-diff-filter-header magit-insert-repo-header magit-insert-remote-header magit-insert-head-branch-header magit-insert-upstream-branch-header magit-insert-push-branch-header magit-insert-tags-header) magit-status-sections-hook #[0 "\300\207" [(magit-insert-status-headers magit-insert-merge-log magit-insert-rebase-sequence magit-insert-am-sequence magit-insert-sequencer-sequence magit-insert-bisect-output magit-insert-bisect-rest magit-insert-bisect-log magit-insert-untracked-files magit-insert-unstaged-changes magit-insert-staged-changes magit-insert-stashes magit-insert-unpushed-to-pushremote magit-insert-unpushed-to-upstream-or-recent magit-insert-unpulled-from-pushremote magit-insert-unpulled-from-upstream)] 1] "Hook run to insert sections into a status buffer." (magit . "2.12.0") magit-status-initial-section #[0 "\300\207" [(1)] 1] "The section point is placed on when a status buffer is created.\n\nWhen such a buffer is merely being refreshed or being shown again\nafter it was merely burried, then this option has no effect.\n\nIf this is nil, then point remains on the very first section as\nusual. Otherwise it has to be a list of integers and section\nidentity lists. The members of that list are tried in order\nuntil a matching section is found.\n\nAn integer means to jump to the nth section, 1 for example\njumps over the headings. To get a section's \"identity list\"\nuse \\[universal-argument] \\[magit-describe-section-briefly].\n\nIf, for example, you want to jump to the commits that haven't\nbeen pulled from the upstream, or else the second section, then\nuse: (((unpulled . \"..@{upstream}\") (status)) 1).\n\nSee option `magit-section-initial-visibility-alist' for how to\ncontrol the initial visibility of the jumped to section." (magit . "2.90.0") (choice (const :tag "as usual" nil) (repeat (choice (number :tag "nth top-level section") (sexp :tag "section identity")))) magit-status-show-hashes-in-headers #[0 "\300\207" [nil] 1] "Whether headers in the status buffer show hashes.\nThe functions which respect this option are\n`magit-insert-head-branch-header',\n`magit-insert-upstream-branch-header', and\n`magit-insert-push-branch-header'." (magit . "2.4.0") boolean magit-status-margin #[0 "\301A@\302\301\3038\257\207" [magit-log-margin nil magit-log-margin-width 4] 6] "Format of the margin in `magit-status-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 committer date. It can be one\n of `age' (to show the age of the commit), `age-abbreviated' (to\n abbreviate the time unit to a character), or a string (suitable\n for `format-time-string') to show the actual date.\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 :initialize magit-custom-initialize-reset :set-after (magit-log-margin) :set apply-partially magit-margin-set-variable magit-status-mode] 20) | |
| 16 | #@375 Initialize a Git repository, then show its status. | |
| 17 | ||
| 18 | If the directory is below an existing repository, then the user | |
| 19 | has to confirm that a new one should be created inside. If the | |
| 20 | directory is the root of the existing repository, then the user | |
| 21 | has to confirm that it should be reinitialized. | |
| 22 | ||
| 23 | Non-interactively DIRECTORY is (re-)initialized unconditionally. | |
| 24 | ||
| 25 | (fn DIRECTORY) | |
| 26 | (defalias 'magit-init #[257 "\300\301\302\303!!\"\210\304!\207" [magit-call-git "init" magit-convert-filename-for-git expand-file-name magit-status-internal] 6 (#$ . 4948) (byte-code "\300\301\302\303!!!\304!\211\203/ \301!\262\305\306\"\203\" \307\310\"\202' \307\311#!\204/ \312\313!\210\210\211C\207" [file-name-as-directory expand-file-name read-directory-name "Create repository in: " magit-toplevel y-or-n-p file-equal-p format "Reinitialize existing repository %s? " "%s is a repository. Create another in %s? " user-error "Abort"] 7)]) | |
| 27 | #@322 Show the status of the current Git repository in a buffer. | |
| 28 | With a prefix argument prompt for a repository to be shown. | |
| 29 | With two prefix arguments prompt for an arbitrary directory. | |
| 30 | If that directory isn't the root of an existing repository, | |
| 31 | then offer to initialize it as a new repository. | |
| 32 | ||
| 33 | (fn &optional DIRECTORY CACHE) | |
| 34 | (defalias 'magit-status #[512 "\211\206 \302\211BC\203H \303!\304\305!!\262\211\203( \306\"\203( \307!\202C \310\2036 \311\312#\202: \311\313\"!\205C \314\315!\262\202K \307 !)\207" [magit--refresh-cache default-directory 0 magit-toplevel file-name-as-directory expand-file-name file-equal-p magit-status-internal y-or-n-p format "%s is a repository. Create another in %s? " "Create repository in %s? " nil magit-init] 8 (#$ . 5884) (byte-code "\302\211BC \204 \303 ?\205 \304\305 !\306Y!)D\207" [magit--refresh-cache current-prefix-arg 0 magit-toplevel magit-read-repository prefix-numeric-value 16] 3)]) | |
| 35 | (byte-code "\300\301\302\303#\210\304\305\301\306#\207" [put magit-status interactive-only magit-status-internal defalias magit "An alias for `magit-status' for better discoverability.\n\nInstead of invoking this alias for `magit-status' using\n\"M-x magit RET\", you should bind a key to `magit-status'\nand read the info node `(magit)Getting Started', which\nalso contains other useful hints."] 4) | |
| 36 | #@18 | |
| 37 | ||
| 38 | (fn DIRECTORY) | |
| 39 | (defalias 'magit-status-internal #[257 "\301!\210\211\302\303!)\207" [default-directory magit--tramp-asserts magit-mode-setup magit-status-mode] 3 (#$ . 7239)]) | |
| 40 | (defvar magit--remotes-using-recent-git nil) | |
| 41 | #@18 | |
| 42 | ||
| 43 | (fn DIRECTORY) | |
| 44 | (defalias 'magit--tramp-asserts #[257 "\303!\211\205? \211\235?\205? \304 )\211\2035 \305\n\"\203& \211B\211\202= \306\307\310\311\n$\312#\202= \306\307\310\313\"\312#\262\207" [magit--remotes-using-recent-git default-directory magit--minimal-git file-remote-p magit-git-version version<= display-warning magit format "Magit requires Git >= %s, but on %s the version is %s.\n\nIf multiple Git versions are installed on the host, then the\nproblem might be that TRAMP uses the wrong executable.\n\nFirst check the value of `magit-git-executable'. Its value is\nused when running git locally as well as when running it on a\nremote host. The default value is \"git\", except on Windows\nwhere an absolute path is used for performance reasons.\n\nIf the value already is just \"git\" but TRAMP never-the-less\ndoesn't use the correct executable, then consult the info node\n`(tramp)Remote programs'.\n" :error "Magit cannot find Git on %s.\n\nFirst check the value of `magit-git-executable'. Its value is\nused when running git locally as well as when running it on a\nremote host. The default value is \"git\", except on Windows\nwhere an absolute path is used for performance reasons.\n\nIf the value already is just \"git\" but TRAMP never-the-less\ndoesn't find the executable, then consult the info node\n`(tramp)Remote programs'.\n"] 10 (#$ . 7470)]) | |
| 45 | #@33 Keymap for `magit-status-mode'. | |
| 46 | (defvar magit-status-mode-map (byte-code "\301 \302\"\210\303\304\305#\210\303\306\307#\210\303\310\311#\210\303\312\313#\210\303\314\315#\210\303\316\317#\210\303\320\321#\210\303\322\323#\210\303\324\325#\210\303\326\327#\210\211\207" [magit-mode-map make-sparse-keymap set-keymap-parent define-key "jz" magit-jump-to-stashes "jt" magit-jump-to-tracked "jn" magit-jump-to-untracked "ju" magit-jump-to-unstaged "js" magit-jump-to-staged "jfu" magit-jump-to-unpulled-from-upstream "jfp" magit-jump-to-unpulled-from-pushremote "jpu" magit-jump-to-unpushed-to-upstream "jpp" magit-jump-to-unpushed-to-pushremote [remap dired-jump] magit-dired-jump] 5) (#$ . 8864)) | |
| 47 | (defvar magit-status-mode-hook nil) | |
| 48 | (byte-code "\300\301N\204\f \302\300\301\303#\210\304\305!\204 \302\305\306\307#\210\300\207" [magit-status-mode-hook variable-documentation put "Hook run after entering Magit 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-status-mode-map definition-name magit-status-mode] 4) | |
| 49 | (defvar magit-status-mode-map (make-sparse-keymap)) | |
| 50 | (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-status-mode-abbrev-table magit-status-mode-map variable-documentation put purecopy "Keymap for `magit-status-mode'." boundp magit-status-mode-syntax-table definition-name magit-status-mode (lambda (#1=#:def-tmp-var) (defvar magit-status-mode-syntax-table #1#)) make-syntax-table "Syntax table for `magit-status-mode'." (lambda (#1#) (defvar magit-status-mode-abbrev-table #1#)) define-abbrev-table nil "Abbrev table for `magit-status-mode'." derived-mode-parent magit-mode custom-mode-group magit-status] 5) | |
| 51 | #@953 Mode for looking at Git status. | |
| 52 | ||
| 53 | This mode is documented in info node `(magit)Status Buffer'. | |
| 54 | ||
| 55 | \<magit-mode-map>Type \[magit-refresh] to refresh the current buffer. | |
| 56 | Type \[magit-section-toggle] to expand or hide the section at point. | |
| 57 | Type \[magit-visit-thing] to visit the change or commit at point. | |
| 58 | ||
| 59 | Type \[magit-dispatch-popup] to see available prefix popups. | |
| 60 | ||
| 61 | Staging and applying changes is documented in info node | |
| 62 | `(magit)Staging and Unstaging' and info node `(magit)Applying'. | |
| 63 | ||
| 64 | \<magit-hunk-section-map>Type \[magit-apply] to apply the change at point, \[magit-stage] to stage, | |
| 65 | \[magit-unstage] to unstage, \[magit-discard] to discard, or \[magit-reverse] to reverse it. | |
| 66 | ||
| 67 | \<magit-status-mode-map>Type \[magit-commit-popup] to create a commit. | |
| 68 | ||
| 69 | \{magit-status-mode-map} | |
| 70 | ||
| 71 | In addition to any hooks its parent mode `magit-mode' might have run, | |
| 72 | this mode runs the hook `magit-status-mode-hook', as the final or penultimate step | |
| 73 | during initialization. | |
| 74 | (defalias 'magit-status-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 \325 C#\210\327 !\210\330\f!\210 \331 \210\332 \306\333!\210\334)\335\336!\207" [delay-mode-hooks major-mode mode-name magit-status-mode-map magit-status-mode-syntax-table magit-status-mode-abbrev-table make-local-variable t magit-mode magit-status-mode "Magit" 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--status-create-index-function bookmark-make-record-function magit-bookmark--status-make-record run-mode-hooks magit-status-mode-hook local-abbrev-table imenu-create-index-function] 5 (#$ . 10852) nil]) | |
| 75 | (defalias 'magit-status-refresh-buffer #[0 "\306\307\310\"\210\311\312!\203 \211\202 \211\236A\206 \313\314\312!\203/ \315\"@\2060 \316\317\300#\2020 \320\321\322\323 \324 &\325\326\327\330\"\211\203J \211\331=\202| \n\205U \332\333!\n\"\211\203` \334\326\"\202z \335 \"\211\205x \336!\203u \211!\262\211\331=\262\262\262#\210\211\n\206\216 ?\205\216 \f \3372?\340\341!\210\342\343!\210\344!\210\345\334\346\"\347\"\210\325\350\323 #\351\352\"\353\354\355\334\356\"\"!\353\354\357\334\356\"\"!\203\320 J\206\343 \360!\203\333 J\206\343 \360!\205\343 \211J\212\334\346\"b\210`W\203\361`\313\"\206\371 \362`\313\"\204\363`\313\n$\210\203\363`\352$\210\211b\266\202\353 )\266\211\f=\203-\321 7\364!)\202>\325\334\365\"\366\334\211\365\"\366\"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 magit-git-exit-code "update-index" "--refresh" status class-p magit-section :type rassq error "BUG: No entry for %s in %s" :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-run-section-hook magit-status-sections-hook run-hooks magit-insert-section-hook magit-insert-child-count set-marker-insertion-type start t 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 magit-section-cache-visibility] 13]) | |
| 76 | #@296 In a `magit-status-mode' buffer, jump `magit-status-initial-section'. | |
| 77 | Actually doing so is deferred until `magit-refresh-buffer-hook' | |
| 78 | runs `magit-status-goto-initial-section-1'. That function then | |
| 79 | removes itself from the hook, so that this only happens when the | |
| 80 | status buffer is first created. | |
| 81 | (defalias 'magit-status-goto-initial-section #[0 "\205 \301\302!\205 \303\304\305\306\307$\207" [magit-status-initial-section derived-mode-p magit-status-mode add-hook magit-refresh-buffer-hook magit-status-goto-initial-section-1 nil t] 5 (#$ . 14508)]) | |
| 82 | #@134 In a `magit-status-mode' buffer, jump `magit-status-initial-section'. | |
| 83 | This function removes itself from `magit-refresh-buffer-hook'. | |
| 84 | (defalias 'magit-status-goto-initial-section-1 #[0 "\302\303\304\2039 \2039 @\203 \302\262\202- \211\250\203( \211S\305\306 \307\"8\202+ \310!\262\210\211T\262A\262\202 \266\211\262\211\203b \311\312\"b\210\300 \236A\211\203a \211\313=\203] \314!\210\202a \315!\210\210\210\316\317\320\303#\207" [magit-status-initial-section magit-section-initial-visibility-alist nil t 0 magit-section-siblings magit-current-section next magit-get-section eieio-oref start hide magit-section-hide magit-section-show remove-hook magit-refresh-buffer-hook magit-status-goto-initial-section-1] 9 (#$ . 15067)]) | |
| 85 | #@148 When moving in the status buffer, update the revision buffer. | |
| 86 | If there is no revision buffer in the same frame, then do nothing. | |
| 87 | ||
| 88 | (fn &optional _) | |
| 89 | (defalias 'magit-status-maybe-update-revision-buffer #[256 "\300\301!\205 \302 \207" [derived-mode-p magit-status-mode magit-log-maybe-update-revision-buffer-1] 3 (#$ . 15818)]) | |
| 90 | #@140 When moving in the status buffer, update the blob buffer. | |
| 91 | If there is no blob buffer in the same frame, then do nothing. | |
| 92 | ||
| 93 | (fn &optional _) | |
| 94 | (defalias 'magit-status-maybe-update-blob-buffer #[256 "\300\301!\205 \302 \207" [derived-mode-p magit-status-mode magit-log-maybe-update-blob-buffer-1] 3 (#$ . 16151)]) | |
| 95 | #@161 Insert header sections appropriate for `magit-status-mode' buffers. | |
| 96 | The sections are inserted by running the functions on the hook | |
| 97 | `magit-status-headers-hook'. | |
| 98 | (defalias 'magit-insert-status-headers #[0 "\300\301!\203\n \302\303!\207\304c\207" [magit-rev-verify "HEAD" magit-insert-headers magit-status-headers-hook "In the beginning there was darkness\n\n"] 2 (#$ . 16468)]) | |
| 99 | #@30 Keymap for `error' sections. | |
| 100 | (defvar magit-error-section-map (byte-code "\300 \301\302\303#\210\211\207" [make-sparse-keymap define-key [remap magit-visit-thing] magit-process-buffer] 5) (#$ . 16850)) | |
| 101 | #@316 Insert the message about the Git error that just occured. | |
| 102 | ||
| 103 | This function is only aware of the last error that occur when Git | |
| 104 | was run for side-effects. If, for example, an error occurs while | |
| 105 | generating a diff, then that error won't be inserted. Refreshing | |
| 106 | the status buffer causes this section to disappear again. | |
| 107 | (defalias 'magit-insert-error-header #[0 "\205g\306\307!\203 \211\202 \211 \236A\206 \310\311\307!\203. \312 \"@\206/ \306\313\301#\202/ \314\315\316\317 \320\n&\321\322\323\324\"\211\203I \211\325=\202{ \205T \326\327! \"\211\203_ \330\322\"\202y \331\f\"\211\205w \332!\203t \211!\262\211\325=\262\262\262#\210\211 \206\215 \n?\205\215 =\3332`\334\335\336\337\"\340\341#c\210\334\340\342#c\210\343\344!@\211\203\266 \335\345\346!\"c\210\210\347c\210\350\351!\210\352!\210\353\330\354\"\355\"\210\321\356\317 #\357\360\"\361\335\362\330\363\"\"!\361\335\364\330\363\"\"!\203\361 J\206\365!\203\374 J\206\365!\205\211J\212\330\354\"b\210`W\203;\366`\310\"\206\367`\310\"\2044\370`\310\n$\210\2034\370`\360$\210\211b\266\202\f)\266\211 =\203N\371 >\372!)\202_\321\330\373\"\374\330\211\373\"\374\"C\244#0\210+\266\371\211\207" [magit-this-error magit--section-type-alist magit-insert-section--parent magit-insert-section--oldroot magit-section-initial-visibility-alist magit-root-section error class-p magit-section :type rassq "BUG: No entry for %s in %s" :value git :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 propertize format "%-10s" "GitError! " face magit-section-heading font-lock-warning-face where-is-internal magit-process-buffer " [Type `%s' for details]" key-description 10 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 nil magit-section-show parent children magit-insert-section--current magit-section-cache-visibility] 13 (#$ . 17059)]) | |
| 108 | #@58 Insert a header line showing the effective diff filters. | |
| 109 | (defalias 'magit-insert-diff-filter-header #[0 "\301 \211\204\n \205/ \302\303\304\305\"\306\307#c\210\211\203\" \211c\210\203\" \310c\210\203- \311\312\313#c\210\314c\207" [magit-diff-section-file-args magit-ignore-submodules-p propertize format "%-10s" "Filter! " face magit-section-heading " -- " mapconcat identity " " 10] 5 (#$ . 19293)]) | |
| 110 | #@165 Insert a header line about BRANCH. | |
| 111 | When BRANCH is nil, use the current branch or, if none, the | |
| 112 | detached `HEAD'. | |
| 113 | ||
| 114 | (fn &optional (BRANCH (magit-get-current-branch))) | |
| 115 | (defalias 'magit-insert-head-branch-header #[128 "\211\203 \211A\262\242\202 \306 \203 \307\310\311GTD\"\210\312\313\206# \314\"\315\316\"\210\211\317\320\"\317\321\"\203\260\322\323!\203A \211\202I \211\236A\206I \324\325\323!\203` \326\"@\206a \327\330\300#\202a \331 \332\333 \334 &\335\336\337\340\"\211\203| \211\341=\202\256 \n\205\207 \342\343!\n\"\211\203\222 \344\336\"\202\254 \345 \"\211\205\252 \346!\203\247 \211!\262\211\341=\262\262\262#\210\211\n\206\300 ?\205\300 \f \3472\251\350\351\352\"c\210@\203\333 \353\354\355#\356\261\210\353\354\357#c\210\356c\210A\"c\210\360c\210\361\362!\210\363!\210\364\344\365\"\366\"\210\335\367\333 #\370\371\"\372\350\373\344\374\"\"!\372\350\375\344\374\"\"!\203(J\206;\376!\2033J\206;\376!\205;\211J\212\344\365\"b\210`W\203x\377`\324\"\206Q\201C `\324\"\204q\201D `\324\n$\210\203q\201D `\371$\210\211b\266\202C)\266\211\f=\203\217\201E B\201F !)\202\250\335\344\201G \"\201H \344\211\201G \"\201H \"C\244#0\210+\262\202\201I \323!\203\275\211\202\305\211\236A\206\305\324\325\323!\203\334\326\"@\206\335\327\330\300#\202\335\331\332\333 \334 &\335\336\337\340\"\211\203\370\211\341=\202*\n\205\342\343!\n\"\211\203\344\336\"\202(\345 \"\211\205&\346!\203#\211!\262\211\341=\262\262\262#\210\211\n\206< ?\205<\f \3472\350\351\352\"c\210\353\354\355#c\210\356\360\261\210\361\362!\210\363!\210\364\344\365\"\366\"\210\335\367\333 #\370\371\"\372\350\373\344\374\"\"!\372\350\375\344\374\"\"!\203\215J\206\240\376!\203\230J\206\240\376!\205\240\211J\212\344\365\"b\210`W\203\335\377`\324\"\206\266\201C `\324\"\204\326\201D `\324\n$\210\203\326\201D `\371$\210\211b\266\202\250)\266\211\f=\203\364\201E B\201F !)\202 \335\344\201G \"\201H \344\211\201G \"\201H \"C\244#0\210+\262\266\202\262\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 signal wrong-number-of-arguments magit-insert-head-branch-header magit-rev-format "%h %s" "HEAD" string-match "^\\([^ ]+\\) \\(.*\\)" match-string 1 2 branch class-p magit-section :type rassq error "BUG: No entry for %s in %s" :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 format "%-10s" "Head: " propertize face magit-hash 32 magit-branch-local 10 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 magit-status-show-hashes-in-headers magit-log-format-message-function magit-section-cache-visibility get-text-property put-text-property nil magit-section-show parent children commit] 19 (#$ . 19705)]) | |
| 116 | #@173 Insert a header line about branch usually pulled into current branch. | |
| 117 | ||
| 118 | (fn &optional (BRANCH (magit-get-current-branch)) (PULL (magit-get-upstream-branch branch)) KEYWORD) | |
| 119 | (defalias 'magit-insert-upstream-branch-header #[128 "\211\203 \211A\262\242\202 \306 \203 \211A\262\242\202 \307!\211A\262\242\2034 \310\311\312\313G\\D\"\210\205N\314\315!\203C \211\202K \211\236A\206K \316\317\315!\203b \320\"@\206c \321\322\300#\202c \323\324\325 \326 &\327\330\331\332\"\211\203~ \211\333=\202\260 \n\205\211 \334\335!\n\"\211\203\224 \336\330\"\202\256 \337 \"\211\205\254 \340!\203\251 \211!\262\211\333=\262\262\262#\210\211\n\206\302 ?\205\302 \f \3412J\342\343\344#\211\345\232\204\346 \211\346\267\202\341 \347\262\202\346 \350\351!\262\352\353\206\365 \203\364 \354\202\365 \355\"c\266@\205\356\347\357 A\360#)\266\203?\205\361\362\"\211\203!\363\364\365#\356\261\210\210\356\347\357 A\360#)\266\203\203L\366\356\"\211@A\211@A\367\356\261\266\202q\356\261\210\370!\205[\361\371\"\211\203iB\"c\210\202p\363\372\364\373#c\210\210\374c\210\375\376!\210\377!\210\201D \336\201E \"\357\"\210\327\201F \325 #\201G \201H \"\201I \352\201J \336\201K \"\"!\201I \352\201L \336\201K \"\"!\203\301J\206\330\201M !\203\316J\206\330\201M !\205\330\211J\212\336\201E \"b\210`W\203\201N `\316\"\206\362\201O `\316\"\204\201P `\316\n$\210\203\201P `\201H $\210\211b\266\202\342)\266\211\f=\2030\347 C\201Q !)\202I\327\336\201R \"\201S \336\211\201R \"\201S \"C\244#0\210+\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-upstream-branch signal wrong-number-of-arguments magit-insert-upstream-branch-header 3 branch class-p magit-section :type rassq error "BUG: No entry for %s in %s" :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-get "branch" "rebase" "true" #s(hash-table size 1 test equal rehash-size 1.5 rehash-threshold 0.8125 purecopy t data ("false" 219)) nil magit-get-boolean "pull.rebase" format "%-10s" "Rebase: " "Merge: " " " t string-match magit-rev-format "%h" propertize face magit-hash split-string " from " magit-rev-verify "%s" "is missing" font-lock-warning-face 10 run-hooks magit-insert-section-hook magit-insert-child-count magit-status-show-hashes-in-headers inhibit-changing-match-data magit-log-format-message-function magit-section-cache-visibility 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] 17 (#$ . 22968)]) | |
| 120 | #@162 Insert a header line about the branch the current branch is pushed to. | |
| 121 | ||
| 122 | (fn &optional (BRANCH (magit-get-current-branch)) (PUSH (magit-get-push-branch branch))) | |
| 123 | (defalias 'magit-insert-push-branch-header #[128 "\211\203 \211A\262\242\202 \306 \203 \211A\262\242\202 \307!\203. \310\311\312\313G\\D\"\210\211\205\307\314\315!\203= \211\202E \211\236A\206E \316\317\315!\203\\ \320\"@\206] \321\322\300#\202] \323\324\325 \326 &\327\330\331\332\"\211\203w \211\333=\202\251 \n\205\202 \334\335!\n\"\211\203\215 \336\330\"\202\247 \337 \"\211\205\245 \340!\203\242 \211!\262\211\333=\262\262\262#\210\211\n\206\273 ?\205\273 \f \3412\303\342\343\344\"c\210@\205\321 \345\346\"\211\203\336 \347\350\351#\352\261\210\210\347\350\353#\352\261\210\354!\205\362 \345\355\"\211\203 A\"c\210\202\347\356\350\357#c\210\210\360c\210\361\362!\210\363!\210\364\336\365\"\366\"\210\327\367\325 #\370\371\"\372\342\373\336\374\"\"!\372\342\375\336\374\"\"!\203BJ\206U\376!\203MJ\206U\376!\205U\211J\212\336\365\"b\210`W\203\222\377`\316\"\206k\201C `\316\"\204\213\201D `\316\n$\210\203\213\201D `\371$\210\211b\266\202])\266\211\f=\203\251\201E B\201F !)\202\302\327\336\201G \"\201H \336\211\201G \"\201H \"C\244#0\210+\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-push-branch signal wrong-number-of-arguments magit-insert-push-branch-header 2 branch class-p magit-section :type rassq error "BUG: No entry for %s in %s" :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 format "%-10s" "Push: " magit-rev-format "%h" propertize face magit-hash 32 magit-branch-remote magit-rev-verify "%s" "is missing" font-lock-warning-face 10 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 magit-status-show-hashes-in-headers magit-log-format-message-function magit-section-cache-visibility get-text-property put-text-property nil magit-section-show parent children] 16 (#$ . 25971)]) | |
| 124 | #@57 Insert a header line about the current and/or next tag. | |
| 125 | (defalias 'magit-insert-tags-header #[0 "\306\307\310\"\311\307\310\"A@A@@@\205 \211\205 \310\204# \205\224\312\313!\203. \211\2026 \211\236A\2066 \314\315\313!\203M \316\"@\206N \317\320\300#\202N \321\206V \322\323 \324 &\325\326\327\330\"\211\203n \211\331=\202\240 \n\205y \332\333!\n\"\211\203\204 \334\326\"\202\236 \335 \"\211\205\234 \336!\203\231 \211!\262\211\331=\262\262\262#\210\211\n\206\262 ?\205\262 \f \3372\220\340\341\203\303 \342\202\304 \343\"c\210\344\203\324 \211 \345#\210\203\333 \346c\210\203\346 \211\347#\210\210\350c\210\351\352!\210\353!\210\354\334\355\"\310\"\210\325\356\323 #\357\360\"\361\340\362\334\363\"\"!\361\340\364\334\363\"\"!\203!J\2064\365!\203,J\2064\365!\2054\211J\212\334\355\"b\210`W\203k\366`\314\"\206J\367`\314\"\204d\370`\314\n$\210\203d\370`\360$\210\211b\266\202<)\266\211\f=\203~\307 <\371!)\202\217\325\334\372\"\373\334\211\372\"\373\"C\244#0\210+\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-tag nil t magit-get-next-tag tag class-p magit-section :type rassq error "BUG: No entry for %s in %s" :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 format "%-10s" "Tags: " "Tag: " #[771 "\300\301\302#\303V\205 \304\305\300\304\306\"\301#\"Pc\207" [propertize face magit-tag 0 format " (%s)" "%s"] 10 "\n\n(fn TAG COUNT FACE)"] magit-branch-local ", " magit-tag 10 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 magit-section-cache-visibility] 20 (#$ . 28451)]) | |
| 126 | #@46 Insert a header line about the current user. | |
| 127 | (defalias 'magit-insert-user-header #[0 "\306\307!\306\310!\205\\\211\205\\\311\312!\203 \211\202! \211\236A\206! \313\314\312!\2038 \315\"@\2069 \316\317\300#\2029 \320\321\322 \323 &\324\325\326\327\"\211\203T \211\330=\202\206 \n\205_ \331\332!\n\"\211\203j \333\325\"\202\204 \334 \"\211\205\202 \335!\203 \211!\262\211\330=\262\262\262#\210\211\n\206\230 ?\205\230 \f \3362X\337\340\341\"c\210\342\343\344#c\210\345\346\261\210\347\350!\210\351!\210\352\333\353\"\354\"\210\324\355\322 #\356\357\"\360\337\361\333\362\"\"!\360\337\363\333\362\"\"!\203\351 J\206\374 \364!\203\364 J\206\374 \364!\205\374 \211J\212\333\353\"b\210`W\2033\365`\313\"\206\366`\313\"\204,\367`\313\n$\210\203,\367`\357$\210\211b\266\202)\266\211\f=\203F\370 <\371!)\202W\324\333\372\"\373\333\211\372\"\373\"C\244#0\210+\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 "user.name" "user.email" user class-p magit-section :type rassq error "BUG: No entry for %s in %s" :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 format "%-10s" "User: " propertize face magit-log-author " <" ">\n" 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 nil magit-section-show parent children magit-section-cache-visibility] 15 (#$ . 30601)]) | |
| 128 | #@68 Insert a header line showing the path to the repository top-level. | |
| 129 | (defalias 'magit-insert-repo-header #[0 "\306 \307\310!\203 \211\202 \211\236A\206 \311\312\310!\203, \313\"@\206- \314\315\300#\202- \316\317\320 \321 &\322\323\324\325\"\211\203G \211\326=\202y \n\205R \327\330!\n\"\211\203] \331\323\"\202w \332 \"\211\205u \333!\203r \211!\262\211\326=\262\262\262#\210\211\n\206\213 ?\205\213 \f \3342B\335\336\337\340!#c\210\341\342!\210\343!\210\344\331\345\"\346\"\210\322\347\320 #\350\351\"\352\335\353\331\354\"\"!\352\335\355\331\354\"\"!\203\323 J\206\346 \356!\203\336 J\206\346 \356!\205\346 \211J\212\331\345\"b\210`W\203 \357`\311\"\206\374 \360`\311\"\204\361`\311\n$\210\203\361`\351$\210\211b\266\202\356 )\266\211\f=\2030\362 6\363!)\202A\322\331\364\"\365\331\211\364\"\365\"C\244#0\210+\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-toplevel repo class-p magit-section :type rassq error "BUG: No entry for %s in %s" :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 format "%-10s%s\n" "Repo: " abbreviate-file-name 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 nil magit-section-show parent children magit-section-cache-visibility] 14 (#$ . 32461)]) | |
| 130 | #@222 Insert a header line about the remote of the current branch. | |
| 131 | ||
| 132 | If no remote is configured for the current branch, then fall back | |
| 133 | showing the "origin" remote, or if that does not exist the first | |
| 134 | remote in alphabetic order. | |
| 135 | (defalias 'magit-insert-remote-header #[0 "\306 \211\205 \307\310\311#\211\205^\312\313!\203 \211\202\" \211\236A\206\" \314\315\313!\2039 \316\"@\206: \317\320\300#\202: \321\322\323 \324 &\325\326\327\330\"\211\203U \211\331=\202\207 \n\205` \332\333!\n\"\211\203k \334\326\"\202\205 \335 \"\211\205\203 \336!\203\200 \211!\262\211\331=\262\262\262#\210\211\n\206\231 ?\205\231 \f \3372Z\340\341\342\"c\210\343\344\345#\346\261\210\347\261\210\350\351!\210\352!\210\353\334\354\"\355\"\210\325\356\323 #\357\360\"\361\340\362\334\363\"\"!\361\340\364\334\363\"\"!\203\353 J\206\376 \365!\203\366 J\206\376 \365!\205\376 \211J\212\334\354\"b\210`W\2035\366`\314\"\206\367`\314\"\204.\370`\314\n$\210\203.\370`\360$\210\211b\266\202)\266\211\f=\203H\371 =\372!)\202Y\325\334\373\"\374\334\211\373\"\374\"C\244#0\210+\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-some-remote magit-get "remote" "url" remote class-p magit-section :type rassq error "BUG: No entry for %s in %s" :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 format "%-10s" "Remote: " propertize face magit-branch-remote 32 10 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 nil magit-section-show parent children magit-section-cache-visibility] 15 (#$ . 34238)]) | |
| 136 | #@37 Keymap for the `untracked' section. | |
| 137 | (defvar magit-untracked-section-map (byte-code "\300 \301\302\303#\210\301\304\305#\210\211\207" [make-sparse-keymap define-key [remap magit-delete-thing] magit-discard "s" magit-stage] 5) (#$ . 36301)) | |
| 138 | #@102 Jump to the section "Untracked files". | |
| 139 | With a prefix argument also expand it. | |
| 140 | ||
| 141 | (fn &optional EXPAND) | |
| 142 | (defalias 'magit-jump-to-untracked #[256 "\303\304\305B\306!B!\211\2032 \307\310\"b\210\2055 \3111% \305\312!)0\202+ \210\313\314\315!\210\316\317!\2025 \320\321!\207" [magit-root-section inhibit-quit quit-flag magit-get-section untracked nil magit-section-ident eieio-oref start (quit) magit-section-show t eval (ignore nil) recenter 0 message "Section \"Untracked files\" wasn't found"] 5 (#$ . 36549) "P"]) | |
| 143 | #@446 Maybe insert a list or tree of untracked files. | |
| 144 | ||
| 145 | Do so depending on the value of `status.showUntrackedFiles'. | |
| 146 | Note that even if the value is `all', Magit still initially | |
| 147 | only shows directories. But the directory sections can then | |
| 148 | be expanded using "TAB". | |
| 149 | ||
| 150 | If the first element of `magit-diff-section-arguments' is a | |
| 151 | directory, then limit the list to files below that. The value | |
| 152 | value of that variable can be set using "D = f DIRECTORY RET g". | |
| 153 | (defalias 'magit-insert-untracked-files #[0 "\306\307!\206 \310@\211\205 \311!\205 \211\312\232?\2057\313\232\203u\314\315\"\211\205p\316\317!\2034 \211\202< \211 \236A\206< \320\321\317!\203S \322 \"@\206T \323\324\301#\202T \325\315\326\327 \330\n&\331\332\333\334\"\211\203n \211\335=\202\240 \205y \336\337! \"\211\203\204 \340\332\"\202\236 \341\f\"\211\205\234 \342!\203\231 \211!\262\211\335=\262\262\262#\210\211 \206\262 \n?\205\262 @\3432l\344\345!\210\346\"\210\347c\210\350\351!\210\352!\210\353\340\354\"\355\"\210\331\356\327 #\357\360\"\361\362\363\340\364\"\"!\361\362\365\340\364\"\"!\203\375 J\206\366!\203J\206\366!\205\211J\212\340\354\"b\210`W\203G\367`\320\"\206&\370`\320\"\204@\371`\320\n$\210\203@\371`\360$\210\211b\266\202)\266\211 =\203Z\315 A\372!)\202k\331\340\373\"\374\340\211\373\"\374\"C\244#0\210+\262\262\2027\375\376\377\201B \201C \201D \201E \201F \201G \201H \n&\"\"\211\2055\316\317!\203\243\211\202\253\211 \236A\206\253\320\321\317!\203\302\322 \"@\206\303\323\324\301#\202\303\325\315\326\327 \330\n&\331\332\333\334\"\211\203\335\211\335=\202 \205\350\336\337! \"\211\203\363\340\332\"\202 \341\f\"\211\205 \342!\203\211!\262\211\335=\262\262\262#\210\211 \206!\n?\205! @\34321\344\345!\210\211\203\207\211@\201I \317!\203A\211\202I\211 \236A\206I\320\321\317!\203`\322 \"@\206a\323\324\301#\202a\325\326\327 \330\n&\331\332\333\334\"\211\203{\211\335=\202\255 \205\206\336\337! \"\211\203\221\340\332\"\202\253\341\f\"\211\205\251\342!\203\246\211!\262\211\335=\262\262\262#\210\211 \206\277\n?\205\277 @\3432|\201J \201K \201L #\347\261\210\350\351!\210\352!\210\353\340\354\"\355\"\210\331\356\327 #\357\360\"\361\362\363\340\364\"\"!\361\362\365\340\364\"\"!\203 J\206 \366!\203J\206 \366!\205 \211J\212\340\354\"b\210`W\203W\367`\320\"\2066\370`\320\"\204P\371`\320\n$\210\203P\371`\360$\210\211b\266\202()\266\211 =\203j\315 A\372!)\202{\331\340\373\"\374\340\211\373\"\374\"C\244#0\210+\266A\266\202\202.\210\347c\210\350\351!\210\352!\210\353\340\354\"\355\"\210\331\356\327 #\357\360\"\361\362\363\340\364\"\"!\361\362\365\340\364\"\"!\203\302J\206\325\366!\203\315J\206\325\366!\205\325\211J\212\340\354\"b\210`W\203\f\367`\320\"\206\353\370`\320\"\204\371`\320\n$\210\203\371`\360$\210\211b\266\202\335)\266\211 =\203 \315 A\372!)\2020\331\340\373\"\374\340\211\373\"\374\"C\244#0\210+\262\262\207" [magit-diff-section-file-args magit--section-type-alist magit-insert-section--parent magit-insert-section--oldroot magit-section-initial-visibility-alist magit-root-section magit-get "status.showUntrackedFiles" "normal" file-directory-p "no" "all" magit-untracked-files nil untracked class-p magit-section :type rassq error "BUG: No entry for %s in %s" :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 "Untracked files:" magit-insert-files 10 run-hooks magit-insert-section-hook magit-insert-child-count set-marker-insertion-type start t 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 apply append mapcar magit-insert-section--current magit-section-cache-visibility #[257 "\211\300H\301=\205 \211\302\303OC\207" [0 63 3 nil] 4 "\n\n(fn IT)"] magit-git-items "status" "-z" "--porcelain" magit-ignore-submodules-p "--" file propertize face magit-filename] 21 (#$ . 37073)]) | |
| 154 | #@100 Jump to the section "Tracked files". | |
| 155 | With a prefix argument also expand it. | |
| 156 | ||
| 157 | (fn &optional EXPAND) | |
| 158 | (defalias 'magit-jump-to-tracked #[256 "\303\304\305B\306!B!\211\2032 \307\310\"b\210\2055 \3111% \305\312!)0\202+ \210\313\314\315!\210\316\317!\2025 \320\321!\207" [magit-root-section inhibit-quit quit-flag magit-get-section tracked nil magit-section-ident eieio-oref start (quit) magit-section-show t eval (ignore nil) recenter 0 message "Section \"Tracked files\" wasn't found"] 5 (#$ . 41376) "P"]) | |
| 159 | #@222 Insert a tree of tracked files. | |
| 160 | ||
| 161 | If the first element of `magit-diff-section-arguments' is a | |
| 162 | directory, then limit the list to files below that. The value | |
| 163 | value of that variable can be set using "D = f DIRECTORY RET g". | |
| 164 | (defalias 'magit-insert-tracked-files #[0 "\306 \211\205`@\211\205 \307!\205 \211\310\311!\203 \211\202& \211 \236A\206& \312\313\311!\203= \314 \"@\206> \315\316\301#\202> \317\320\321\322 \323\n&\324\325\326\327\"\211\203X \211\330=\202\216 \205c \331\332! \"\211\203n \333\325\"\202\214 \334\f\"\211\203\211 \335!\203\203 \211!\262\211\330=\202\212 \336\262\262\262#\210\211 \206\240 \n?\205\240 8\3372Z\340\341!\210\342\"\210\343c\210\344\345!\210\346!\210\347\333\350\"\336\"\210\324\351\322 #\352\353\"\354\355\356\333\357\"\"!\354\355\360\333\357\"\"!\203\353 J\206\376 \361!\203\366 J\206\376 \361!\205\376 \211J\212\333\350\"b\210`W\2035\362`\312\"\206\363`\312\"\204.\364`\312\n$\210\203.\364`\353$\210\211b\266\202)\266\211 =\203H\320 9\365!)\202Y\324\333\366\"\367\333\211\366\"\367\"C\244#0\210+\262\266\202\207" [magit-diff-section-file-args magit--section-type-alist magit-insert-section--parent magit-insert-section--oldroot magit-section-initial-visibility-alist magit-root-section magit-list-files file-directory-p tracked class-p magit-section :type rassq error "BUG: No entry for %s in %s" :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 t cancel-section magit-insert-heading "Tracked files:" magit-insert-files 10 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 magit-insert-section--current magit-section-cache-visibility] 16 (#$ . 41892)]) | |
| 165 | #@216 Insert a tree of ignored files. | |
| 166 | ||
| 167 | If the first element of `magit-diff-section-arguments' is a | |
| 168 | directory, then limit the list to files below that. The value | |
| 169 | of that variable can be set using "D = f DIRECTORY RET g". | |
| 170 | (defalias 'magit-insert-ignored-files #[0 "\306 \211\205`@\211\205 \307!\205 \211\310\311!\203 \211\202& \211 \236A\206& \312\313\311!\203= \314 \"@\206> \315\316\301#\202> \317\320\321\322 \323\n&\324\325\326\327\"\211\203X \211\330=\202\216 \205c \331\332! \"\211\203n \333\325\"\202\214 \334\f\"\211\203\211 \335!\203\203 \211!\262\211\330=\202\212 \336\262\262\262#\210\211 \206\240 \n?\205\240 8\3372Z\340\341!\210\342\"\210\343c\210\344\345!\210\346!\210\347\333\350\"\336\"\210\324\351\322 #\352\353\"\354\355\356\333\357\"\"!\354\355\360\333\357\"\"!\203\353 J\206\376 \361!\203\366 J\206\376 \361!\205\376 \211J\212\333\350\"b\210`W\2035\362`\312\"\206\363`\312\"\204.\364`\312\n$\210\203.\364`\353$\210\211b\266\202)\266\211 =\203H\320 9\365!)\202Y\324\333\366\"\367\333\211\366\"\367\"C\244#0\210+\262\266\202\207" [magit-diff-section-file-args magit--section-type-alist magit-insert-section--parent magit-insert-section--oldroot magit-section-initial-visibility-alist magit-root-section magit-ignored-files file-directory-p tracked class-p magit-section :type rassq error "BUG: No entry for %s in %s" :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 t cancel-section magit-insert-heading "Ignored files:" magit-insert-files 10 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 magit-insert-section--current magit-section-cache-visibility] 16 (#$ . 43970)]) | |
| 171 | #@24 | |
| 172 | ||
| 173 | (fn FILES DIRECTORY) | |
| 174 | (defalias 'magit-insert-files #[514 "\203\272\306\206\n \307@\"\203\272\310@!\211\232\203f\211A\262\242\311\312!\203+ \211\2023 \211\236A\2063 \313\314\312!\203J \315\"@\206K \316\317\300#\202K \320\321\322 \323 &\324\325\326\327\"\211\203e \211\330=\202\227 \n\205p \331\332!\n\"\211\203{ \333\325\"\202\225 \334 \"\211\205\223 \335!\203\220 \211!\262\211\330=\262\262\262#\210\211\n\206\251 ?\205\251 \f \3362_\337\340\341#\342\261\210\343\344!\210\345!\210\346\333\347\"\350\"\210\324\351\322 #\352\353\"\354\355\356\333\357\"\"!\354\355\360\333\357\"\"!\203\360 J\206\361!\203\373 J\206\361!\205\211J\212\333\347\"b\210`W\203:\362`\313\"\206\363`\313\"\2043\364`\313\n$\210\2033\364`\353$\210\211b\266\202 )\266\211\f=\203M\365 ;\366!)\202^\324\333\367\"\370\333\211\367\"\370\"C\244#0\210+\266\202\266\311\312!\203q\211\202y\211\236A\206y\313\314\312!\203\220\315\"@\206\221\316\317\300#\202\221\320\321\322 \323 &\324\325\326\327\"\211\203\253\211\330=\202\341\n\205\266\331\332!\n\"\211\203\301\333\325\"\202\337\334 \"\211\203\334\335!\203\326\211!\262\211\330=\202\335\350\262\262\262#\210\211\n\206\363 ?\205\363\f \3362\262\337\311\341#\342\261\210\371 \210\372\"\262\343\344!\210\345!\210\346\333\347\"\350\"\210\324\351\322 #\352\353\"\354\355\356\333\357\"\"!\354\355\360\333\357\"\"!\203CJ\206V\361!\203NJ\206V\361!\205V\211J\212\333\347\"b\210`W\203\215\362`\313\"\206l\363`\313\"\204\206\364`\313\n$\210\203\206\364`\353$\210\211b\266\202^)\266\211\f=\203\240\365 ;\366!)\202\261\324\333\367\"\370\333\211\367\"\370\"C\244#0\210+\266\210\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 string-prefix-p "" file-name-directory file class-p magit-section :type rassq error "BUG: No entry for %s in %s" :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 propertize face magit-filename 10 run-hooks magit-insert-section-hook magit-insert-child-count set-marker-insertion-type start t 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-insert-heading magit-insert-files magit-section-cache-visibility] 17 (#$ . 46044)]) | |
| 175 | (provide 'magit-status) | |
