Startup error due to missing xr package (xr-autoloads.el not found)

[vict-Yang]

Description:

After installing the Emacs configuration and first launching Emacs, Emacs shows error of missing xr-autoloads.el file.

Steps to Reproduce:

1. Clone the repo git clone git@github.com:purcell/emacs.d.git .emacs.d
2. Start emacs to install packages
3. Restart the emacs and observe the error

Error Message (from ./test-startup.sh) or emacs --debug-init

Note: I have replaced my actual username with my-username in file paths

Attempting startup...
Loading /home/my-username/.emacs.d/init.el (source)...
Debugger entered--Lisp error: (file-missing "Cannot open load file" "No such file or directory" "/home/my-username/.emacs.d/elpa-29.4/xr-2.1/xr-autoloads")
  load("/home/my-username/.emacs.d/elpa-29.4/xr-2.1/xr-autoloads" nil t)
... 

Below is full error message

Attempting startup...
Loading /home/my-username/.emacs.d/init.el (source)...
Debugger entered--Lisp error: (file-missing "Cannot open load file" "No such file or directory" "/home/my-username/.emacs.d/elpa-29.4/xr-2.1/xr-autoloads")
  load("/home/my-username/.emacs.d/elpa-29.4/xr-2.1/xr-autoloads" nil t)
  package-activate-1(#s(package-desc :name xr :version (2 1) :summary "Convert string regexp to rx notation" :reqs ((emacs (27 1))) :kind nil :archive nil :dir "/home/my-username/.emacs.d/elpa-29.4/xr-2.1" :extras ((:url . "https://github.com/mattiase/xr") (:keywords "lisp" "regexps") (:maintainer "Mattias Engdegård" . "mattiase@acm.org") (:authors ("Mattias Engdegård" . "mattiase@acm.org")) (:commit . "31cd397f54591e3692bf88d6e1995236928e3561")) :signed nil) nil deps)
  package-activate(xr)
  package--activate-all()
  package-activate-all()
  package-initialize()
  eval-buffer(#<buffer  *load*-517462> nil "/home/my-username/.emacs.d/lisp/init-elpa.el" nil t)  ; Reading at buffer position 2667
  load-with-code-conversion("/home/my-username/.emacs.d/lisp/init-elpa.el" "/home/my-username/.emacs.d/lisp/init-elpa.el" nil t)
  #<subr require>(init-elpa)
  apply(#<subr require> init-elpa nil)
  (prog1 (apply orig feature args) (if (and (not already-loaded) (memq feature features)) (progn (let ((time (sanityinc/time-subtract-millis (current-time) require-start-time))) (add-to-list 'sanityinc/require-times (list feature require-start-time time) t)))))
  (let* ((already-loaded (memq feature features)) (require-start-time (and (not already-loaded) (current-time)))) (prog1 (apply orig feature args) (if (and (not already-loaded) (memq feature features)) (progn (let ((time (sanityinc/time-subtract-millis ... require-start-time))) (add-to-list 'sanityinc/require-times (list feature require-start-time time) t))))))
  sanityinc/require-times-wrapper(#<subr require> init-elpa)
  apply(sanityinc/require-times-wrapper #<subr require> init-elpa)
  require(init-elpa)
  eval-buffer(#<buffer  *load*> nil "/home/my-username/.emacs.d/init.el" nil t)  ; Reading at buffer position 1341
  load-with-code-conversion("/home/my-username/.emacs.d/init.el" "/home/my-username/.emacs.d/init.el" nil nil)
  load("/home/my-username/.emacs.d/init.el" nil nil t)
  load-file("/home/my-username/.emacs.d/init.el")
  (let ((debug-on-error t) (url-show-status nil) (user-emacs-directory default-directory) (user-init-file (expand-file-name "init.el")) (load-path (delq default-directory load-path))) (setq package-check-signature nil) (load-file user-init-file) (run-hooks 'after-init-hook))
  (progn (defvar url-show-status) (let ((debug-on-error t) (url-show-status nil) (user-emacs-directory default-directory) (user-init-file (expand-file-name "init.el")) (load-path (delq default-directory load-path))) (setq package-check-signature nil) (load-file user-init-file) (run-hooks 'after-init-hook)))
  eval((progn (defvar url-show-status) (let ((debug-on-error t) (url-show-status nil) (user-emacs-directory default-directory) (user-init-file (expand-file-name "init.el")) (load-path (delq default-directory load-path))) (setq package-check-signature nil) (load-file user-init-file) (run-hooks 'after-init-hook))) t)
  command-line-1(("--eval" "(progn\n                        (defvar url-show-st..."))
  command-line()
  normal-top-level()