;ELC ;;; Compiled ;;; in Emacs version 26.3 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\302\303\304\305\306DD\307\310\311\312\313\314\315& \210\316\317\320\321\312\322%\210\316\323\324\325\312\322%\210\316\326\327\330\312\322%\207" [require magit custom-declare-variable magit-bisect-show-graph funcall function #[0 "\300\207" [t] 1] "Whether to use `--graph' in the log showing commits yet to be bisected." :package-version (magit . "2.8.0") :group magit-status :type boolean custom-declare-face magit-bisect-good ((t :foreground "DarkOliveGreen")) "Face for good bisect revisions." magit-faces magit-bisect-skip ((t :foreground "DarkGoldenrod")) "Face for skipped bisect revisions." magit-bisect-bad ((t :foreground "IndianRed4")) "Face for bad bisect revisions."] 10) (defalias 'magit-bisect #[0 "\300\301!\207" [transient-setup magit-bisect] 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-bisect interactive-only t function-documentation "Narrow in on the commit that introduced a bug." transient--prefix transient-prefix :command :man-page "git-bisect" transient--layout ([1 transient-column (:description "Actions" :if-not magit-bisect-in-progress-p) ((1 transient-suffix (:key "B" :description "Start" :command magit-bisect-start)) (1 transient-suffix (:key "s" :description "Start script" :command magit-bisect-run)))] [1 transient-column (:description "Actions" :if magit-bisect-in-progress-p) ((1 transient-suffix (:key "B" :description "Bad" :command magit-bisect-bad)) (1 transient-suffix (:key "g" :description "Good" :command magit-bisect-good)) (1 transient-suffix (:key "k" :description "Skip" :command magit-bisect-skip)) (1 transient-suffix (:key "r" :description "Reset" :command magit-bisect-reset)) (1 transient-suffix (:key "s" :description "Run script" :command magit-bisect-run)))])] 8) #@316 Start a bisect session. Bisecting a bug means to find the commit that introduced it. This command starts such a bisect session by asking for a know good and a bad commit. To move the session forward use the other actions from the bisect transient command (\\[magit-bisect]). (fn BAD GOOD) (defalias 'magit-bisect-start #[514 "\300\"\204 \301\302#\210\303 \203\301\304!\210\305\306D\307#\207" [magit-rev-ancestor-p user-error "The good revision (%s) has to be an ancestor of the bad one (%s)" magit-anything-modified-p "Cannot bisect with uncommitted changes" magit-git-bisect "start" t] 6 (#$ . 2249) (byte-code "\300 \203 \301\302!\207\303 \207" [magit-bisect-in-progress-p user-error "Already bisecting" magit-bisect-start-read-args] 2)]) (defalias 'magit-bisect-start-read-args #[0 "\300\301!\211\302\303\"D\207" [magit-read-branch-or-commit "Start bisect with bad revision" magit-read-other-branch-or-commit "Good revision"] 5]) #@73 After bisecting, cleanup bisection state and return to original `HEAD'. (defalias 'magit-bisect-reset #[0 "\300\301!\210\302\303\304\"\210\3051\306\307\310!!0\207\210\311\207" [magit-confirm reset-bisect magit-run-git "bisect" "reset" (error) delete-file magit-git-dir "BISECT_CMD_OUTPUT" nil] 3 (#$ . 3225) nil]) #@138 While bisecting, mark the current commit as good. Use this after you have asserted that the commit does not contain the bug in question. (defalias 'magit-bisect-good #[0 "\300\301!\207" [magit-git-bisect "good"] 2 (#$ . 3548) nil]) #@133 While bisecting, mark the current commit as bad. Use this after you have asserted that the commit does contain the bug in question. (defalias 'magit-bisect-bad #[0 "\300\301!\207" [magit-git-bisect "bad"] 2 (#$ . 3787) nil]) #@164 While bisecting, skip the current commit. Use this if for some reason the current commit is not a good one to test. This command lets Git choose a different one. (defalias 'magit-bisect-skip #[0 "\300\301!\207" [magit-git-bisect "skip"] 2 (#$ . 4019) nil]) #@228 Bisect automatically by running commands after each step. Unlike `git bisect run' this can be used before bisecting has begun. In that case it behaves like `git bisect start; git bisect run'. (fn CMDLINE &optional BAD GOOD) (defalias 'magit-bisect-run #[769 "\203 \211\203 \302\"\210\303\304 E\"\207" [shell-file-name shell-command-switch magit-bisect-start magit-git-bisect "run"] 8 (#$ . 4284) (byte-code "\300 ?\205\301 \302\303!B\207" [magit-bisect-in-progress-p magit-bisect-start-read-args read-shell-command "Bisect shell command: "] 3)]) #@44 (fn SUBCOMMAND &optional ARGS NO-ASSERT) (defalias 'magit-git-bisect #[769 "\211\204 \302 \204 \303\304!\210\305\306!\210\307 \211\203#\211\310\311#\210)\202&\312 \210\210\313 \314\"\207" [default-directory magit-this-process magit-bisect-in-progress-p user-error "Not bisecting" message "Bisecting..." magit-toplevel magit-run-git-async "bisect" magit--not-inside-repository-error set-process-sentinel #[514 "\300!\301>\205{\302!\303V\203\304\"\210\202x\305\306\307#\210\304\"\210\310\311!!\203ur\311!q\210\312`\313\"\211\205C\314\315\316\"\315\317\"\"\211\203r\320\321!\322\323\324!!\325\303\326\327\330!\331\"\332$\216r\211q\210c\210)r\211q\210\333\334\211\334\303%\210*\266\266)\335 \210\336\337!\207" [process-status (exit signal) process-exit-status 0 magit-process-sentinel process-put inhibit-refresh t buffer-live-p process-buffer get-text-property magit-section buffer-substring-no-properties eieio-oref content end magit-git-dir "BISECT_CMD_OUTPUT" get-buffer-create generate-new-buffer-name " *temp file*" make-byte-code "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 write-region nil magit-refresh message "Bisecting...done"] 12 "\n\n(fn PROCESS EVENT)"]] 8 (#$ . 4850)]) (defalias 'magit-bisect-in-progress-p #[0 "\300\301\302!!\207" [file-exists-p magit-git-dir "BISECT_LOG"] 3]) #@64 While bisecting, insert section with output from `git bisect'. (defalias 'magit-insert-bisect-output #[0 "\306 \205\332\307\310\311!!\206\312\313\314\315F\316\317@\"\203$\211A\262\242\206X\320\321\322\203S\203S@\203<\320\262\202G\317\"\203G\211\262\210\211T\262A\262\202(\266\211\262\211\203`\323\202a\324\325!\203k\211\202s\211\236A\206s\326\327\325!\203\212\330\"@\206\213\331\332\300#\202\213\333\205\225\334\335\"\336\337 \340 &\341\342\343\344\"\211\203\255\211\345=\202\337\n\205\270\346\347!\n\"\211\203\303\350\342\"\202\335\351 \"\211\205\333\352!\203\330\211!\262\211\345=\262\262\262#\210\211\n\206\361 ?\205\361\f\3532\324\354\355\206\211A\262\242\356\357#!\210\211\203\211@\211\360\261\210A\266\202\202 \210\361\362!\210\363!\210\364\350\365\"\321\"\210\341\366\337 #\367\370\"\371\372\373\350\374\"\"!\371\372\375\350\374\"\"!\203UJ\206h\376!\203`J\206h\376!\205h\211J\212\350\365\"b\210`W\203\245\377`\326\"\206~\201A`\326\"\204\236\201B`\326\n$\210\203\236\201B`\370$\210\211b\266\202p)\266\211\f=\203\272\320@\201C!)\202\323\341\350\201D\"\201E\350\211\201D\"\201E\"C\244#0\210+\266\360c\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-bisect-in-progress-p magit-file-lines magit-git-dir "BISECT_CMD_OUTPUT" "Bisecting: (no saved bisect output)" "It appears you have invoked `git bisect' from a shell." "There is nothing wrong with that, we just cannot display" "anything useful here. Consult the shell output instead." "^\\([a-z0-9]\\{40\\}\\) is the first bad commit$" string-match nil t 0 commit bisect-output class-p magit-section :type rassq error "BUG: No entry for %s in %s" :value match-string 1 :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 propertize font-lock-face magit-section-heading "\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 magit-section-cache-visibility get-text-property put-text-property magit-section-show parent children] 16 (#$ . 6210)]) #@63 While bisecting, insert section visualizing the bisect state. (defalias 'magit-insert-bisect-rest #[0 "\306 \205W\307\310!\203\211\202\211\236A\206\311\312\310!\203/\313\"@\2060\314\315\300#\2020\316\317\320\321 \322 &\323\324\325\326\"\211\203J\211\327=\202|\n\205U\330\331!\n\"\211\203`\332\324\"\202z\333 \"\211\205x\334!\203u\211!\262\211\327=\262\262\262#\210\211\n\206\216 ?\205\216\f\3352S\336\337!\210\340\341\342\343\"\344\345\346\347\350\351@\205\252\352&\210\353\354!\210\355!\210\356\332\357\"\360\"\210\323\361\321 #\362\363\"\364\365\366\332\367\"\"!\364\365\370\332\367\"\"!\203\344J\206\367\371!\203\357J\206\367\371!\205\367\211J\212\332\357\"b\210`W\203.\372`\311\"\206 \373`\311\"\204'\374`\311\n$\210\203'\374`\363$\210\211b\266\202\377)\266\211\f=\203A\317A\375!)\202R\323\332\376\"\377\332\211\376\"\377\"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-bisect-in-progress-p bisect-view 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-insert-heading "Bisect Rest:" magit-git-wash apply-partially magit-log-wash-log bisect-vis "bisect" "visualize" "git" "log" "--format=%h%x00%D%x00%s" "--decorate=full" "--graph" 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-bisect-show-graph magit-section-cache-visibility] 13 (#$ . 8752)]) #@58 While bisecting, insert section logging bisect progress. (defalias 'magit-insert-bisect-log #[0 "\306 \205L\307\310!\203\211\202\211\236A\206\311\312\310!\203/\313\"@\2060\314\315\300#\2020\316\317\320\321 \322 &\323\324\325\326\"\211\203J\211\327=\202|\n\205U\330\331!\n\"\211\203`\332\324\"\202z\333 \"\211\205x\334!\203u\211!\262\211\327=\262\262\262#\210\211\n\206\216 ?\205\216\f\3352H\336\337!\210\340\341\342\343#\210\344c\210\345\346!\210\347!\210\350\332\351\"\352\"\210\323\353\321 #\354\355\"\356\357\360\332\361\"\"!\356\357\362\332\361\"\"!\203\331J\206\354\363!\203\344J\206\354\363!\205\354\211J\212\332\351\"b\210`W\203#\364`\311\"\206\365`\311\"\204\366`\311\n$\210\203\366`\355$\210\211b\266\202\364)\266\211\f=\2036\317:\367!)\202G\323\332\370\"\371\332\211\370\"\371\"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-bisect-in-progress-p bisect-log 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-insert-heading "Bisect Log:" magit-git-wash magit-wash-bisect-log "bisect" "log" 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 magit-section-cache-visibility] 13 (#$ . 10764)]) #@13 (fn ARGS) (defalias 'magit-wash-bisect-log #[257 "\306\307 \262\310\311\306\312#\203{\306\313\314\"\315 \210\214`}\210eb\210\316\317!\203(\211\2020\211\236A\2060\320\321\317!\203G\322\"@\206H\323\324\300#\202H\325\326\307 \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\312\262\262\262#\210\211\n\206\252 ?\205\252\f\3422q\343\344\345#c\210\346 \210\347\350\351\352\353 #!\210\354c\210\355\356!\210\357!\210\360\337\361\"\312\"\210\330\362\307 #\363\364\"\365\366\367\337\370\"\"!\365\366\371\337\370\"\"!\203\376J\206\372!\203 J\206\372!\205\211J\212\337\361\"b\210`W\203H\373`\320\"\206'\374`\320\"\204A\375`\320\n$\210\203A\375`\364$\210\211b\266\202)\266\211\f=\203[\306@\376!)\202p\330\337\377\"\201A\337\211\377\"\201A\"C\244#0\210+\266)\266\202\310\201B\306\312#\205\326\306\313\314\"\315 \210\316\317!\203\230\211\202\240\211\236A\206\240\320\321\317!\203\267\322\"@\206\270\323\324\300#\202\270\325\306\326\307 \327 &\330\331\332\333\"\211\203\322\211\334=\202\n\205\335\335\336!\n\"\211\203\350\337\331\"\202\340 \"\211\205\341!\203\375\211!\262\211\334=\262\262\262#\210\211\n\206 ?\205\f\3422\316\201C\261\210\355\356!\210\357!\210\360\337\361\"\312\"\210\330\362\307 #\363\364\"\365\366\367\337\370\"\"!\365\366\371\337\370\"\"!\203[J\206n\372!\203fJ\206n\372!\205n\211J\212\337\361\"b\210`W\203\245\373`\320\"\206\204\374`\320\"\204\236\375`\320\n$\210\203\236\375`\364$\210\211b\266\202v)\266\211\f=\203\270\306@\376!)\202\315\330\337\377\"\201A\337\211\377\"\201A\"C\244#0\210+\262\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 nil point-marker re-search-forward "^\\(git bisect [^\n]+\n\\)" t match-string 1 magit-delete-match bisect-item class-p magit-section :type rassq error "BUG: No entry for %s in %s" :value :start :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 font-lock-face magit-section-secondary-heading magit-insert-heading magit-wash-sequence apply-partially magit-log-wash-rev bisect-log magit-abbrev-length 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 magit-section-cache-visibility children "# first bad commit: \\[\\([a-z0-9]\\{40\\}\\)\\] [^\n]+\n" " is the first bad commit\n"] 17 (#$ . 12619)]) (provide 'magit-bisect)