magithub
magithub copied to clipboard
Published
20 hours ago •
vermiculus
vermiculus
let*: Wrong type argument: listp, 47
Hello,
In several repositories, I get the error as in the title of this ticket (with varying integers instead of 47) when doing a magit refresh (g) while certain branches are checked out. I couldn't find a commonality between the branches that cause this (but I didn't try very hard since I wasn't sure where to start).
Trace attached below.
Debugger entered--Lisp error: (wrong-type-argument listp 47)
alist-get(total_count 47)
(let* ((val (alist-get (quote total_count) checks))) (cond ((eq val 0) (let nil (format "%s %s" (magithub-ci--status-propertized checks) (or (alist-get (quote magithub-message) checks) (propertize "it seems checks have not yet begun" (quote face) (quote magit-dimmed)))))) ((eq val 1) (let nil (magithub-ci--status-propertized checks))) (t (let nil (let* ((overall-status (alist-get ... checks)) (status-spec (magithub-ci--status-spec overall-status)) (display (or ... overall-status)) (statuses (alist-get ... checks)) (passed (-filter ... statuses))) (propertize (format "%s (%d/%d)" display (length passed) (length statuses)) (quote face) (alist-get (quote face) status-spec)))))))
magithub-ci--status-header(47)
(format "%-10s%s %s %s%s" "Status:" (magithub-ci--status-header checks) (propertize "on ref" (quote face) (quote magit-dimmed)) (propertize ref (quote face) (quote magit-refname)) (propertize "..." (quote face) (quote magit-dimmed)))
(insert (format "%-10s%s %s %s%s" "Status:" (magithub-ci--status-header checks) (propertize "on ref" (quote face) (quote magit-dimmed)) (propertize ref (quote face) (quote magit-refname)) (propertize "..." (quote face) (quote magit-dimmed))))
(catch (quote cancel-section) (insert (format "%-10s%s %s %s%s" "Status:" (magithub-ci--status-header checks) (propertize "on ref" (quote face) (quote magit-dimmed)) (propertize ref (quote face) (quote magit-refname)) (propertize "..." (quote face) (quote magit-dimmed)))) (magit-insert-heading) (insert (propertize (format "%-10sas of %s\n" "" (let* ((time (and t ...))) (if time (magithub--format-time time) "???"))) (quote face) (quote magit-dimmed))) (let ((--dolist-tail-- (alist-get (quote statuses) checks))) (while --dolist-tail-- (let ((status (car --dolist-tail--))) (let* ((type310 (quote magithub-ci-status)) (section311 (funcall ... "" :type type310 :value ... :start ... :parent magit-insert-section--parent))) (eieio-oset section311 (quote hidden) (let (...) (if value ... ...))) (let ((magit-insert-section--current section311) (magit-insert-section--parent section311) (magit-insert-section--oldroot ...)) (catch (quote cancel-section) (insert indent ...) (magit-insert-heading) (run-hooks ...) (magit-insert-child-count section311) (set-marker-insertion-type ... t) (let* ... ...) (if ... ... ...)) section311)) (setq --dolist-tail-- (cdr --dolist-tail--))))) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section309) (set-marker-insertion-type (eieio-oref section309 (quote start)) t) (let* ((end (eieio-oset section309 (quote end) (point-marker))) (map (intern (format "magit-%s-section-map" (eieio-oref section309 (quote type))))) (map (and (boundp map) (symbol-value map)))) (save-excursion (goto-char (eieio-oref section309 (quote start))) (while (< (point) end) (let ((next (or ... end))) (if (get-text-property (point) (quote magit-section)) nil (put-text-property (point) next (quote magit-section) section309) (if map (progn ...))) (goto-char next))))) (if (eq section309 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section309)) (eieio-oset (eieio-oref section309 (quote parent)) (quote children) (nconc (eieio-oref (eieio-oref section309 (quote parent)) (quote children)) (list section309)))))
(let ((magit-insert-section--current section309) (magit-insert-section--parent section309) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil (prog1 magit-root-section (setq magit-root-section section309)))))) (catch (quote cancel-section) (insert (format "%-10s%s %s %s%s" "Status:" (magithub-ci--status-header checks) (propertize "on ref" (quote face) (quote magit-dimmed)) (propertize ref (quote face) (quote magit-refname)) (propertize "..." (quote face) (quote magit-dimmed)))) (magit-insert-heading) (insert (propertize (format "%-10sas of %s\n" "" (let* ((time ...)) (if time (magithub--format-time time) "???"))) (quote face) (quote magit-dimmed))) (let ((--dolist-tail-- (alist-get (quote statuses) checks))) (while --dolist-tail-- (let ((status (car --dolist-tail--))) (let* ((type310 ...) (section311 ...)) (eieio-oset section311 (quote hidden) (let ... ...)) (let (... ... ...) (catch ... ... ... ... ... ... ... ...) section311)) (setq --dolist-tail-- (cdr --dolist-tail--))))) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section309) (set-marker-insertion-type (eieio-oref section309 (quote start)) t) (let* ((end (eieio-oset section309 (quote end) (point-marker))) (map (intern (format "magit-%s-section-map" (eieio-oref section309 ...)))) (map (and (boundp map) (symbol-value map)))) (save-excursion (goto-char (eieio-oref section309 (quote start))) (while (< (point) end) (let ((next ...)) (if (get-text-property ... ...) nil (put-text-property ... next ... section309) (if map ...)) (goto-char next))))) (if (eq section309 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section309)) (eieio-oset (eieio-oref section309 (quote parent)) (quote children) (nconc (eieio-oref (eieio-oref section309 (quote parent)) (quote children)) (list section309))))) section309)
(let* ((type308 (quote magithub-ci-status)) (section309 (funcall (cond ((eq type308 (quote file)) (let nil (quote magit-file-section))) ((eq type308 (quote hunk)) (let nil (quote magit-hunk-section))) (t (let nil (quote magit-section)))) "" :type type308 :value (cons (quote magithub-ci-ref) ref) :start (point-marker) :parent magit-insert-section--parent))) (eieio-oset section309 (quote hidden) (let ((value (run-hook-with-args-until-success (quote magit-section-set-visibility-hook) section309))) (if value (eq value (quote hide)) (let ((incarnation (and magit-insert-section--oldroot ...))) (if incarnation (eieio-oref incarnation (quote hidden)) (let (...) (if value ... ...))))))) (let ((magit-insert-section--current section309) (magit-insert-section--parent section309) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil (prog1 magit-root-section (setq magit-root-section section309)))))) (catch (quote cancel-section) (insert (format "%-10s%s %s %s%s" "Status:" (magithub-ci--status-header checks) (propertize "on ref" (quote face) (quote magit-dimmed)) (propertize ref (quote face) (quote magit-refname)) (propertize "..." (quote face) (quote magit-dimmed)))) (magit-insert-heading) (insert (propertize (format "%-10sas of %s\n" "" (let* (...) (if time ... "???"))) (quote face) (quote magit-dimmed))) (let ((--dolist-tail-- (alist-get (quote statuses) checks))) (while --dolist-tail-- (let ((status ...)) (let* (... ...) (eieio-oset section311 ... ...) (let ... ... section311)) (setq --dolist-tail-- (cdr --dolist-tail--))))) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section309) (set-marker-insertion-type (eieio-oref section309 (quote start)) t) (let* ((end (eieio-oset section309 (quote end) (point-marker))) (map (intern (format "magit-%s-section-map" ...))) (map (and (boundp map) (symbol-value map)))) (save-excursion (goto-char (eieio-oref section309 (quote start))) (while (< (point) end) (let (...) (if ... nil ... ...) (goto-char next))))) (if (eq section309 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section309)) (eieio-oset (eieio-oref section309 (quote parent)) (quote children) (nconc (eieio-oref (eieio-oref section309 ...) (quote children)) (list section309))))) section309))
(progn (let* ((type308 (quote magithub-ci-status)) (section309 (funcall (cond ((eq type308 ...) (let nil ...)) ((eq type308 ...) (let nil ...)) (t (let nil ...))) "" :type type308 :value (cons (quote magithub-ci-ref) ref) :start (point-marker) :parent magit-insert-section--parent))) (eieio-oset section309 (quote hidden) (let ((value (run-hook-with-args-until-success (quote magit-section-set-visibility-hook) section309))) (if value (eq value (quote hide)) (let ((incarnation ...)) (if incarnation (eieio-oref incarnation ...) (let ... ...)))))) (let ((magit-insert-section--current section309) (magit-insert-section--parent section309) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil (prog1 magit-root-section ...))))) (catch (quote cancel-section) (insert (format "%-10s%s %s %s%s" "Status:" (magithub-ci--status-header checks) (propertize "on ref" (quote face) (quote magit-dimmed)) (propertize ref (quote face) (quote magit-refname)) (propertize "..." (quote face) (quote magit-dimmed)))) (magit-insert-heading) (insert (propertize (format "%-10sas of %s\n" "" (let* ... ...)) (quote face) (quote magit-dimmed))) (let ((--dolist-tail-- (alist-get ... checks))) (while --dolist-tail-- (let (...) (let* ... ... ...) (setq --dolist-tail-- ...)))) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section309) (set-marker-insertion-type (eieio-oref section309 (quote start)) t) (let* ((end (eieio-oset section309 ... ...)) (map (intern ...)) (map (and ... ...))) (save-excursion (goto-char (eieio-oref section309 ...)) (while (< ... end) (let ... ... ...)))) (if (eq section309 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section309)) (eieio-oset (eieio-oref section309 (quote parent)) (quote children) (nconc (eieio-oref ... ...) (list section309))))) section309)))
(if checks (progn (let* ((type308 (quote magithub-ci-status)) (section309 (funcall (cond (... ...) (... ...) (t ...)) "" :type type308 :value (cons (quote magithub-ci-ref) ref) :start (point-marker) :parent magit-insert-section--parent))) (eieio-oset section309 (quote hidden) (let ((value (run-hook-with-args-until-success ... section309))) (if value (eq value (quote hide)) (let (...) (if incarnation ... ...))))) (let ((magit-insert-section--current section309) (magit-insert-section--parent section309) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil ...)))) (catch (quote cancel-section) (insert (format "%-10s%s %s %s%s" "Status:" (magithub-ci--status-header checks) (propertize "on ref" ... ...) (propertize ref ... ...) (propertize "..." ... ...))) (magit-insert-heading) (insert (propertize (format "%-10sas of %s\n" "" ...) (quote face) (quote magit-dimmed))) (let ((--dolist-tail-- ...)) (while --dolist-tail-- (let ... ... ...))) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section309) (set-marker-insertion-type (eieio-oref section309 (quote start)) t) (let* ((end ...) (map ...) (map ...)) (save-excursion (goto-char ...) (while ... ...))) (if (eq section309 magit-root-section) (let (...) (magit-section-show section309)) (eieio-oset (eieio-oref section309 ...) (quote children) (nconc ... ...)))) section309))))
(let* ((ref (magithub-ci-status--get-default-ref)) (checks (magithub-ci-status ref)) (indent (make-string 10 32))) (if checks (progn (let* ((type308 (quote magithub-ci-status)) (section309 (funcall (cond ... ... ...) "" :type type308 :value (cons ... ref) :start (point-marker) :parent magit-insert-section--parent))) (eieio-oset section309 (quote hidden) (let ((value ...)) (if value (eq value ...) (let ... ...)))) (let ((magit-insert-section--current section309) (magit-insert-section--parent section309) (magit-insert-section--oldroot (or magit-insert-section--oldroot ...))) (catch (quote cancel-section) (insert (format "%-10s%s %s %s%s" "Status:" ... ... ... ...)) (magit-insert-heading) (insert (propertize ... ... ...)) (let (...) (while --dolist-tail-- ...)) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section309) (set-marker-insertion-type (eieio-oref section309 ...) t) (let* (... ... ...) (save-excursion ... ...)) (if (eq section309 magit-root-section) (let ... ...) (eieio-oset ... ... ...))) section309)))))
magithub-insert-ci-status-header()
(progn (magithub-insert-ci-status-header))
(if (and (magithub-settings-include-status-p) (magithub-usable-p) (let ((b (magit-get-current-branch))) (or (magit-get-upstream-remote b) (magit-get-push-remote b)))) (progn (magithub-insert-ci-status-header)))
magithub-maybe-insert-ci-status-header()
funcall(magithub-maybe-insert-ci-status-header)
mapc(funcall (magit-insert-upstream-branch-header magit-insert-push-branch-header magit-insert-tags-header magithub-maybe-report-offline-mode magithub-maybe-insert-ci-status-header))
(if (= (point) magit-insert-headers--beginning) (magit-cancel-section) (magit-insert-heading) (remove-hook (quote magit-insert-section-hook) (quote magit-insert-remaining-headers)) (mapc (function funcall) magit-insert-headers--hook) (insert "\n"))
magit-insert-remaining-headers()
run-hooks(magit-insert-section-hook)
(catch (quote cancel-section) (insert (format "%-10s" "Head: ")) (if magit-status-show-hashes-in-headers (progn (insert (propertize commit (quote face) (quote magit-hash)) 32))) (insert (propertize branch (quote face) (quote magit-branch-local))) (insert 32) (insert (funcall magit-log-format-message-function branch summary)) (insert 10) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section372) (set-marker-insertion-type (eieio-oref section372 (quote start)) t) (let* ((end (eieio-oset section372 (quote end) (point-marker))) (map (intern (format "magit-%s-section-map" (eieio-oref section372 (quote type))))) (map (and (boundp map) (symbol-value map)))) (save-excursion (goto-char (eieio-oref section372 (quote start))) (while (< (point) end) (let ((next (or ... end))) (if (get-text-property (point) (quote magit-section)) nil (put-text-property (point) next (quote magit-section) section372) (if map (progn ...))) (goto-char next))))) (if (eq section372 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section372)) (eieio-oset (eieio-oref section372 (quote parent)) (quote children) (nconc (eieio-oref (eieio-oref section372 (quote parent)) (quote children)) (list section372)))))
(let ((magit-insert-section--current section372) (magit-insert-section--parent section372) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil (prog1 magit-root-section (setq magit-root-section section372)))))) (catch (quote cancel-section) (insert (format "%-10s" "Head: ")) (if magit-status-show-hashes-in-headers (progn (insert (propertize commit (quote face) (quote magit-hash)) 32))) (insert (propertize branch (quote face) (quote magit-branch-local))) (insert 32) (insert (funcall magit-log-format-message-function branch summary)) (insert 10) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section372) (set-marker-insertion-type (eieio-oref section372 (quote start)) t) (let* ((end (eieio-oset section372 (quote end) (point-marker))) (map (intern (format "magit-%s-section-map" (eieio-oref section372 ...)))) (map (and (boundp map) (symbol-value map)))) (save-excursion (goto-char (eieio-oref section372 (quote start))) (while (< (point) end) (let ((next ...)) (if (get-text-property ... ...) nil (put-text-property ... next ... section372) (if map ...)) (goto-char next))))) (if (eq section372 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section372)) (eieio-oset (eieio-oref section372 (quote parent)) (quote children) (nconc (eieio-oref (eieio-oref section372 (quote parent)) (quote children)) (list section372))))) section372)
(let* ((type371 (quote branch)) (section372 (funcall (cond ((eq type371 (quote file)) (let nil (quote magit-file-section))) ((eq type371 (quote hunk)) (let nil (quote magit-hunk-section))) (t (let nil (quote magit-section)))) "" :type type371 :value branch :start (point-marker) :parent magit-insert-section--parent))) (eieio-oset section372 (quote hidden) (let ((value (run-hook-with-args-until-success (quote magit-section-set-visibility-hook) section372))) (if value (eq value (quote hide)) (let ((incarnation (and magit-insert-section--oldroot ...))) (if incarnation (eieio-oref incarnation (quote hidden)) (let (...) (if value ... nil))))))) (let ((magit-insert-section--current section372) (magit-insert-section--parent section372) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil (prog1 magit-root-section (setq magit-root-section section372)))))) (catch (quote cancel-section) (insert (format "%-10s" "Head: ")) (if magit-status-show-hashes-in-headers (progn (insert (propertize commit (quote face) (quote magit-hash)) 32))) (insert (propertize branch (quote face) (quote magit-branch-local))) (insert 32) (insert (funcall magit-log-format-message-function branch summary)) (insert 10) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section372) (set-marker-insertion-type (eieio-oref section372 (quote start)) t) (let* ((end (eieio-oset section372 (quote end) (point-marker))) (map (intern (format "magit-%s-section-map" ...))) (map (and (boundp map) (symbol-value map)))) (save-excursion (goto-char (eieio-oref section372 (quote start))) (while (< (point) end) (let (...) (if ... nil ... ...) (goto-char next))))) (if (eq section372 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section372)) (eieio-oset (eieio-oref section372 (quote parent)) (quote children) (nconc (eieio-oref (eieio-oref section372 ...) (quote children)) (list section372))))) section372))
(if branch (let* ((type371 (quote branch)) (section372 (funcall (cond ((eq type371 ...) (let nil ...)) ((eq type371 ...) (let nil ...)) (t (let nil ...))) "" :type type371 :value branch :start (point-marker) :parent magit-insert-section--parent))) (eieio-oset section372 (quote hidden) (let ((value (run-hook-with-args-until-success (quote magit-section-set-visibility-hook) section372))) (if value (eq value (quote hide)) (let ((incarnation ...)) (if incarnation (eieio-oref incarnation ...) (let ... ...)))))) (let ((magit-insert-section--current section372) (magit-insert-section--parent section372) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil (prog1 magit-root-section ...))))) (catch (quote cancel-section) (insert (format "%-10s" "Head: ")) (if magit-status-show-hashes-in-headers (progn (insert (propertize commit ... ...) 32))) (insert (propertize branch (quote face) (quote magit-branch-local))) (insert 32) (insert (funcall magit-log-format-message-function branch summary)) (insert 10) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section372) (set-marker-insertion-type (eieio-oref section372 (quote start)) t) (let* ((end (eieio-oset section372 ... ...)) (map (intern ...)) (map (and ... ...))) (save-excursion (goto-char (eieio-oref section372 ...)) (while (< ... end) (let ... ... ...)))) (if (eq section372 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section372)) (eieio-oset (eieio-oref section372 (quote parent)) (quote children) (nconc (eieio-oref ... ...) (list section372))))) section372)) (let* ((type373 (quote commit)) (section374 (funcall (cond ((eq type373 ...) (let nil ...)) ((eq type373 ...) (let nil ...)) (t (let nil ...))) "" :type type373 :value commit :start (point-marker) :parent magit-insert-section--parent))) (eieio-oset section374 (quote hidden) (let ((value (run-hook-with-args-until-success (quote magit-section-set-visibility-hook) section374))) (if value (eq value (quote hide)) (let ((incarnation ...)) (if incarnation (eieio-oref incarnation ...) (let ... ...)))))) (let ((magit-insert-section--current section374) (magit-insert-section--parent section374) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil (prog1 magit-root-section ...))))) (catch (quote cancel-section) (insert (format "%-10s" "Head: ")) (insert (propertize commit (quote face) (quote magit-hash))) (insert 32 summary 10) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section374) (set-marker-insertion-type (eieio-oref section374 (quote start)) t) (let* ((end (eieio-oset section374 ... ...)) (map (intern ...)) (map (and ... ...))) (save-excursion (goto-char (eieio-oref section374 ...)) (while (< ... end) (let ... ... ...)))) (if (eq section374 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section374)) (eieio-oset (eieio-oref section374 (quote parent)) (quote children) (nconc (eieio-oref ... ...) (list section374))))) section374)))
(let ((commit (match-string 1 string370)) (summary (match-string 2 string370))) (if branch (let* ((type371 (quote branch)) (section372 (funcall (cond (... ...) (... ...) (t ...)) "" :type type371 :value branch :start (point-marker) :parent magit-insert-section--parent))) (eieio-oset section372 (quote hidden) (let ((value (run-hook-with-args-until-success ... section372))) (if value (eq value (quote hide)) (let (...) (if incarnation ... ...))))) (let ((magit-insert-section--current section372) (magit-insert-section--parent section372) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil ...)))) (catch (quote cancel-section) (insert (format "%-10s" "Head: ")) (if magit-status-show-hashes-in-headers (progn (insert ... 32))) (insert (propertize branch (quote face) (quote magit-branch-local))) (insert 32) (insert (funcall magit-log-format-message-function branch summary)) (insert 10) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section372) (set-marker-insertion-type (eieio-oref section372 (quote start)) t) (let* ((end ...) (map ...) (map ...)) (save-excursion (goto-char ...) (while ... ...))) (if (eq section372 magit-root-section) (let (...) (magit-section-show section372)) (eieio-oset (eieio-oref section372 ...) (quote children) (nconc ... ...)))) section372)) (let* ((type373 (quote commit)) (section374 (funcall (cond (... ...) (... ...) (t ...)) "" :type type373 :value commit :start (point-marker) :parent magit-insert-section--parent))) (eieio-oset section374 (quote hidden) (let ((value (run-hook-with-args-until-success ... section374))) (if value (eq value (quote hide)) (let (...) (if incarnation ... ...))))) (let ((magit-insert-section--current section374) (magit-insert-section--parent section374) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil ...)))) (catch (quote cancel-section) (insert (format "%-10s" "Head: ")) (insert (propertize commit (quote face) (quote magit-hash))) (insert 32 summary 10) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section374) (set-marker-insertion-type (eieio-oref section374 (quote start)) t) (let* ((end ...) (map ...) (map ...)) (save-excursion (goto-char ...) (while ... ...))) (if (eq section374 magit-root-section) (let (...) (magit-section-show section374)) (eieio-oset (eieio-oref section374 ...) (quote children) (nconc ... ...)))) section374))))
(let ((string370 output)) (let ((commit (match-string 1 string370)) (summary (match-string 2 string370))) (if branch (let* ((type371 (quote branch)) (section372 (funcall (cond ... ... ...) "" :type type371 :value branch :start (point-marker) :parent magit-insert-section--parent))) (eieio-oset section372 (quote hidden) (let ((value ...)) (if value (eq value ...) (let ... ...)))) (let ((magit-insert-section--current section372) (magit-insert-section--parent section372) (magit-insert-section--oldroot (or magit-insert-section--oldroot ...))) (catch (quote cancel-section) (insert (format "%-10s" "Head: ")) (if magit-status-show-hashes-in-headers (progn ...)) (insert (propertize branch ... ...)) (insert 32) (insert (funcall magit-log-format-message-function branch summary)) (insert 10) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section372) (set-marker-insertion-type (eieio-oref section372 ...) t) (let* (... ... ...) (save-excursion ... ...)) (if (eq section372 magit-root-section) (let ... ...) (eieio-oset ... ... ...))) section372)) (let* ((type373 (quote commit)) (section374 (funcall (cond ... ... ...) "" :type type373 :value commit :start (point-marker) :parent magit-insert-section--parent))) (eieio-oset section374 (quote hidden) (let ((value ...)) (if value (eq value ...) (let ... ...)))) (let ((magit-insert-section--current section374) (magit-insert-section--parent section374) (magit-insert-section--oldroot (or magit-insert-section--oldroot ...))) (catch (quote cancel-section) (insert (format "%-10s" "Head: ")) (insert (propertize commit ... ...)) (insert 32 summary 10) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section374) (set-marker-insertion-type (eieio-oref section374 ...) t) (let* (... ... ...) (save-excursion ... ...)) (if (eq section374 magit-root-section) (let ... ...) (eieio-oset ... ... ...))) section374)))))
(let ((output (magit-rev-format "%h %s" (or branch "HEAD")))) (string-match "^\\([^ ]+\\) \\(.*\\)" output) (let ((string370 output)) (let ((commit (match-string 1 string370)) (summary (match-string 2 string370))) (if branch (let* ((type371 (quote branch)) (section372 (funcall ... "" :type type371 :value branch :start ... :parent magit-insert-section--parent))) (eieio-oset section372 (quote hidden) (let (...) (if value ... ...))) (let ((magit-insert-section--current section372) (magit-insert-section--parent section372) (magit-insert-section--oldroot ...)) (catch (quote cancel-section) (insert ...) (if magit-status-show-hashes-in-headers ...) (insert ...) (insert 32) (insert ...) (insert 10) (run-hooks ...) (magit-insert-child-count section372) (set-marker-insertion-type ... t) (let* ... ...) (if ... ... ...)) section372)) (let* ((type373 (quote commit)) (section374 (funcall ... "" :type type373 :value commit :start ... :parent magit-insert-section--parent))) (eieio-oset section374 (quote hidden) (let (...) (if value ... ...))) (let ((magit-insert-section--current section374) (magit-insert-section--parent section374) (magit-insert-section--oldroot ...)) (catch (quote cancel-section) (insert ...) (insert ...) (insert 32 summary 10) (run-hooks ...) (magit-insert-child-count section374) (set-marker-insertion-type ... t) (let* ... ...) (if ... ... ...)) section374))))))
(progn (if --cl-rest-- (signal (quote wrong-number-of-arguments) (list (quote magit-insert-head-branch-header) (+ 1 (length --cl-rest--))))) (let ((output (magit-rev-format "%h %s" (or branch "HEAD")))) (string-match "^\\([^ ]+\\) \\(.*\\)" output) (let ((string370 output)) (let ((commit (match-string 1 string370)) (summary (match-string 2 string370))) (if branch (let* ((type371 ...) (section372 ...)) (eieio-oset section372 (quote hidden) (let ... ...)) (let (... ... ...) (catch ... ... ... ... ... ... ... ... ... ... ... ...) section372)) (let* ((type373 ...) (section374 ...)) (eieio-oset section374 (quote hidden) (let ... ...)) (let (... ... ...) (catch ... ... ... ... ... ... ... ... ...) section374)))))))
(let* ((branch (if --cl-rest-- (car-safe (prog1 --cl-rest-- (setq --cl-rest-- (cdr --cl-rest--)))) (magit-get-current-branch)))) (progn (if --cl-rest-- (signal (quote wrong-number-of-arguments) (list (quote magit-insert-head-branch-header) (+ 1 (length --cl-rest--))))) (let ((output (magit-rev-format "%h %s" (or branch "HEAD")))) (string-match "^\\([^ ]+\\) \\(.*\\)" output) (let ((string370 output)) (let ((commit (match-string 1 string370)) (summary (match-string 2 string370))) (if branch (let* (... ...) (eieio-oset section372 ... ...) (let ... ... section372)) (let* (... ...) (eieio-oset section374 ... ...) (let ... ... section374))))))))
magit-insert-head-branch-header()
funcall(magit-insert-head-branch-header)
(while (and (setq wrapper (car-safe (prog1 magit-insert-headers--hook (setq magit-insert-headers--hook (cdr magit-insert-headers--hook))))) (= (point) magit-insert-headers--beginning)) (funcall wrapper))
(let ((magit-insert-section-hook (cons (quote magit-insert-remaining-headers) (if (listp magit-insert-section-hook) magit-insert-section-hook (list magit-insert-section-hook)))) (magit-insert-headers--hook hooks) wrapper) (setq magit-insert-headers--beginning (point)) (while (and (setq wrapper (car-safe (prog1 magit-insert-headers--hook (setq magit-insert-headers--hook (cdr magit-insert-headers--hook))))) (= (point) magit-insert-headers--beginning)) (funcall wrapper)))
magit-insert-headers((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 magithub-maybe-report-offline-mode magithub-maybe-insert-ci-status-header))
(if (magit-rev-verify "HEAD") (magit-insert-headers magit-status-headers-hook) (insert "In the beginning there was darkness\n\n"))
magit-insert-status-headers()
run-hooks(magit-status-sections-hook)
(if it (progn (message "`%s' contains entries that are no longer valid.\n%s\nUsing standard value instead. Please re-configure hook variable." hook (mapconcat (function (lambda (sym) (format " `%s'" sym))) it "\n")) (sit-for 5) (defvar magit--hook-standard-value nil) (let ((magit--hook-standard-value (eval (car (get hook ...))))) (run-hooks (quote magit---hook-standard-value)))) (run-hooks hook))
(let ((it (-remove (function functionp) (symbol-value hook)))) (if it (progn (message "`%s' contains entries that are no longer valid.\n%s\nUsing standard value instead. Please re-configure hook variable." hook (mapconcat (function (lambda (sym) (format " `%s'" sym))) it "\n")) (sit-for 5) (defvar magit--hook-standard-value nil) (let ((magit--hook-standard-value (eval (car ...)))) (run-hooks (quote magit---hook-standard-value)))) (run-hooks hook)))
magit-run-section-hook(magit-status-sections-hook)
(catch (quote cancel-section) (magit-run-section-hook (quote magit-status-sections-hook)) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section365) (set-marker-insertion-type (eieio-oref section365 (quote start)) t) (let* ((end (eieio-oset section365 (quote end) (point-marker))) (map (intern (format "magit-%s-section-map" (eieio-oref section365 (quote type))))) (map (and (boundp map) (symbol-value map)))) (save-excursion (goto-char (eieio-oref section365 (quote start))) (while (< (point) end) (let ((next (or ... end))) (if (get-text-property (point) (quote magit-section)) nil (put-text-property (point) next (quote magit-section) section365) (if map (progn ...))) (goto-char next))))) (if (eq section365 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section365)) (eieio-oset (eieio-oref section365 (quote parent)) (quote children) (nconc (eieio-oref (eieio-oref section365 (quote parent)) (quote children)) (list section365)))))
(let ((magit-insert-section--current section365) (magit-insert-section--parent section365) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil (prog1 magit-root-section (setq magit-root-section section365)))))) (catch (quote cancel-section) (magit-run-section-hook (quote magit-status-sections-hook)) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section365) (set-marker-insertion-type (eieio-oref section365 (quote start)) t) (let* ((end (eieio-oset section365 (quote end) (point-marker))) (map (intern (format "magit-%s-section-map" (eieio-oref section365 ...)))) (map (and (boundp map) (symbol-value map)))) (save-excursion (goto-char (eieio-oref section365 (quote start))) (while (< (point) end) (let ((next ...)) (if (get-text-property ... ...) nil (put-text-property ... next ... section365) (if map ...)) (goto-char next))))) (if (eq section365 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section365)) (eieio-oset (eieio-oref section365 (quote parent)) (quote children) (nconc (eieio-oref (eieio-oref section365 (quote parent)) (quote children)) (list section365))))) section365)
(let* ((type364 (quote status)) (section365 (funcall (cond ((eq type364 (quote file)) (let nil (quote magit-file-section))) ((eq type364 (quote hunk)) (let nil (quote magit-hunk-section))) (t (let nil (quote magit-section)))) "" :type type364 :value nil :start (point-marker) :parent magit-insert-section--parent))) (eieio-oset section365 (quote hidden) (let ((value (run-hook-with-args-until-success (quote magit-section-set-visibility-hook) section365))) (if value (eq value (quote hide)) (let ((incarnation (and magit-insert-section--oldroot ...))) (if incarnation (eieio-oref incarnation (quote hidden)) (let (...) (if value ... nil))))))) (let ((magit-insert-section--current section365) (magit-insert-section--parent section365) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil (prog1 magit-root-section (setq magit-root-section section365)))))) (catch (quote cancel-section) (magit-run-section-hook (quote magit-status-sections-hook)) (run-hooks (quote magit-insert-section-hook)) (magit-insert-child-count section365) (set-marker-insertion-type (eieio-oref section365 (quote start)) t) (let* ((end (eieio-oset section365 (quote end) (point-marker))) (map (intern (format "magit-%s-section-map" ...))) (map (and (boundp map) (symbol-value map)))) (save-excursion (goto-char (eieio-oref section365 (quote start))) (while (< (point) end) (let (...) (if ... nil ... ...) (goto-char next))))) (if (eq section365 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section365)) (eieio-oset (eieio-oref section365 (quote parent)) (quote children) (nconc (eieio-oref (eieio-oref section365 ...) (quote children)) (list section365))))) section365))
magit-status-refresh-buffer()
apply(magit-status-refresh-buffer nil)
(save-excursion (apply refresh magit-refresh-args))
(let ((inhibit-read-only t)) (erase-buffer) (save-excursion (apply refresh magit-refresh-args)))
(let* ((buffer (current-buffer)) (windows (apply (quote append) (mapcar (function (lambda (it) (let ... ...))) (or (get-buffer-window-list buffer nil t) (list (selected-window))))))) (deactivate-mark) (setq magit-section-highlight-overlays nil) (setq magit-section-highlighted-section nil) (setq magit-section-highlighted-sections nil) (setq magit-section-unhighlight-sections nil) (magit-process-unset-mode-line-error-status) (let ((inhibit-read-only t)) (erase-buffer) (save-excursion (apply refresh magit-refresh-args))) (let ((--dolist-tail-- windows)) (while --dolist-tail-- (let ((window (car --dolist-tail--))) (let ((save-selected-window--state (internal--before-with-selected-window ...))) (save-current-buffer (unwind-protect (progn ... ...) (internal--after-with-selected-window save-selected-window--state)))) (setq --dolist-tail-- (cdr --dolist-tail--))))) (run-hooks (quote magit-refresh-buffer-hook)) (magit-section-update-highlight) (set-buffer-modified-p nil))
(progn (if magit-refresh-verbose (progn (message "Refreshing buffer `%s'..." (buffer-name)))) (let* ((buffer (current-buffer)) (windows (apply (quote append) (mapcar (function (lambda ... ...)) (or (get-buffer-window-list buffer nil t) (list ...)))))) (deactivate-mark) (setq magit-section-highlight-overlays nil) (setq magit-section-highlighted-section nil) (setq magit-section-highlighted-sections nil) (setq magit-section-unhighlight-sections nil) (magit-process-unset-mode-line-error-status) (let ((inhibit-read-only t)) (erase-buffer) (save-excursion (apply refresh magit-refresh-args))) (let ((--dolist-tail-- windows)) (while --dolist-tail-- (let ((window (car --dolist-tail--))) (let ((save-selected-window--state ...)) (save-current-buffer (unwind-protect ... ...))) (setq --dolist-tail-- (cdr --dolist-tail--))))) (run-hooks (quote magit-refresh-buffer-hook)) (magit-section-update-highlight) (set-buffer-modified-p nil)) (if magit-refresh-verbose (progn (message "Refreshing buffer `%s'...done (%.3fs)" (buffer-name) (float-time (time-subtract (current-time) magit-refresh-start-time))))))
(if (functionp refresh) (progn (if magit-refresh-verbose (progn (message "Refreshing buffer `%s'..." (buffer-name)))) (let* ((buffer (current-buffer)) (windows (apply (quote append) (mapcar (function ...) (or ... ...))))) (deactivate-mark) (setq magit-section-highlight-overlays nil) (setq magit-section-highlighted-section nil) (setq magit-section-highlighted-sections nil) (setq magit-section-unhighlight-sections nil) (magit-process-unset-mode-line-error-status) (let ((inhibit-read-only t)) (erase-buffer) (save-excursion (apply refresh magit-refresh-args))) (let ((--dolist-tail-- windows)) (while --dolist-tail-- (let ((window ...)) (let (...) (save-current-buffer ...)) (setq --dolist-tail-- (cdr --dolist-tail--))))) (run-hooks (quote magit-refresh-buffer-hook)) (magit-section-update-highlight) (set-buffer-modified-p nil)) (if magit-refresh-verbose (progn (message "Refreshing buffer `%s'...done (%.3fs)" (buffer-name) (float-time (time-subtract (current-time) magit-refresh-start-time)))))))
(let ((refresh (intern (format "%s-refresh-buffer" (substring (symbol-name major-mode) 0 -5)))) (magit--refresh-cache (or magit--refresh-cache (list (cons 0 0))))) (if (functionp refresh) (progn (if magit-refresh-verbose (progn (message "Refreshing buffer `%s'..." (buffer-name)))) (let* ((buffer (current-buffer)) (windows (apply (quote append) (mapcar ... ...)))) (deactivate-mark) (setq magit-section-highlight-overlays nil) (setq magit-section-highlighted-section nil) (setq magit-section-highlighted-sections nil) (setq magit-section-unhighlight-sections nil) (magit-process-unset-mode-line-error-status) (let ((inhibit-read-only t)) (erase-buffer) (save-excursion (apply refresh magit-refresh-args))) (let ((--dolist-tail-- windows)) (while --dolist-tail-- (let (...) (let ... ...) (setq --dolist-tail-- ...)))) (run-hooks (quote magit-refresh-buffer-hook)) (magit-section-update-highlight) (set-buffer-modified-p nil)) (if magit-refresh-verbose (progn (message "Refreshing buffer `%s'...done (%.3fs)" (buffer-name) (float-time (time-subtract ... magit-refresh-start-time))))))))
magit-refresh-buffer()
(save-current-buffer (set-buffer buffer) (run-hooks (quote magit-mode-setup-hook)) (magit-refresh-buffer))
(let ((buffer (magit-mode-get-buffer mode t nil (and locked (magit-buffer-lock-value mode args)))) (section (magit-current-section))) (save-current-buffer (set-buffer buffer) (setq magit-previous-section section) (setq magit-refresh-args args) (funcall mode)) (magit-display-buffer buffer) (save-current-buffer (set-buffer buffer) (run-hooks (quote magit-mode-setup-hook)) (magit-refresh-buffer)))
magit-mode-setup-internal(magit-status-mode nil)
magit-mode-setup(magit-status-mode)
(let ((default-directory directory)) (magit-mode-setup (function magit-status-mode)))
magit-status-internal("/Users/user/projects/project/")
(if directory (let ((toplevel (magit-toplevel directory))) (setq directory (file-name-as-directory (expand-file-name directory))) (if (and toplevel (file-equal-p directory toplevel)) (magit-status-internal directory) (if (y-or-n-p (if toplevel (format "%s is a repository. Create another in %s? " toplevel directory) (format "Create repository in %s? " directory))) (progn (setq magit--refresh-cache nil) (magit-init directory))))) (magit-status-internal default-directory))
(let ((magit--refresh-cache (or cache (list (cons 0 0))))) (if directory (let ((toplevel (magit-toplevel directory))) (setq directory (file-name-as-directory (expand-file-name directory))) (if (and toplevel (file-equal-p directory toplevel)) (magit-status-internal directory) (if (y-or-n-p (if toplevel (format "%s is a repository. Create another in %s? " toplevel directory) (format "Create repository in %s? " directory))) (progn (setq magit--refresh-cache nil) (magit-init directory))))) (magit-status-internal default-directory)))
magit-status(nil ((62 . 14) (("/Users/user/projects/project/" magit-git-dir "rebase-apply/onto") . "/Users/user/projects/project/.git/rebase-apply/onto") (("/Users/user/projects/project/" magit-git-dir "rebase-merge") . "/Users/user/projects/project/.git/rebase-merge") (("/Users/user/projects/project/" "rev-parse" "--git-dir") . ".git") (("/Users/user/projects/project/" "describe" "--contains" "HEAD")) (("/Users/user/projects/project/" "describe" "--long" "--tags") . "tagname") (("/Users/user/projects/project/" "show" "--no-patch" "--format=%s" "origin/branch_name^{commit}" "--") . "Make default transformer the identity function.") (("/Users/user/projects/project/" "rev-parse" "--verify" "origin/branch_name") . "0000000000000000000000000000000000000000") (("/Users/user/projects/project/" "show" "--no-patch" "--format=%h %s" "branch_name^{commit}" "--") . "00000000 Merge remote-tracking branch 'origin/master' into branch_name") (("/Users/user/projects/project/" "symbolic-ref" "--short" "HEAD") . "branch_name") (("/Users/user/projects/project/" "rev-parse" "--verify" "HEAD") . "0000000000000000000000000000000000000000") ((config "/Users/user/projects/project/") . #s(hash-table size 65 test equal rehash-size 1.5 rehash-threshold 0.8 data ("credential.helper" ("osxkeychain") "user.name" ("My Name") "user.email" ("[email protected]") "github.user" ("username") "push.default" ("upstream") "core.editor" ("emacsclient -c") "core.whitespace" ("trailing-space") "core.excludesfile" ("~/.gitignore") "core.trustctime" ("false") "color.branch" ("auto") "color.diff" ("auto") "color.interactive" ("auto") "color.status" ("auto") "color.ui" ("true") "color.branch.current" ("yellow reverse") "color.branch.local" ("yellow") "color.branch.remote" ("green") "color.diff.meta" ("yellow bold") "color.diff.frag" ("magenta bold") "color.diff.old" ("red bold") "color.diff.new" ("green bold") "color.status.added" ("yellow") "color.status.changed" ("green") "color.status.untracked" ("cyan") "pull.rebase" ("true") "filter.lfs.clean" ("git-lfs clean -- %f") "filter.lfs.smudge" ("git-lfs smudge -- %f") "filter.lfs.process" ("git-lfs filter-process") "filter.lfs.required" ("true") "core.repositoryformatversion" ("0") "core.filemode" ("true") "core.bare" ("false") "core.logallrefupdates" ("true") "core.ignorecase" ("true") "core.precomposeunicode" ("true") "remote.origin.url" ("[email protected]:MyCompany/project-company.git") "remote.origin.fetch" ("+refs/heads/*:refs/remotes/origin/*") "branch.master.remote" ("origin") "branch.master.merge" ("refs/heads/master") "branch.whitelisting.remote" ("origin") "branch.whitelisting.merge" ("refs/heads/whitelisting") "branch.whitelisting.pushremote" ("origin") "branch.dont-renice.pushremote" ("origin") "branch.typos.pushremote" ("origin") "branch.server-refactor.pushremote" ("origin") "branch.update-docker-endpoint.pushremote" ("origin") "branch.correct_rearm.pushremote" ("origin") "branch.bump_dev_env.pushremote" ("origin") "branch.branch_name.pushremote" ("origin") "branch.modular-build.pushremote" ("origin") ...))) (("/Users/user/projects/project/" . magit-toplevel) . "/Users/user/projects/project/") (("/Users/user/projects/project/" "rev-parse" "--show-cdup") . "") (("/Users/user/projects/project/" "rev-parse" "--show-toplevel") . "/Users/user/projects/project")))
funcall-interactively(magit-status nil ((62 . 14) (("/Users/user/projects/project/" magit-git-dir "rebase-apply/onto") . "/Users/user/projects/project/.git/rebase-apply/onto") (("/Users/user/projects/project/" magit-git-dir "rebase-merge") . "/Users/user/projects/project/.git/rebase-merge") (("/Users/user/projects/project/" "rev-parse" "--git-dir") . ".git") (("/Users/user/projects/project/" "describe" "--contains" "HEAD")) (("/Users/user/projects/project/" "describe" "--long" "--tags") . "tagname") (("/Users/user/projects/project/" "show" "--no-patch" "--format=%s" "origin/branch_name^{commit}" "--") . "Make default transformer the identity function.") (("/Users/user/projects/project/" "rev-parse" "--verify" "origin/branch_name") . "0000000000000000000000000000000000000000") (("/Users/user/projects/project/" "show" "--no-patch" "--format=%h %s" "branch_name^{commit}" "--") . "00000000 Merge remote-tracking branch 'origin/master' into branch_name") (("/Users/user/projects/project/" "symbolic-ref" "--short" "HEAD") . "branch_name") (("/Users/user/projects/project/" "rev-parse" "--verify" "HEAD") . "0000000000000000000000000000000000000000") ((config "/Users/user/projects/project/") . #s(hash-table size 65 test equal rehash-size 1.5 rehash-threshold 0.8 data ("credential.helper" ("osxkeychain") "user.name" ("My Name") "user.email" ("[email protected]") "github.user" ("username") "push.default" ("upstream") "core.editor" ("emacsclient -c") "core.whitespace" ("trailing-space") "core.excludesfile" ("~/.gitignore") "core.trustctime" ("false") "color.branch" ("auto") "color.diff" ("auto") "color.interactive" ("auto") "color.status" ("auto") "color.ui" ("true") "color.branch.current" ("yellow reverse") "color.branch.local" ("yellow") "color.branch.remote" ("green") "color.diff.meta" ("yellow bold") "color.diff.frag" ("magenta bold") "color.diff.old" ("red bold") "color.diff.new" ("green bold") "color.status.added" ("yellow") "color.status.changed" ("green") "color.status.untracked" ("cyan") "pull.rebase" ("true") "filter.lfs.clean" ("git-lfs clean -- %f") "filter.lfs.smudge" ("git-lfs smudge -- %f") "filter.lfs.process" ("git-lfs filter-process") "filter.lfs.required" ("true") "core.repositoryformatversion" ("0") "core.filemode" ("true") "core.bare" ("false") "core.logallrefupdates" ("true") "core.ignorecase" ("true") "core.precomposeunicode" ("true") "remote.origin.url" ("[email protected]:MyCompany/project-company.git") "remote.origin.fetch" ("+refs/heads/*:refs/remotes/origin/*") "branch.master.remote" ("origin") "branch.master.merge" ("refs/heads/master") "branch.whitelisting.remote" ("origin") "branch.whitelisting.merge" ("refs/heads/whitelisting") "branch.whitelisting.pushremote" ("origin") "branch.dont-renice.pushremote" ("origin") "branch.typos.pushremote" ("origin") "branch.server-refactor.pushremote" ("origin") "branch.update-docker-endpoint.pushremote" ("origin") "branch.correct_rearm.pushremote" ("origin") "branch.bump_dev_env.pushremote" ("origin") "branch.branch_name.pushremote" ("origin") "branch.modular-build.pushremote" ("origin") ...))) (("/Users/user/projects/project/" . magit-toplevel) . "/Users/user/projects/project/") (("/Users/user/projects/project/" "rev-parse" "--show-cdup") . "") (("/Users/user/projects/project/" "rev-parse" "--show-toplevel") . "/Users/user/projects/project")))
#<subr call-interactively>(magit-status nil nil)
apply(#<subr call-interactively> magit-status (nil nil))
(let ((ido-cr+-current-command command)) (apply orig-fun command args))
call-interactively@ido-cr+-record-current-command(#<subr call-interactively> magit-status nil nil)
apply(call-interactively@ido-cr+-record-current-command #<subr call-interactively> (magit-status nil nil))
call-interactively(magit-status nil nil)
command-execute(magit-status)
Are you still getting this error? We certainly shouldn't be returning a value like 47 from magithub-ci-status.
What does (magithub-ci-status (magithub-ci-status--get-default-ref)) get you?
...does this possibly only happen during rebase? By my read of magithub-ci-status, we would return a string there. We probably shouldn't, but char-47 is / which is not in that string, so that doesn't make a ton of sense. Still – worth checking.
