;ELC ;;; Compiled ;;; in Emacs version 29.3 ;;; with all optimizations. (require 'magit) (defalias 'magit-gitignore #[0 "\300\301!\207" [transient-setup magit-gitignore] 2 nil nil]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312$#\210\313\301\314\315\316\317D\320\321\322\310\323\257\320\321\324\310\325\257\320\321\326\310\327\257\320\321\330\310\331\257F#\314\315\316\332D\320\333\334\321\335\316\336\310\337\257 \320\333\334\321\340\316\341\310\342\257 D#\314\315\316\343D\320\333\334\321\344\316\345\310\346\257 \320\333\334\321\347\316\350\310\351\257 D#E\"\207" [put magit-gitignore interactive-only t function-documentation "Instruct Git to ignore a file or pattern." transient--prefix transient-prefix :command :man-page "gitignore" transient--set-layout vector transient-column :description "Gitignore" transient-suffix :key "t" magit-gitignore-in-topdir "s" magit-gitignore-in-subdir "p" magit-gitignore-in-gitdir "g" magit-gitignore-on-system "Skip worktree" :level 7 "w" "do skip worktree" magit-skip-worktree "W" "do not skip worktree" magit-no-skip-worktree "Assume unchanged" "u" "do assume unchanged" magit-assume-unchanged "U" "do not assume unchanged" magit-no-assume-unchanged] 17)#@13 (fn RULE) (defalias 'magit-gitignore-in-topdir #[257 "\300\301\302\303 \"\304#\207" [magit--gitignore expand-file-name ".gitignore" magit-toplevel t] 6 (#$ . 1256) (byte-code "\300 C\207" [magit-gitignore-read-pattern] 1)]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312$#\207" [put magit-gitignore-in-topdir interactive-only t function-documentation "Add the Git ignore RULE to the top-level \".gitignore\" file.\nSince this file is tracked, it is shared with other clones of the\nrepository. Also stage the file." transient--suffix transient-suffix :command :description "shared at toplevel (.gitignore)"] 8)#@23 (fn RULE DIRECTORY) (defalias 'magit-gitignore-in-subdir #[514 "\300\301\302\"\303#\207" [magit--gitignore expand-file-name ".gitignore" t] 7 (#$ . 1916) (byte-code "\300\301\302\303 \211\205\304\300\305 \"!\262\"!\306!D\207" [expand-file-name read-directory-name "Limit rule to files in: " magit-current-file file-name-directory magit-toplevel magit-gitignore-read-pattern] 8)]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312$#\207" [put magit-gitignore-in-subdir interactive-only t function-documentation "Add the Git ignore RULE to a \".gitignore\" file in DIRECTORY.\nPrompt the user for a directory and add the rule to the\n\".gitignore\" file in that directory. Since such files are\ntracked, they are shared with other clones of the repository.\nAlso stage the file." transient--suffix transient-suffix :command :description "shared in subdirectory (path/to/.gitignore)"] 8)#@13 (fn RULE) (defalias 'magit-gitignore-in-gitdir #[257 "\300\301\302\303\304\305\"\"\"\207" [magit--gitignore expand-file-name "info/exclude" magit-gitdir nil t] 8 (#$ . 2854) (byte-code "\300 C\207" [magit-gitignore-read-pattern] 1)]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312$#\207" [put magit-gitignore-in-gitdir interactive-only t function-documentation "Add the Git ignore RULE to \"$GIT_DIR/info/exclude\".\nRules in that file only affects this clone of the repository. If the\nrepository has multiple worktrees, the rules apply to all worktrees." transient--suffix transient-suffix :command :description "privately (.git/info/exclude)"] 8)#@13 (fn RULE) (defalias 'magit-gitignore-on-system #[257 "\300\301\302!\211\262\203\303\"\207\304\305!\207" [nil magit-get "core.excludesFile" magit--gitignore error "Variable `core.excludesFile' isn't set"] 5 (#$ . 3553) (byte-code "\300 C\207" [magit-gitignore-read-pattern] 1)]) (byte-code "\300\301\302\303#\210\300\301\304\305#\210\300\301\306\307\310\301\311\312\313\314&#\207" [put magit-gitignore-on-system interactive-only t function-documentation "Add the Git ignore RULE to the file specified by `core.excludesFile'.\nRules that are defined in that file affect all local repositories." transient--suffix transient-suffix :command :inapt-if-not #[0 "\300\301!\207" [magit-get "core.excludesfile"] 2] :description #[0 "\300\301\302\303!\206 \304\"\207" [format "privately for all repositories (%s)" magit-get "core.excludesfile" "core.excludesfile is not set"] 4]] 10)#@34 (fn RULE FILE &optional STAGE) (defalias 'magit--gitignore #[770 "\301!\211\203\f\302\303\"\210\210\304\305\303\"r\211q\210\306\307\"\216\310!\203$\311!\210db\210n\204.\312c\210\313\314\315#c\210\312c\210\316\317\211#*\266\211\203P\320 \321\322\323!\")\207\324 \207" [default-directory file-name-directory make-directory t generate-new-buffer " *temp*" make-closure #[0 "\301\300!\205 \302\300!\207" [V0 buffer-name kill-buffer] 2] file-exists-p insert-file-contents "\n" replace-regexp-in-string "\\(\\\\*\\)" "\\1\\1" write-region nil magit--toplevel-safe magit-run-git "add" magit-convert-filename-for-git magit-refresh] 8 (#$ . 4441)])#@28 (fn &optional DIRECTORY) (defalias 'magit-gitignore-read-pattern #[256 "\300!\301 \211\2033\203\211\302\303 \"G\304O\262\305P\262\211\235\2043\306\307!P\262\211\235\2043\304\262\310\311\304\312\304\211&\207" [magit--gitignore-patterns magit-current-file file-relative-name magit-toplevel nil "/" "*." file-name-extension magit-completing-read "File or pattern to ignore" any] 11 (#$ . 5104)])#@28 (fn &optional DIRECTORY) (defalias 'magit--gitignore-patterns #[256 "\301 \206\211\302\303\"\304\303\"\303\211\2031\305\"G\306\307\310\"\"\262\306\307\311\"\"\262\210\211\203|\211@\312!\211\203t\313P\211\235\203M\202Q\211B\262\262\314!\211\203s\211\313Q\211\235\203k\202o\211B\262\262\210\210A\266\202\2022\210\315\306\316\244\244\"\244\317\")\207" [default-directory magit-toplevel magit-untracked-files nil magit--untracked-directories file-relative-name mapcar make-closure #[257 "\211\300\301O\207" [V0 nil] 4 "\n\n(fn %)"] #[257 "\211\300\301O\207" [V0 nil] 4 "\n\n(fn %)"] file-name-extension "*." file-name-directory sort #[257 "\300P\207" ["/"] 3 "\n\n(fn %)"] string<] 13 (#$ . 5524)])#@61 Call "git update-index --skip-worktree -- FILE". (fn FILE) (defalias 'magit-skip-worktree #[257 "\301 \302\303\304\305$)\207" [default-directory magit--toplevel-safe magit-run-git "update-index" "--skip-worktree" "--"] 6 (#$ . 6280) (byte-code "\300\301\302\303 \304 \305\306$\"C\207" [magit-read-file-choice "Skip worktree for" cl-set-difference magit-list-files magit-skip-worktree-files :test equal] 7)])#@64 Call "git update-index --no-skip-worktree -- FILE". (fn FILE) (defalias 'magit-no-skip-worktree #[257 "\301 \302\303\304\305$)\207" [default-directory magit--toplevel-safe magit-run-git "update-index" "--no-skip-worktree" "--"] 6 (#$ . 6696) (byte-code "\300\301\302 \"C\207" [magit-read-file-choice "Do not skip worktree for" magit-skip-worktree-files] 3)])#@64 Call "git update-index --assume-unchanged -- FILE". (fn FILE) (defalias 'magit-assume-unchanged #[257 "\301 \302\303\304\305$)\207" [default-directory magit--toplevel-safe magit-run-git "update-index" "--assume-unchanged" "--"] 6 (#$ . 7063) (byte-code "\300\301\302\303 \304 \305\306$\"C\207" [magit-read-file-choice "Assume file to be unchanged" cl-set-difference magit-list-files magit-assume-unchanged-files :test equal] 7)])#@67 Call "git update-index --no-assume-unchanged -- FILE". (fn FILE) (defalias 'magit-no-assume-unchanged #[257 "\301 \302\303\304\305$)\207" [default-directory magit--toplevel-safe magit-run-git "update-index" "--no-assume-unchanged" "--"] 6 (#$ . 7501) (byte-code "\300\301\302 \"C\207" [magit-read-file-choice "Do not assume file to be unchanged" magit-assume-unchanged-files] 3)]) (provide 'magit-gitignore)