condition-case: Suffix magit-log:--*-order is not defined or autoloaded as a command (interaction with native compilation?))

[colonelpanic8]

Some bindings/magit commands, specifically magit-log and magit-remote seem to be undefined.

I have this feeling that somehow this could be user error/related to my configuration, BUT, I have done the following:

• Restarted Emacs
• Removed magit reinstalled it fresh
• Rebuilt magit
• Pulled all of magits dependencies (using straight-pull-all)

Now interestingly, rebuilding/restarting magit, DOES seem to fix the problem initially, but it seems to come back after a bit. I do have the auto-compile package enabled:

(use-package auto-compile
  :demand t
  :config
  (progn
    (auto-compile-on-load-mode)
    (auto-compile-on-save-mode)))

, so my suspicion is that it might somehow be related to that.

Again, sorry for filing this issue if this somehow really is related to my configuration, but I think it might just be an interaction with auto-compile and magit which seems like is something that shouldn't be happening. Feel free to close -- I completely understand if you don't think this is a magit issue, but I thought it might be useful to at least have something like this searchable in case other users come across something similar.

Version Info: Magit v3.3.0-736-g86b8491c, Transient 0.4.1, Git 2.32.0, Emacs 29.1, gnu/linux

Backtrace

Debugger entered--Lisp error: (error "Suffix magit-log:--*-order is not defined or autol...")
  apply(debug (error (error "Suffix magit-log:--*-order is not defined or autol...")))
  transient--exit-and-debug(error (error "Suffix magit-log:--*-order is not defined or autol..."))
  error("Suffix %s is not defined or autoloaded as a comman..." magit-log:--*-order)
  (progn (error "Suffix %s is not defined or autoloaded as a comman..." cmd))
  (if (transient--use-suffix-p obj) (progn (error "Suffix %s is not defined or autoloaded as a comman..." cmd)))
  (if (or (transient-switch--eieio-childp obj) (transient-option--eieio-childp obj)) (put cmd 'transient--infix-command (transient--default-infix-command)) (if (transient--use-suffix-p obj) (progn (error "Suffix %s is not defined or autoloaded as a comman..." cmd))))
  (if (or (commandp cmd) (get cmd 'transient--infix-command)) nil (if (or (transient-switch--eieio-childp obj) (transient-option--eieio-childp obj)) (put cmd 'transient--infix-command (transient--default-infix-command)) (if (transient--use-suffix-p obj) (progn (error "Suffix %s is not defined or autoloaded as a comman..." cmd)))))
  (let ((cmd (eieio-oref obj 'command))) (if (or (commandp cmd) (get cmd 'transient--infix-command)) nil (if (or (transient-switch--eieio-childp obj) (transient-option--eieio-childp obj)) (put cmd 'transient--infix-command (transient--default-infix-command)) (if (transient--use-suffix-p obj) (progn (error "Suffix %s is not defined or autoloaded as a comman..." cmd))))))
  transient--ensure-infix-command(#<transient-switches transient-switches-31f036c>)
  (let ((obj (let* ((proto (and t (and cmd ... ...)))) (if proto (apply #'clone proto :level level args) (apply class :level level args))))) (transient--init-suffix-key obj) (transient--ensure-infix-command obj) (if (transient--use-suffix-p obj) (progn (if (transient--inapt-suffix-p obj) (eieio-oset obj 'inapt t) (transient-init-scope obj) (transient-init-value obj)) (list obj))))
  (progn (let ((obj (let* ((proto (and t ...))) (if proto (apply #'clone proto :level level args) (apply class :level level args))))) (transient--init-suffix-key obj) (transient--ensure-infix-command obj) (if (transient--use-suffix-p obj) (progn (if (transient--inapt-suffix-p obj) (eieio-oset obj 'inapt t) (transient-init-scope obj) (transient-init-value obj)) (list obj)))))
  (if (transient--use-level-p level) (progn (let ((obj (let* ((proto ...)) (if proto (apply ... proto :level level args) (apply class :level level args))))) (transient--init-suffix-key obj) (transient--ensure-infix-command obj) (if (transient--use-suffix-p obj) (progn (if (transient--inapt-suffix-p obj) (eieio-oset obj 'inapt t) (transient-init-scope obj) (transient-init-value obj)) (list obj))))))
  (progn (let ((fn (and (symbolp cmd) (symbol-function cmd)))) (if (autoloadp fn) (progn (transient--debug "   autoload %s" cmd) (autoload-do-load fn)))) (if (transient--use-level-p level) (progn (let ((obj (let* (...) (if proto ... ...)))) (transient--init-suffix-key obj) (transient--ensure-infix-command obj) (if (transient--use-suffix-p obj) (progn (if (transient--inapt-suffix-p obj) (eieio-oset obj ... t) (transient-init-scope obj) (transient-init-value obj)) (list obj)))))))
  (let* ((cmd (plist-get args :command)) (level (or (alist-get (transient--suffix-symbol cmd) levels) level))) (progn (let ((fn (and (symbolp cmd) (symbol-function cmd)))) (if (autoloadp fn) (progn (transient--debug "   autoload %s" cmd) (autoload-do-load fn)))) (if (transient--use-level-p level) (progn (let ((obj (let* ... ...))) (transient--init-suffix-key obj) (transient--ensure-infix-command obj) (if (transient--use-suffix-p obj) (progn (if ... ... ... ...) (list obj))))))))
  (let ((level x40) (class x42) (args x44)) (let* ((cmd (plist-get args :command)) (level (or (alist-get (transient--suffix-symbol cmd) levels) level))) (progn (let ((fn (and (symbolp cmd) (symbol-function cmd)))) (if (autoloadp fn) (progn (transient--debug "   autoload %s" cmd) (autoload-do-load fn)))) (if (transient--use-level-p level) (progn (let ((obj ...)) (transient--init-suffix-key obj) (transient--ensure-infix-command obj) (if (transient--use-suffix-p obj) (progn ... ...))))))))
  (progn (ignore (null x45)) (let ((level x40) (class x42) (args x44)) (let* ((cmd (plist-get args :command)) (level (or (alist-get (transient--suffix-symbol cmd) levels) level))) (progn (let ((fn (and ... ...))) (if (autoloadp fn) (progn (transient--debug "   autoload %s" cmd) (autoload-do-load fn)))) (if (transient--use-level-p level) (progn (let (...) (transient--init-suffix-key obj) (transient--ensure-infix-command obj) (if ... ...))))))))
  (let* ((x44 (car-safe x43)) (x45 (cdr-safe x43))) (progn (ignore (null x45)) (let ((level x40) (class x42) (args x44)) (let* ((cmd (plist-get args :command)) (level (or (alist-get ... levels) level))) (progn (let ((fn ...)) (if (autoloadp fn) (progn ... ...))) (if (transient--use-level-p level) (progn (let ... ... ... ...))))))))
  (progn (ignore (consp x43)) (let* ((x44 (car-safe x43)) (x45 (cdr-safe x43))) (progn (ignore (null x45)) (let ((level x40) (class x42) (args x44)) (let* ((cmd (plist-get args :command)) (level (or ... level))) (progn (let (...) (if ... ...)) (if (transient--use-level-p level) (progn ...))))))))
  (let* ((x42 (car-safe x41)) (x43 (cdr-safe x41))) (progn (ignore (consp x43)) (let* ((x44 (car-safe x43)) (x45 (cdr-safe x43))) (progn (ignore (null x45)) (let ((level x40) (class x42) (args x44)) (let* ((cmd ...) (level ...)) (progn (let ... ...) (if ... ...))))))))
  (progn (ignore (consp x41)) (let* ((x42 (car-safe x41)) (x43 (cdr-safe x41))) (progn (ignore (consp x43)) (let* ((x44 (car-safe x43)) (x45 (cdr-safe x43))) (progn (ignore (null x45)) (let ((level x40) (class x42) (args x44)) (let* (... ...) (progn ... ...))))))))
  (let* ((x40 (car-safe spec)) (x41 (cdr-safe spec))) (progn (ignore (consp x41)) (let* ((x42 (car-safe x41)) (x43 (cdr-safe x41))) (progn (ignore (consp x43)) (let* ((x44 (car-safe x43)) (x45 (cdr-safe x43))) (progn (ignore (null x45)) (let (... ... ...) (let* ... ...))))))))
  (progn (ignore (consp spec)) (let* ((x40 (car-safe spec)) (x41 (cdr-safe spec))) (progn (ignore (consp x41)) (let* ((x42 (car-safe x41)) (x43 (cdr-safe x41))) (progn (ignore (consp x43)) (let* ((x44 ...) (x45 ...)) (progn (ignore ...) (let ... ...))))))))
  transient--init-suffix(nil (1 transient-suffix (:command magit-log:--*-order)))
  (cond ((vectorp spec) (transient--init-group levels spec)) ((listp spec) (transient--init-suffix levels spec)) ((stringp spec) (list spec)) ((error "cl-etypecase failed: %s, %s" spec '(vector list string)) nil))
  transient--init-child(nil (1 transient-suffix (:command magit-log:--*-order)))
  (closure ((levels)) (c) (transient--init-child levels c))((1 transient-suffix (:command magit-log:--*-order)))
  cl-mapcan((closure ((levels)) (c) (transient--init-child levels c)) ((1 transient-suffix (:command magit-log:--*-order)) (1 transient-switch (:key "-r" :description "Reverse order" :argument "--reverse" :command transient:magit-log:--reverse))))
  (and - (cl-mapcan #'(lambda (c) (transient--init-child levels c)) (transient-setup-children obj children)))
  (let* ((- (and t (transient--use-level-p level))) (obj (and - (apply class :level level args))) (- (and obj (transient--use-suffix-p obj))) (suffixes (and - (cl-mapcan #'(lambda (c) (transient--init-child levels c)) (transient-setup-children obj children))))) (if suffixes (progn (eieio-oset obj 'suffixes suffixes) (list obj))))
  (let ((level x32) (class x34) (args x36) (children x38)) (let* ((- (and t (transient--use-level-p level))) (obj (and - (apply class :level level args))) (- (and obj (transient--use-suffix-p obj))) (suffixes (and - (cl-mapcan #'(lambda ... ...) (transient-setup-children obj children))))) (if suffixes (progn (eieio-oset obj 'suffixes suffixes) (list obj)))))
  (progn (ignore (null x39)) (let ((level x32) (class x34) (args x36) (children x38)) (let* ((- (and t (transient--use-level-p level))) (obj (and - (apply class :level level args))) (- (and obj (transient--use-suffix-p obj))) (suffixes (and - (cl-mapcan #'... (transient-setup-children obj children))))) (if suffixes (progn (eieio-oset obj 'suffixes suffixes) (list obj))))))
  (let* ((x38 (car-safe x37)) (x39 (cdr-safe x37))) (progn (ignore (null x39)) (let ((level x32) (class x34) (args x36) (children x38)) (let* ((- (and t (transient--use-level-p level))) (obj (and - (apply class :level level args))) (- (and obj (transient--use-suffix-p obj))) (suffixes (and - (cl-mapcan ... ...)))) (if suffixes (progn (eieio-oset obj 'suffixes suffixes) (list obj)))))))
  (progn (ignore (consp x37)) (let* ((x38 (car-safe x37)) (x39 (cdr-safe x37))) (progn (ignore (null x39)) (let ((level x32) (class x34) (args x36) (children x38)) (let* ((- (and t ...)) (obj (and - ...)) (- (and obj ...)) (suffixes (and - ...))) (if suffixes (progn (eieio-oset obj ... suffixes) (list obj))))))))
  (let* ((x36 (car-safe x35)) (x37 (cdr-safe x35))) (progn (ignore (consp x37)) (let* ((x38 (car-safe x37)) (x39 (cdr-safe x37))) (progn (ignore (null x39)) (let ((level x32) (class x34) (args x36) (children x38)) (let* ((- ...) (obj ...) (- ...) (suffixes ...)) (if suffixes (progn ... ...))))))))
  (progn (ignore (consp x35)) (let* ((x36 (car-safe x35)) (x37 (cdr-safe x35))) (progn (ignore (consp x37)) (let* ((x38 (car-safe x37)) (x39 (cdr-safe x37))) (progn (ignore (null x39)) (let ((level x32) (class x34) (args x36) (children x38)) (let* (... ... ... ...) (if suffixes ...))))))))
  (let* ((x34 (car-safe x33)) (x35 (cdr-safe x33))) (progn (ignore (consp x35)) (let* ((x36 (car-safe x35)) (x37 (cdr-safe x35))) (progn (ignore (consp x37)) (let* ((x38 (car-safe x37)) (x39 (cdr-safe x37))) (progn (ignore (null x39)) (let (... ... ... ...) (let* ... ...))))))))
  (progn (ignore (consp x33)) (let* ((x34 (car-safe x33)) (x35 (cdr-safe x33))) (progn (ignore (consp x35)) (let* ((x36 (car-safe x35)) (x37 (cdr-safe x35))) (progn (ignore (consp x37)) (let* ((x38 ...) (x39 ...)) (progn (ignore ...) (let ... ...))))))))
  (let* ((x32 (car-safe val)) (x33 (cdr-safe val))) (progn (ignore (consp x33)) (let* ((x34 (car-safe x33)) (x35 (cdr-safe x33))) (progn (ignore (consp x35)) (let* ((x36 (car-safe x35)) (x37 (cdr-safe x35))) (progn (ignore (consp x37)) (let* (... ...) (progn ... ...))))))))
  (progn (ignore (consp val)) (let* ((x32 (car-safe val)) (x33 (cdr-safe val))) (progn (ignore (consp x33)) (let* ((x34 (car-safe x33)) (x35 (cdr-safe x33))) (progn (ignore (consp x35)) (let* ((x36 ...) (x37 ...)) (progn (ignore ...) (let* ... ...))))))))
  (let* ((val (append spec nil))) (progn (ignore (consp val)) (let* ((x32 (car-safe val)) (x33 (cdr-safe val))) (progn (ignore (consp x33)) (let* ((x34 (car-safe x33)) (x35 (cdr-safe x33))) (progn (ignore (consp x35)) (let* (... ...) (progn ... ...))))))))
  transient--init-group(nil [1 transient-column (:description "Commit ordering") ((1 transient-suffix (:command magit-log:--*-order)) (1 transient-switch (:key "-r" :description "Reverse order" :argument "--reverse" :command transient:magit-log:--reverse)))])
  (cond ((vectorp spec) (transient--init-group levels spec)) ((listp spec) (transient--init-suffix levels spec)) ((stringp spec) (list spec)) ((error "cl-etypecase failed: %s, %s" spec '(vector list string)) nil))
  transient--init-child(nil [1 transient-column (:description "Commit ordering") ((1 transient-suffix (:command magit-log:--*-order)) (1 transient-switch (:key "-r" :description "Reverse order" :argument "--reverse" :command transient:magit-log:--reverse)))])
  (closure ((levels)) (c) (transient--init-child levels c))([1 transient-column (:description "Commit ordering") ((1 transient-suffix (:command magit-log:--*-order)) (1 transient-switch (:key "-r" :description "Reverse order" :argument "--reverse" :command transient:magit-log:--reverse)))])
  cl-mapcan((closure ((levels)) (c) (transient--init-child levels c)) ([1 transient-column (:description "Commit limiting") ((1 transient-suffix (:command magit-log:-n)) (1 transient-suffix (:command magit:--author)) (7 transient-suffix (:command magit-log:--since)) (7 transient-suffix (:command magit-log:--until)) (1 transient-suffix (:command magit-log:--grep)) (7 transient-switch (:key "-i" :description "Search case-insensitive" :shortarg "-i" :argument "--regexp-ignore-case" :command transient:magit-log:--regexp-ignore-case)) (7 transient-switch (:key "-I" :description "Invert search pattern" :argument "--invert-grep" :command transient:magit-log:--invert-grep)) (1 transient-suffix (:command magit-log:-G)) (1 transient-suffix (:command magit-log:-S)) (1 transient-suffix (:command magit-log:-L)) (7 transient-switch (:key "=m" :description "Omit merges" :argument "--no-merges" :command transient:magit-log:--no-merges)) (7 transient-switch (:key "=p" :description "First parent" :argument "--first-parent" :command transient:magit-log:--first-parent)))] [1 transient-column (:description "History simplification") ((1 transient-switch (:key "-D" :description "Simplify by decoration" :argument "--simplify-by-decoration" :command transient:magit-log:--simplify-by-decoration)) (1 transient-suffix (:command magit:--)) (1 transient-switch (:key "-f" :description "Follow renames when showing single-file log" :argument "--follow" :command transient:magit-log:--follow)) (6 transient-switch (:key "/s" :description "Only commits changing given paths" :argument "--sparse" :command transient:magit-log:--sparse)) (7 transient-switch (:key "/d" :description "Only selected commits plus meaningful histor..." :argument "--dense" :command transient:magit-log:--dense)) (7 transient-switch (:key "/a" :description "Only commits existing directly on ancestry p..." :argument "--ancestry-path" :command transient:magit-log:--ancestry-path)) (6 transient-switch (:key "/f" :description "Do not prune history" :argument "--full-history" :command transient:magit-log:--full-history)) (7 transient-switch (:key "/m" :description "Prune some history" :argument "--simplify-merges" :command transient:magit-log:--simplify-merges)))] [1 transient-column (:description "Commit ordering") ((1 transient-suffix (:command magit-log:--*-order)) (1 transient-switch (:key "-r" :description "Reverse order" :argument "--reverse" :command transient:magit-log:--reverse)))] [1 transient-column (:description "Formatting") ((1 transient-switch (:key "-g" :description "Show graph" :argument "--graph" :command transient:magit-log:--graph)) (1 transient-switch (:key "-c" :description "Show graph in color" :argument "--color" :command transient:magit-log:--color)) (1 transient-switch (:key "-d" :description "Show refnames" :argument "--decorate" :command transient:magit-log:--decorate)) (1 transient-switch (:key "=S" :description "Show signatures" :argument "--show-signature" :command transient:magit-log:--show-signature)) (1 transient-switch (:key "-h" :description "Show header" :argument "++header" :command transient:magit-log:++header)) (1 transient-switch (:key "-p" :description "Show diffs" :shortarg "-p" :argument "--patch" :command transient:magit-log:--patch)) (1 transient-switch (:key "-s" :description "Show diffstats" :argument "--stat" :command transient:magit-log:--stat)))] [1 transient-columns nil ([1 transient-column (:description "Log") ((1 transient-suffix ...) (1 transient-suffix ...) (1 transient-suffix ...) (1 transient-suffix ...))] [1 transient-column (:description "") ((1 transient-suffix ...) (1 transient-suffix ...) (1 transient-suffix ...) (7 transient-suffix ...) (7 transient-suffix ...) (7 transient-suffix ...))] [1 transient-column (:description "Reflog") ((1 transient-suffix ...) (1 transient-suffix ...) (1 transient-suffix ...))] [1 transient-column (:if #f(compiled-function () #<bytecode 0xd10228db4a67268>) :description "Wiplog") ((1 transient-suffix ...) (1 transient-suffix ...))] [1 transient-column (:description "Other") ((5 transient-suffix ...))])] [1 transient-columns (:hide (closure (Man-notify-method t) nil (and (not ...) (not transient-show-common-commands)))) ([1 transient-column (:description "Value commands") ((1 transient-suffix ...) (1 transient-suffix ...) (1 transient-suffix ...) (1 transient-suffix ...) (1 transient-suffix ...))] [1 transient-column (:description "Sticky commands") ((1 transient-suffix ...) (1 transient-suffix ...) (1 transient-suffix ...))] [1 transient-column (:description "Customize") ((1 transient-suffix ...) (1 transient-suffix ...))])]))
  (let ((levels (alist-get name transient-levels))) (cl-mapcan #'(lambda (c) (transient--init-child levels c)) (append (get name 'transient--layout) (and (not transient--editp) (get 'transient-common-commands 'transient--layout)))))
  transient--init-suffixes(magit-log)
  (or layout (transient--init-suffixes name))
  (setq transient--layout (or layout (transient--init-suffixes name)))
  transient--init-objects(magit-log nil nil)
  (progn (cond ((not name) (transient--pop-keymap 'transient--transient-map) (transient--pop-keymap 'transient--redisplay-map) (setq name (eieio-oref transient--prefix 'command)) (setq params (list :scope (eieio-oref transient--prefix 'scope)))) (transient--prefix (transient--pop-keymap 'transient--transient-map) (transient--pop-keymap 'transient--redisplay-map)) ((not (or layout transient-current-command)) (transient--stack-zap)) (edit (setq transient--editp t))) (transient--init-objects name layout params) (transient--history-init transient--prefix) (setq transient--predicate-map (transient--make-predicate-map)) (setq transient--transient-map (transient--make-transient-map)) (setq transient--redisplay-map (transient--make-redisplay-map)) (setq transient--original-window (selected-window)) (setq transient--original-buffer (current-buffer)) (setq transient--minibuffer-depth (minibuffer-depth)) (transient--redisplay) (transient--init-transient) (transient--suspend-which-key-mode))
  (let ((debugger #'transient--exit-and-debug)) (progn (cond ((not name) (transient--pop-keymap 'transient--transient-map) (transient--pop-keymap 'transient--redisplay-map) (setq name (eieio-oref transient--prefix 'command)) (setq params (list :scope (eieio-oref transient--prefix 'scope)))) (transient--prefix (transient--pop-keymap 'transient--transient-map) (transient--pop-keymap 'transient--redisplay-map)) ((not (or layout transient-current-command)) (transient--stack-zap)) (edit (setq transient--editp t))) (transient--init-objects name layout params) (transient--history-init transient--prefix) (setq transient--predicate-map (transient--make-predicate-map)) (setq transient--transient-map (transient--make-transient-map)) (setq transient--redisplay-map (transient--make-redisplay-map)) (setq transient--original-window (selected-window)) (setq transient--original-buffer (current-buffer)) (setq transient--minibuffer-depth (minibuffer-depth)) (transient--redisplay) (transient--init-transient) (transient--suspend-which-key-mode)))
  (condition-case err (let ((debugger #'transient--exit-and-debug)) (progn (cond ((not name) (transient--pop-keymap 'transient--transient-map) (transient--pop-keymap 'transient--redisplay-map) (setq name (eieio-oref transient--prefix 'command)) (setq params (list :scope (eieio-oref transient--prefix ...)))) (transient--prefix (transient--pop-keymap 'transient--transient-map) (transient--pop-keymap 'transient--redisplay-map)) ((not (or layout transient-current-command)) (transient--stack-zap)) (edit (setq transient--editp t))) (transient--init-objects name layout params) (transient--history-init transient--prefix) (setq transient--predicate-map (transient--make-predicate-map)) (setq transient--transient-map (transient--make-transient-map)) (setq transient--redisplay-map (transient--make-redisplay-map)) (setq transient--original-window (selected-window)) (setq transient--original-buffer (current-buffer)) (setq transient--minibuffer-depth (minibuffer-depth)) (transient--redisplay) (transient--init-transient) (transient--suspend-which-key-mode))) ((debug error) (transient--emergency-exit) (signal (car err) (cdr err))))
  transient-setup(magit-log)
  magit-log()
  funcall-interactively(magit-log)
  command-execute(magit-log)

[tarsius]

(I have migrated this issue to a discussion, which technically closes the issue. That doesn't mean that I won't try to help.)

Unfortunately I don't see how this is even possible to happen. magit-log and magit-log:--*-order are define in the same library. Calling the former as a command is only possible if it is either already defined or at least autoloaded. If it is already loaded then the latter is also already loaded. If it is only autoloaded, then the defining file is first loaded, and that will also load the latter.

My guess is that you have multiple versions of Magit sitting on the load-path.

I don't think auto-compile has anything to do with it. I do however see a correlation between mystery bugs and the use of Straight.

[colonelpanic8]

@tarsius I definitely do not have multiple versions of magit in my load path.

Also turning off native compilation completely did fix the issue.

I know you're skeptical but I think there is an interaction with magic and native compilation here.

[djangoliv]

I've had the same error for some time.
I am using straight.

transient-setup: Suffix magit-log:--*-order is not defined or autoloaded as a command

(use-package magit
   :straight t
   :bind
   ("C-x g s" . magit-status)
   ("C-x g l" . magit-log-buffer-file)
   :custom
   (magit-keyboard-prefix (kbd "C-x g"))
   (git-keyboard-prefix "\C-x£") ;; keybinding improbable (ie desactivation)
   (magit-diff-options '("-b")) ;; ignore whitespace
   (magit-push-always-verify nil)
   (magit-commit-show-diff nil)
)

[progfolio]

@colonelpanic8 It's unclear what the exact reproduction steps are.
Try running in the following test environment and note down the exact steps you take:

(straight-bug-report
  :interactive t
  :post-bootstrap
  (straight-use-package 'magit))

Use M-x restart-emacs if you need to restart to reproduce the issue.

[jasonsewall]

I'd been struggling with this after rebuilding emacs from the emacs-29 branch on Ubuntu 22.04/x86_64 with GCC-12 based native comp. on.

I added this to my init.el and it seems to be working now:
(setq native-comp-deferred-compilation-deny-list '("magit"))

[progfolio]

I'd been struggling with this after rebuilding emacs from the emacs-29 branch on Ubuntu 22.04/x86_64 with GCC-12 based native comp. on.

I added this to my init.el and it seems to be working now: (setq native-comp-deferred-compilation-deny-list '("magit"))

What package manager are you using?

[jasonsewall]

(use-package magit
  :straight t
  :init (setq magit-auto-revert-mode t)
  :bind (("C-x C-g" . magit-status)))

[progfolio]

The output of M-x straight-version would he helpful, too.

[jasonsewall]

Sure, sorry:
prerelease (HEAD -> master, origin/master, origin/HEAD) ff63b15 2023-06-15

[progfolio]

I recommend:

1. update straight.el
2. restart Emacs
3. update magit
4. restart Emacs
5. Test. If the issue persists, please write down the exact steps you took.

Alternatively, you can leave your local config untouched and test via the straight-bug-report form I provided above.

[jasonsewall]

I updated straight.el, restarted, updated magit (the recipe I had was tied to master but the primary repo appears to be tied to main, so I manually pulled the latest.

Seems to work! And I'll leave my native-comp-deferred-compilation-deny-list in my back pocket in case something breaks.

[colonelpanic8]

FWIW, adding an ultra early demand of magit seems to fix the issue for me:

(use-package magit
  :demand t)

There must be some interaction with something else in my configuration, but theres just too much for me to bisect it and figure out where it is.

[progfolio]

Are you able to reproduce the issue using the test form I commented earlier? That will eliminate your config as a variable.

[colonelpanic8]

@progfolio no, I was not. Magit is loaded here https://github.com/colonelpanic8/dotfiles/blob/ebf7485972c24d4f45c2d47fe7d6f5e8afc60620/dotfiles/emacs.d/README.org#L3080

in my configuration, but I simply don't have the time to do a bisect of everything before it is loaded to figure out what additional piece of configuration is causing this issue.

[tl072]

I don't know if it will help, but I have experienced something similar with magit-branch.el . I found that opening the file and eval-ing it fixed my issue. Will have to see if it returns when I restart emacs, but it seems as though the transient-define-infix calls were not being autoloaded somehow. I am doing native compile, so I wonder if this is somehow the culprit.

[progfolio]

I don't know if it will help, but I have experienced something similar with magit-branch.el .

What will help is information.
What package manager are you using? If straight.el, what is the output of M-x straight-version.
If not, what is the output of M-x emacs-version.
What steps make the problem happen?

[tl072]

Apologies for that, I was in a bit of a rush and thought a bit of extra info my assist,

M-x emacs-version: GNU Emacs 29.1 (build 1, x86_64-pc-linux-gnu, X toolkit, cairo version 1.16.0, Xaw3d scroll bars)

To reproduce, seems to involve:

1. create a new repo
2. add a file "test"
3. commit it
4. in magit-status main screen and click "b". Then I get that message: "transient-setup: Suffix magit-branch.<branch>.merge/remote is not defined or autoloaded as a command"

I admittedly do have a rather elaborate system using use-package and native compile. However, the issue appeared recently. I also get it when I try to push/pull. I deleted all the older packages and compiled files as far as I could see.

[progfolio]

Is this with straight.el, package.el, another package manager?

[tl072]

sorry, it is with package.el

[mooseyboots]

I also have this issue, using straight.el, emacs 29.

like the OP, i manage sometimes to temporarily get rid of it (e.g. by removing all magit pkgs in straight dirs and rebuilding), but it comes back.

i tried :demand t as suggested above, and also tried updating straight.el, restart emacs, update magit, restart emacs, and the issue persists.

i tried the straight-bug-report as above but couldn't reproduce it in that environment.

but if i :straight nil magit, and install magit with package.el, i also can't reproduce the issue.

i then moved all my magit config to much earlier in my init.el, right after straight/package things, and the issue went away also. (with no :demand t.)

straight-dependents lists nothing other than forge/magit-todos, which i moved with magit. like another user i have too many lines of config to worth though it to find what might be interacting.

i'll have to see if the issue remains solved with this workaround.

[darosio]

here:
GNU Emacs 29.1 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.38, cairo version 1.17.8)
straight: prerelease (grafted, HEAD -> master) 9b11112 2023-08-08
Magit v3.3.0-822-g5cf664cd, Transient 0.4.3, Git 2.42.0, Emacs 29.1, gnu/linux

Following colonelpanic8 suggestion I solved with (use-package magit)
right after (straight-use-package 'use-package).

[zoechi]

Emacs: 29.1, Straight: 2023-10-21
Nothing of the mentioned suggestions helped except moving it at the beginning of the config like mentioned in #4997 (comment)

[psionic-k]

Here's a fix for the impatient:

On Elpaca (and Straight probably too), delete these paths:

builds/magit
builds/magit-section
builds/transient

Now go into the repos directories for transient and magit and check out:

# in magit
git checkout v3.1.0
# in transient
git checkout v0.4.1

Now just restart Emacs and allow the normal bootstrapping to take place. Keep in mind, Straight will now hiccup from time to time when you try to update because it doesn't like detached heads.

Magit depends heavily on Transient for command dispatch, so it makes sense that when they are out of sync, we can get odd issues with missing commands. I won't immediately investigate, but using transient and magit to bisect together may reveal where the issue is. I will leave it to the next person to find more up to date working versions.

Remember

Always. Check dependency versions when having update / rollback issues. 🤓 Hope you learned your lessons 🤓 Elisp is no different than any other software ecosystem.

⚠️ When using a source-based Elisp package manager, you need to be prepared to set pins, specify revs, and roll back versions manually. ⚠️ Sometimes this means going into the repos and checking things out by hand and deleting the old build directories.

Here is my tip jar for those who were convenienced:
https://github.com/sponsors/positron-solutions

[psionic-k]

Getting a compile failure for it due to eager macro expansion. Am I supposed to evaluate this another way? Tried on Elpaca master just to be sure.

Debugger entered--Lisp error: (error "Eager macro-expansion failure: (error \"Eager macro...")
  error("Eager macro-expansion failure: %S" (error "Eager macro-expansion skipped due to cycle:\n  … =>..."))

My manual steps were just to go into the directory, checkout the tag, and use elpaca-rebuild.

[progfolio]

Getting a compile failure for it due to eager macro expansion. Am I supposed to evaluate this another way?

I'm not sure how you evaluated it, but it's meant to be evaluated from the *scratch* buffer via eval-last-sexp and the like. See also:

https://github.com/progfolio/elpaca/wiki/Troubleshooting#the-elpaca-test-macro

I can't say much about that backtrace because it's not fully expanded. backtrace-expand-ellipses as well as the backtrace-line-length variable can be used to get the full output.

My manual steps were just to go into the directory, checkout the tag, and use elpaca-rebuild.

That's what the test automates.

[psionic-k]

Debugger entered--Lisp error: (error "Eager macro-expansion failure: (error \"Eager macro-expansion skipped due to cycle:\n  … => (load \\\"elpaca-test.el\\\") => (macroexpand-all (elpaca-test :interactive …)) => (macroexpand (elpaca-test …)) => (load \\\"elpaca-test.el\\\")\")")
  error("Eager macro-expansion failure: %S"
        (error "Eager macro-expansion skipped due to cycle:\n  … => (load \"elpaca-test.el\") => (macroexpand-all (elpaca-test :interactive …)) => (macroexpand (elpaca-test …)) => (load \"elpaca-test.el\")"))
  internal-macroexpand-for-load((elpaca-test :interactive t :init
                                             (setq BUILDP
                                                   (not
                                                    (file-exists-p
                                                     (expand-file-name "./magit/" elpaca-builds-directory))))
                                             (elpaca
                                                 (magit :tag "v3.3.0"))
                                             (elpaca
                                                 (transient :tag "v0.4.3"))
                                             (elpaca-wait)
                                             (if
                                                 (not BUILDP)
                                                 (elpaca-with-dir 'magit repo
                                                   (magit-log))
                                               (mapcar
                                                (lambda
                                                  (id)
                                                  (elpaca-rebuild id t))
                                                '(magit-section transient magit))
                                               (add-hook 'elpaca--post-queues-hook #'restart-emacs)
                                               (elpaca-process-queues)))
                                nil)

[progfolio]

How are you evaluating the test form? That backtrace does not look like the result of interactively evaluating the form in the scratch buffer.

[psionic-k]

I threw it into a fundamental mode buffer and ran eval-last-sexp. I had compiled it at some point after it complained about needing lexical binding. Cleaned out stale ELN and got back to this error, which is just Nix related:

byte-code: Cannot open load file: No such file or directory, /nix/store/k9zr5nd0nmb0mmbxb1z5fgbkqc2xh67k-emacs-gtk3-with-packages-29.1/share/emacs/site-lisp/site-start

#'restart-emacs is likely not aware of the wrapper script that is used to make emacs load from the Nix store.

The value of elpaca--emacs-path is correct. I can run that from a shell. Is the child process being sandboxed somewhere?

[progfolio]

I threw it into a fundamental mode buffer and ran eval-last-sexp

lisp-interaction-mode is what you want. It has lexical-binding enabled.

I had compiled it at some point

Not supported.

No such file or directory, ...site-lisp/site-start

You may be able to bypass that by adding :args "--no-site-file" to the test declaration.

#'restart-emacs is likely not aware of the wrapper script that is used to make emacs load from the Nix store.

That sounds like a bug with that script. I'm not familiar with Nix, so I can't offer any more there.

Is the child process being sandboxed somewhere?

The sub-process is started via make-process with all of the files residing in a generated temporary directory.
It would be nice to get that test running on Nix, but I wouldn't waste too much time trying.
On the main topic of this discussion: I'm unable to reproduce the failure given the steps you gave on Linux.

[psionic-k]

A new warning has shown up: ⛔ Warning (emacs): transient loaded before Elpaca activation

No sure when it appeared. Elpaca is loaded and elpaca-wait is called before proceeding. Can this error message be generated for another reason?

[progfolio]

Please move discussion to Elpaca's repo. We're getting off topic here.

[psionic-k]

:args "--no-site-file" worked. Confirmed nothing looks broken with magit.

I have verified my reproduction manually again to to keep us from going in circles.

1. delete magit, transient, and magit-section build directories
2. checkout magit v3.3.0 and transient v0.4.3
3. restart Emacs

Debugger entered--Lisp error: (error "Suffix magit-log:--*-order is not defined or autol...")
  transient--exit-and-debug(error (error "Suffix magit-log:--*-order is not defined or autol..."))

This warning still appears.
⛔ Warning (emacs): transient loaded before Elpaca activation

In load path shadows, I see that the Elpaca path properly shadows the built-in path and no other entries appear.

[progfolio]

This warning still appears.
⛔ Warning (emacs): transient loaded before Elpaca activation

Ah, I see. You're saying this appears in the test environment?
That indicates that transient.el is loaded before Elpaca has activated its version of the package.
The built-in version is being loaded by something.

You can usually add something like:

(eval-after-load "transient" '(debug))

as early as possible to get a backtrace pointing to the culprit.

[psionic-k]

To follow up on my comments for other readers, my root cause was likely a built-in version of transient being loaded before the package-manager sourced version.

How this occurred in my case:

1. Loading one of my local packages that was on the load path, meaning I could set :elpaca nil since it didn't require any fetching and there's also no recipe
2. Local package depends on transient
3. Instead of waiting on transient to load, the local package just requires it and loads the version that ships with Emacs

The fix was to make this package load :after transient, thus inserting the package manager back into control.

Debugging my loading order with (eval-after-load "transient" '(debug)) or (eval-after-load "transient" '(message "hi")) and (setq use-package-verbose t), I was able to see the offending load and apply the :after transient to fix it.

Once I fixed this, I am now no longer able to reproduce the issue and am successfully using the combination of transient 0.4.3 and magit 3.3.0.

[ekr1]

fyi, I had the same problem right now after upgrading from emacs 29.1 to 29.3 on MacOS.

Using straight, it automatically rebuilt the packages (which were not version locked, unfortunately; also unfortunately I had excluded the .emacs.d/straight directory from my backups as I wrongly assumed that I would never need it...). Afterwards, the problem occurred. I tried every single solution mentioned in the long discussions so far, nothing helped (including fixing magit and transient to v3.2.1 and v0.4.1 respectively).

Eventually I went into magit-log.el and manually deleted all occurrences of magit-log:--*-order. I never used that particular option anyways. I can work now, but this seems like a quiet unhappy situation.

• magit: commit 28bb411 (HEAD -> main)
• transient: commit 0204a2432862aa187745995f1c378e6d875b35cb (HEAD -> main)
• straight: commit 3eca39dfc6797243ec7d1c6a7d45142407f73f88 (HEAD -> master)
• GNU Emacs 29.3