mirror of https://github.com/Chizi123/.emacs.d.git
view | history | commit | commitdiff
Chizi123
2018-11-17 c4001ccd1864293b64aa37d83a9d9457eb875e70
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 (require 'magit)
16 #@55 Popup console for notes commands.
17
18 (fn &optional ARG)
19 (defalias 'magit-notes-popup #[256 "\300\301\302#\207" [magit-invoke-popup magit-notes-popup nil] 5 (#$ . 425) "P"])
20 (defvar magit-notes-popup (list :variable 'magit-notes-arguments :man-page "git-notes" :variables '("Configure local settings" (99 "core.notesRef" magit-set-core\.notesRef magit-format-core\.notesRef) (100 "notes.displayRef" magit-set-notes\.displayRef magit-format-notes\.displayRef) "Configure global settings" (67 "core.notesRef" magit-set-global-core\.notesRef magit-format-global-core\.notesRef) (68 "notes.displayRef" magit-set-global-notes\.displayRef magit-format-global-notes\.displayRef)) :switches '("Switch for prune" (110 "Dry run" "--dry-run")) :options '("Option for edit and remove" (114 "Manipulate ref" "--ref=" magit-notes-popup-read-ref) "Option for merge" (115 "Merge strategy" "--strategy=")) :actions '((84 "Edit" magit-notes-edit) (114 "Remove" magit-notes-remove) (109 "Merge" magit-notes-merge) (112 "Prune" magit-notes-prune)) :sequence-actions '((99 "Commit merge" magit-notes-merge-commit) (97 "Abort merge" magit-notes-merge-abort)) :sequence-predicate 'magit-notes-merging-p :default-action 'magit-notes-edit))
21 (byte-code "\300\301!\210\302\303\304\305\306DD\307\310\311\312\313&\207" [magit-define-popup-keys-deferred magit-notes-popup custom-declare-variable magit-notes-arguments funcall function #[0 "\301\302\"\207" [magit-notes-popup plist-get :default-arguments] 3] "" :group magit-git-arguments :type (repeat (string :tag "Argument"))] 8)
22 (defalias 'magit-notes-arguments #[0 "\303=\203    \207\n\207" [magit-current-popup magit-current-popup-args magit-notes-arguments magit-notes-popup] 2])
23 (put 'magit-notes-arguments 'definition-name 'magit-notes-popup)
24 (defalias 'magit-notes-merging-p #[0 "\300\301!\302!\205\303\304\305#\207" [magit-git-dir "NOTES_MERGE_WORKTREE" file-directory-p directory-files nil "^[^.]"] 5])
25 (defalias 'magit-format-core\.notesRef #[0 "\300\301\302\"\207" [magit--format-popup-variable:value "core.notesRef" 22] 3])
26 (defalias 'magit-format-notes\.displayRef #[0 "\300\301\302\"\207" [magit--format-popup-variable:values "notes.displayRef" 22] 3])
27 (defalias 'magit-format-global-core\.notesRef #[0 "\300\301\302\303#\207" [magit--format-popup-variable:value "core.notesRef" 22 t] 4])
28 (defalias 'magit-format-global-notes\.displayRef #[0 "\300\301\302\303#\207" [magit--format-popup-variable:values "notes.displayRef" 22 t] 4])
29 #@243 Edit the note attached to COMMIT.
30 REF is the notes ref used to store the notes.
31
32 Interactively or when optional REF is nil use the value of Git
33 variable `core.notesRef' or "refs/notes/commits" if that is
34 undefined.
35
36 (fn COMMIT &optional REF)
37 (defalias 'magit-notes-edit #[513 "\300\301\205    \302P\303$\207" [magit-run-git-with-editor "notes" "--ref=" "edit"] 7 (#$ . 2904) (magit-notes-read-args "Edit notes")])
38 #@252 Remove the note attached to COMMIT.
39 REF is the notes ref from which the note is removed.
40
41 Interactively or when optional REF is nil use the value of Git
42 variable `core.notesRef' or "refs/notes/commits" if that is
43 undefined.
44
45 (fn COMMIT &optional REF)
46 (defalias 'magit-notes-remove #[513 "\300\301\205    \302P\303$\207" [magit-run-git-with-editor "notes" "--ref=" "remove"] 7 (#$ . 3326) (magit-notes-read-args "Remove notes")])
47 #@383 Merge the notes ref REF into the current notes ref.
48
49 The current notes ref is the value of Git variable
50 `core.notesRef' or "refs/notes/commits" if that is undefined.
51
52 When there are conflicts, then they have to be resolved in the
53 temporary worktree ".git/NOTES_MERGE_WORKTREE".  When
54 done use `magit-notes-merge-commit' to finish.  To abort
55 use `magit-notes-merge-abort'.
56
57 (fn REF)
58 (defalias 'magit-notes-merge #[257 "\300\301\302#\207" [magit-run-git-with-editor "notes" "merge"] 5 (#$ . 3763) (byte-code "\300\301!C\207" [magit-read-string-ns "Merge reference"] 2)])
59 #@67 Commit the current notes ref merge.
60 Also see `magit-notes-merge'.
61 (defalias 'magit-notes-merge-commit #[0 "\300\301\302\303#\207" [magit-run-git-with-editor "notes" "merge" "--commit"] 4 (#$ . 4339) nil])
62 #@66 Abort the current notes ref merge.
63 Also see `magit-notes-merge'.
64 (defalias 'magit-notes-merge-abort #[0 "\300\301\302\303#\207" [magit-run-git-with-editor "notes" "merge" "--abort"] 4 (#$ . 4550) nil])
65 #@65 Remove notes about unreachable commits.
66
67 (fn &optional DRY-RUN)
68 (defalias 'magit-notes-prune #[256 "\211\203\300 \210\301\302\303\205\304#\207" [magit-process-buffer magit-run-git-with-editor "notes" "prune" "--dry-run"] 5 (#$ . 4758) (byte-code "\300\301 \235\205\302C\207" ["--dry-run" magit-notes-arguments t] 2)])
69 #@58 Set the local value of `core.notesRef' to REF.
70
71 (fn REF)
72 (defalias 'magit-set-core\.notesRef #[257 "\302\303\"\210\206\n    \211\203r\211q\210\304 )\202\304 \207" [magit-current-pre-popup-buffer magit-pre-popup-buffer magit-set "core.notesRef" magit-refresh] 4 (#$ . 5089) (byte-code "\300\301!C\207" [magit-notes-read-ref "Set local core.notesRef"] 2)])
73 #@59 Set the global value of `core.notesRef' to REF.
74
75 (fn REF)
76 (defalias 'magit-set-global-core\.notesRef #[257 "\302\303\304#\210\206     \211\203r\211q\210\305 )\202\305 \207" [magit-current-pre-popup-buffer magit-pre-popup-buffer magit-set "--global" "core.notesRef" magit-refresh] 5 (#$ . 5454) (byte-code "\300\301!C\207" [magit-notes-read-ref "Set global core.notesRef"] 2)])
77 #@64 Set the local values of `notes.displayRef' to REFS.
78
79 (fn REFS)
80 (defalias 'magit-set-notes\.displayRef #[257 "\302\303\"\210\206\n    \211\203r\211q\210\304 )\202\304 \207" [magit-current-pre-popup-buffer magit-pre-popup-buffer magit-set-all "notes.displayRef" magit-refresh] 4 (#$ . 5841) (byte-code "\300\301!C\207" [magit-notes-read-refs "Set local notes.displayRef"] 2)])
81 #@65 Set the global values of `notes.displayRef' to REFS.
82
83 (fn REFS)
84 (defalias 'magit-set-global-notes\.displayRef #[257 "\302\303\304#\210\206     \211\203r\211q\210\305 )\202\305 \207" [magit-current-pre-popup-buffer magit-pre-popup-buffer magit-set-all "--global" "notes.displayRef" magit-refresh] 5 (#$ . 6226) (byte-code "\300\301!C\207" [magit-notes-read-refs "Set global notes.displayRef"] 2)])
85 #@15 
86
87 (fn PROMPT)
88 (defalias 'magit-notes-read-ref #[257 "\300\301 \302\211\303\304!\211\205\305\306\"\203\211\307\302O\202\211\262%\211\2051\305\310\"\203.\211\2021\306P\207" [magit-completing-read magit-list-notes-refnames nil magit-get "core.notesRef" string-prefix-p "refs/notes/" 11 "refs/"] 10 (#$ . 6633)])
89 #@15 
90
91 (fn PROMPT)
92 (defalias 'magit-notes-read-refs #[257 "\300\301\302\303P\304 \305\211\306\307\310\311!\312#%\"\207" [mapcar #[257 "\300\301\"\203\207\302P\207" [string-prefix-p "refs/" "refs/notes/"] 4 "\n\n(fn REF)"] completing-read-multiple ": " magit-list-notes-refnames nil mapconcat #[257 "\300\301\"\203\f\211\302\303O\207\207" [string-prefix-p "refs/notes/" 11 nil] 4 "\n\n(fn REF)"] magit-get-all "notes.displayRef" ","] 12 (#$ . 6962)])
93 #@15 
94
95 (fn PROMPT)
96 (defalias 'magit-notes-read-args #[257 "\300\301 \"\302\303 \304\305\2034\2034@\203\302\262\202(\306\307\"\203(\211\262\210\211T\262A\262\202\n\266\211\262\211\205A\310\311\"\262D\207" [magit-read-branch-or-commit magit-stash-at-point nil magit-notes-arguments t 0 string-match "^--ref=\\(.+\\)" match-string 1] 10 (#$ . 7420)])
97 (provide 'magit-notes)