Skip to content

Instantly share code, notes, and snippets.

@shaleh
Created February 8, 2019 22:51
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save shaleh/9751a494bfb540008327dbe465faa6cc to your computer and use it in GitHub Desktop.
Save shaleh/9751a494bfb540008327dbe465faa6cc to your computer and use it in GitHub Desktop.
magit error
Debugger entered--Lisp error: (wrong-type-argument (or eieio-object class) nil obj)
signal(wrong-type-argument ((or eieio-object class) nil obj))
eieio-oref(nil children)
(nconc (eieio-oref (eieio-oref section127 'parent) 'children) (list section127))
(eieio-oset (eieio-oref section127 'parent) 'children (nconc (eieio-oref (eieio-oref section127 'parent) 'children) (list section127)))
(if (eq section127 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section127)) (eieio-oset (eieio-oref section127 'parent) 'children (nconc (eieio-oref (eieio-oref section127 'parent) 'children) (list section127))))
(catch 'cancel-section (magit-run-section-hook 'magit-status-sections-hook) (run-hooks 'magit-insert-section-hook) (magit-insert-child-count section127) (set-marker-insertion-type (eieio-oref section127 'start) t) (let* ((end (eieio-oset section127 'end (point-marker))) (map (intern (format "magit-%s-section-map" (eieio-oref section127 'type)))) (map (and (boundp map) (symbol-value map)))) (save-excursion (goto-char (eieio-oref section127 'start)) (while (< (point) end) (let ((next (or (next-single-property-change (point) 'magit-section) end))) (if (get-text-property (point) 'magit-section) nil (put-text-property (point) next 'magit-section section127) (if map (progn (put-text-property (point) next 'keymap map)))) (goto-char next))))) (if (eq section127 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section127)) (eieio-oset (eieio-oref section127 'parent) 'children (nconc (eieio-oref (eieio-oref section127 'parent) 'children) (list section127)))))
(let ((magit-insert-section--current section127) (magit-insert-section--parent section127) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil (prog1 magit-root-section (setq magit-root-section section127)))))) (catch 'cancel-section (magit-run-section-hook 'magit-status-sections-hook) (run-hooks 'magit-insert-section-hook) (magit-insert-child-count section127) (set-marker-insertion-type (eieio-oref section127 'start) t) (let* ((end (eieio-oset section127 'end (point-marker))) (map (intern (format "magit-%s-section-map" (eieio-oref section127 'type)))) (map (and (boundp map) (symbol-value map)))) (save-excursion (goto-char (eieio-oref section127 'start)) (while (< (point) end) (let ((next (or (next-single-property-change (point) 'magit-section) end))) (if (get-text-property (point) 'magit-section) nil (put-text-property (point) next 'magit-section section127) (if map (progn (put-text-property (point) next 'keymap map)))) (goto-char next))))) (if (eq section127 magit-root-section) (let ((magit-section-cache-visibility nil)) (magit-section-show section127)) (eieio-oset (eieio-oref section127 'parent) 'children (nconc (eieio-oref (eieio-oref section127 'parent) 'children) (list section127))))) section127)
(let* ((type126 'status) (section127 (funcall (cond ((eq type126 'file) 'magit-file-section) ((eq type126 'hunk) 'magit-hunk-section) (t 'magit-section)) "" :type type126 :value nil :start (point-marker) :parent magit-insert-section--parent))) (eieio-oset section127 'hidden (let ((value (run-hook-with-args-until-success 'magit-section-set-visibility-hook section127))) (if value (eq value 'hide) (let ((incarnation (and magit-insert-section--oldroot (magit-get-section (magit-section-ident section127) magit-insert-section--oldroot)))) (if incarnation (eieio-oref incarnation 'hidden) (let ((value (magit-section-match-assoc section127 magit-section-initial-visibility-alist))) (if value (progn (if (functionp value) (progn (setq value (funcall value section127)))) (eq value 'hide)) nil))))))) (let ((magit-insert-section--current section127) (magit-insert-section--parent section127) (magit-insert-section--oldroot (or magit-insert-section--oldroot (if magit-insert-section--parent nil (prog1 magit-root-section (setq magit-root-section section127)))))) (catch 'cancel-section (magit-run-section-hook 'magit-status-sections-hook) (run-hooks 'magit-insert-s
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment