;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; 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\300\301\313\314#\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--layout ([1 transient-column (:description "Gitignore") ((1 transient-suffix (:key "t" :description "shared at toplevel (.gitignore)" :command magit-gitignore-in-topdir)) (1 transient-suffix (:key "s" :description "shared in subdirectory (path/to/.gitignore)" :command magit-gitignore-in-subdir)) (1 transient-suffix (:key "p" :description "privately (.git/info/exclude)" :command magit-gitignore-in-gitdir)) (1 transient-suffix (:key "g" :command magit-gitignore-on-system :if (lambda nil (magit-get "core.excludesfile")) :description (lambda nil (format "privately for all repositories (%s)" (magit-get "core.excludesfile"))))))] [1 transient-column (:description "Skip worktree") ((7 transient-suffix (:key "w" :description "do skip worktree" :command magit-skip-worktree)) (7 transient-suffix (:key "W" :description "do not skip worktree" :command magit-no-skip-worktree)))] [1 transient-column (:description "Assume unchanged") ((7 transient-suffix (:key "u" :description "do assume unchanged" :command magit-assume-unchanged)) (7 transient-suffix (:key "U" :description "do not assume unchanged" :command magit-no-assume-unchanged)))])] 8) #@172 Add the Git ignore RULE to the top-level ".gitignore" file. Since this file is tracked, it is shared with other clones of the repository. Also stage the file. (fn RULE) (defalias 'magit-gitignore-in-topdir #[257 "\301 \211\203\211\302\303\"\210\304\305\303\")\207\306 \207" [default-directory magit-toplevel magit--gitignore ".gitignore" magit-run-git "add" magit--not-inside-repository-error] 5 (#$ . 1642) (byte-code "\300 C\207" [magit-gitignore-read-pattern] 1)]) #@281 Add the Git ignore RULE to a ".gitignore" file in DIRECTORY. Prompt the user for a directory and add the rule to the ".gitignore" file in that directory. Since such files are tracked, they are shared with other clones of the repository. Also stage the file. (fn RULE DIRECTORY) (defalias 'magit-gitignore-in-subdir #[514 "\301 \211\203\211\302\303\"\304\"\210\305\306\307!\"\262)\207\310 \207" [default-directory magit-toplevel expand-file-name ".gitignore" magit--gitignore magit-run-git "add" magit-convert-filename-for-git magit--not-inside-repository-error] 8 (#$ . 2123) (byte-code "\300 \301\302!D\207" [magit-gitignore-read-pattern read-directory-name "Limit rule to files in: "] 3)]) #@126 Add the Git ignore RULE to "$GIT_DIR/info/exclude". Rules in that file only affects this clone of the repository. (fn RULE) (defalias 'magit-gitignore-in-gitdir #[257 "\300\301\302!\"\210\303 \207" [magit--gitignore magit-git-dir "info/exclude" magit-refresh] 5 (#$ . 2832) (byte-code "\300 C\207" [magit-gitignore-read-pattern] 1)]) #@149 Add the Git ignore RULE to the file specified by `core.excludesFile'. Rules that are defined in that file affect all local repositories. (fn RULE) (defalias 'magit-gitignore-on-system #[257 "\300\301\302!\206 \303\304!\"\210\305 \207" [magit--gitignore magit-get "core.excludesFile" error "Variable `core.excludesFile' isn't set" magit-refresh] 5 (#$ . 3175) (byte-code "\300 C\207" [magit-gitignore-read-pattern] 1)]) #@18 (fn RULE FILE) (defalias 'magit--gitignore #[514 "\300!\211\203\f\301\302\"\210\210\303\304\302\"r\211q\210\305\306\"\216\307!\203$\310!\210db\210n\204.\311c\210\312\313\314#c\210\311c\210\315\316\211#*\207" [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] 7 (#$ . 3603)]) (defalias 'magit-gitignore-read-pattern #[0 "\301 @\211\205\302!\205\211\303\304\305\306\307\310\311\312\"\313\314\315\316\317\320\321\322&\"\244\323\"\"\"!\203L\324P\262\235\204L\325\326!P\262\235\204L\312\262\327\330\312\211\211\211\n&\207" [magit-buffer-diff-files magit-current-file file-directory-p delete-dups apply append mapcar #[257 "\300P\301!\211\205\300\302!\303R\303PD\262B\207" ["/" file-name-extension file-name-directory "*."] 7 "\n\n(fn IT)"] sort magit-untracked-files nil -filter directory-name-p magit-list-files "--other" "--exclude-standard" "--directory" "--no-empty-directory" "--" string-lessp "/" "*." file-name-extension magit-completing-read "File or pattern to ignore"] 19]) #@61 Call "git update-index --skip-worktree -- FILE". (fn FILE) (defalias 'magit-skip-worktree #[257 "\301 \211\203\211\302\303\304\305$)\207\306 \207" [default-directory magit-toplevel magit-run-git "update-index" "--skip-worktree" "--" magit--not-inside-repository-error] 7 (#$ . 4838) (byte-code "\301\302\303 \211\203\211\304\305 \306 \")\202\307 \262\"C\207" [default-directory magit-read-file-choice "Skip worktree for" magit-toplevel cl-set-difference magit-list-files magit-skip-worktree-files magit--not-inside-repository-error] 6)]) #@64 Call "git update-index --no-skip-worktree -- FILE". (fn FILE) (defalias 'magit-no-skip-worktree #[257 "\301 \211\203\211\302\303\304\305$)\207\306 \207" [default-directory magit-toplevel magit-run-git "update-index" "--no-skip-worktree" "--" magit--not-inside-repository-error] 7 (#$ . 5393) (byte-code "\301\302\303 \211\203\211\304 )\202\305 \262\"C\207" [default-directory magit-read-file-choice "Do not skip worktree for" magit-toplevel magit-skip-worktree-files magit--not-inside-repository-error] 4)]) #@64 Call "git update-index --assume-unchanged -- FILE". (fn FILE) (defalias 'magit-assume-unchanged #[257 "\301 \211\203\211\302\303\304\305$)\207\306 \207" [default-directory magit-toplevel magit-run-git "update-index" "--assume-unchanged" "--" magit--not-inside-repository-error] 7 (#$ . 5918) (byte-code "\301\302\303 \211\203\211\304\305 \306 \")\202\307 \262\"C\207" [default-directory magit-read-file-choice "Assume file to be unchanged" magit-toplevel cl-set-difference magit-list-files magit-assume-unchanged-files magit--not-inside-repository-error] 6)]) #@67 Call "git update-index --no-assume-unchanged -- FILE". (fn FILE) (defalias 'magit-no-assume-unchanged #[257 "\301 \211\203\211\302\303\304\305$)\207\306 \207" [default-directory magit-toplevel magit-run-git "update-index" "--no-assume-unchanged" "--" magit--not-inside-repository-error] 7 (#$ . 6495) (byte-code "\301\302\303 \211\203\211\304 )\202\305 \262\"C\207" [default-directory magit-read-file-choice "Do not assume file to be unchanged" magit-toplevel magit-assume-unchanged-files magit--not-inside-repository-error] 4)]) (provide 'magit-gitignore)