syl20bnr / spacemacs

A community-driven Emacs distribution - The best editor is neither Emacs nor Vim, it's Emacs *and* Vim!
http://spacemacs.org
GNU General Public License v3.0
23.58k stars 4.9k forks source link

An error occurred while installing copilot: Package ‘emacs-27.2’ is unavailable #16223

Closed invisiblegaudi closed 6 months ago

invisiblegaudi commented 6 months ago

Description :octocat:

I've added the following to my .spacemacs:

dotspacemacs-additional-packages '(...
(copilot :location (recipe
:fetcher github
 :repo "zerolfx/copilot.el"
:files ("*.el" "dist"))))

Reproduction guide :beetle:

Observed behaviour: :eyes: :broken_heart:  Errors: (e) - An error occurred while installing copilot (error: (error Package ‘emacs-27.2’ is unavailable))

Expected behaviour: :heart: :smile: emacs starts up without error

System Info :computer:

Backtrace :paw_prints:

Debugger entered--Lisp error: (error "Package ‘emacs-27.2’ is unavailable")
  signal(error ("Package ‘emacs-27.2’ is unavailable"))
  error("Package `%s-%s' is unavailable" emacs "27.2")
  package-compute-transaction(nil ((emacs (27 2)) (s (1 12 0)) (dash (2 19 1)) (editorconfig (0 8 2)) (jsonrpc (1 0 14))))
  package-install-from-buffer()
  package-install-file("/home/user/.emacs.d/.cache/quelpa/packages/copilot...")
  (if (eq system-type 'windows-nt) (let ((insert-file-contents-literally-orig (symbol-function 'insert-file-contents-literally))) (let* ((vnew #'(lambda (file) (if ... ... ...))) (old (symbol-function 'insert-file-contents-literally))) (unwind-protect (progn (fset 'insert-file-contents-literally vnew) (let ((kill-buffer-orig ...)) (let* (... ...) (unwind-protect ... ...)))) (fset 'insert-file-contents-literally old)))) (package-install-file file))
  quelpa-package-install-file("/home/user/.emacs.d/.cache/quelpa/packages/copilot...")
  (let* ((pkg-desc (quelpa-get-package-desc file)) (requires (progn (or (and (memq (type-of pkg-desc) cl-struct-package-desc-tags) t) (signal 'wrong-type-argument (list 'package-desc pkg-desc))) (aref pkg-desc 4))) (ver (progn (or (and (memq (type-of pkg-desc) cl-struct-package-desc-tags) t) (signal 'wrong-type-argument (list 'package-desc pkg-desc))) (aref pkg-desc 2)))) (if requires (progn (mapc #'(lambda (req) (if (or ... ...) nil (quelpa-package-install ...))) requires))) (quelpa-package-install-file file) ver)
  (progn (let* ((pkg-desc (quelpa-get-package-desc file)) (requires (progn (or (and (memq ... cl-struct-package-desc-tags) t) (signal 'wrong-type-argument (list ... pkg-desc))) (aref pkg-desc 4))) (ver (progn (or (and (memq ... cl-struct-package-desc-tags) t) (signal 'wrong-type-argument (list ... pkg-desc))) (aref pkg-desc 2)))) (if requires (progn (mapc #'(lambda (req) (if ... nil ...)) requires))) (quelpa-package-install-file file) ver))
  (if file (progn (let* ((pkg-desc (quelpa-get-package-desc file)) (requires (progn (or (and ... t) (signal ... ...)) (aref pkg-desc 4))) (ver (progn (or (and ... t) (signal ... ...)) (aref pkg-desc 2)))) (if requires (progn (mapc #'(lambda ... ...) requires))) (quelpa-package-install-file file) ver)))
  (let* ((rcp (quelpa-arg-rcp arg)) (file (if rcp (progn (quelpa-build (append rcp plist)))))) (if file (progn (let* ((pkg-desc (quelpa-get-package-desc file)) (requires (progn (or ... ...) (aref pkg-desc 4))) (ver (progn (or ... ...) (aref pkg-desc 2)))) (if requires (progn (mapc #'... requires))) (quelpa-package-install-file file) ver))))
  quelpa-package-install((copilot :fetcher github :repo "zerolfx/copilot.el" :files ("*.el" "dist")))
  apply(quelpa-package-install (copilot :fetcher github :repo "zerolfx/copilot.el" :files ("*.el" "dist")) nil)
  (and t (apply #'quelpa-package-install arg plist))
  (let* ((ver (and t (apply #'quelpa-package-install arg plist)))) (if ver (progn (if quelpa-autoremove-p (progn (quelpa--delete-obsoleted-package (car cache-item) ver))) (quelpa-update-cache cache-item)) nil))
  (let* ((arg (or arg (let ((quelpa-melpa-recipe-stores (append quelpa-melpa-recipe-stores ...))) (quelpa-interactive-candidate)))) (quelpa-upgrade-p (if current-prefix-arg t quelpa-upgrade-p)) (quelpa-stable-p quelpa-stable-p) (quelpa-autoremove-p (if current-prefix-arg t quelpa-autoremove-p)) (cache-item (quelpa-arg-rcp arg))) (quelpa-parse-plist plist) (quelpa-parse-stable cache-item) (let* ((ver (and t (apply #'quelpa-package-install arg plist)))) (if ver (progn (if quelpa-autoremove-p (progn (quelpa--delete-obsoleted-package (car cache-item) ver))) (quelpa-update-cache cache-item)) nil)))
  (progn (let* ((arg (or arg (let ((quelpa-melpa-recipe-stores ...)) (quelpa-interactive-candidate)))) (quelpa-upgrade-p (if current-prefix-arg t quelpa-upgrade-p)) (quelpa-stable-p quelpa-stable-p) (quelpa-autoremove-p (if current-prefix-arg t quelpa-autoremove-p)) (cache-item (quelpa-arg-rcp arg))) (quelpa-parse-plist plist) (quelpa-parse-stable cache-item) (let* ((ver (and t (apply #'quelpa-package-install arg plist)))) (if ver (progn (if quelpa-autoremove-p (progn (quelpa--delete-obsoleted-package ... ver))) (quelpa-update-cache cache-item)) nil))))
  (if (quelpa-setup-p) (progn (let* ((arg (or arg (let (...) (quelpa-interactive-candidate)))) (quelpa-upgrade-p (if current-prefix-arg t quelpa-upgrade-p)) (quelpa-stable-p quelpa-stable-p) (quelpa-autoremove-p (if current-prefix-arg t quelpa-autoremove-p)) (cache-item (quelpa-arg-rcp arg))) (quelpa-parse-plist plist) (quelpa-parse-stable cache-item) (let* ((ver (and t (apply ... arg plist)))) (if ver (progn (if quelpa-autoremove-p (progn ...)) (quelpa-update-cache cache-item)) nil)))))
  quelpa((copilot :fetcher github :repo "zerolfx/copilot.el" :files ("*.el" "dist")))
  (if recipe (quelpa (configuration-layer//make-quelpa-recipe pkg)) (configuration-layer//warning (concat "Cannot find any recipe for package %S! Be sure " "to add a recipe for it in alist %S.") pkg-name recipes-var))
  (let* ((pkg-name (eieio-oref pkg ':name)) (layer (car (eieio-oref pkg ':owners))) (recipe (cons pkg-name (cdr (eieio-oref pkg ':location))))) (if recipe (quelpa (configuration-layer//make-quelpa-recipe pkg)) (configuration-layer//warning (concat "Cannot find any recipe for package %S! Be sure " "to add a recipe for it in alist %S.") pkg-name recipes-var)))
  configuration-layer//install-from-recipe(#<cfgl-package cfgl-package-155917de52b0>)
  (cond ((or (null pkg) (eq 'elpa location)) (configuration-layer//install-from-elpa pkg-name) (if pkg (progn (eieio-oset pkg ':lazy-install nil)))) ((and (listp location) (eq 'recipe (car location))) (configuration-layer//install-from-recipe pkg) (eieio-oset pkg ':lazy-install nil)) (t (configuration-layer//warning "Cannot install package %S." pkg-name)))
  (condition-case err (cond ((or (null pkg) (eq 'elpa location)) (configuration-layer//install-from-elpa pkg-name) (if pkg (progn (eieio-oset pkg ':lazy-install nil)))) ((and (listp location) (eq 'recipe (car location))) (configuration-layer//install-from-recipe pkg) (eieio-oset pkg ':lazy-install nil)) (t (configuration-layer//warning "Cannot install package %S." pkg-name))) ((debug quote error) (configuration-layer//error (concat "\nAn error occurred while installing %s " "(error: %s)\n") pkg-name err) (spacemacs//redisplay)))
  (if (package-installed-p pkg-name min-version) nil (condition-case err (cond ((or (null pkg) (eq 'elpa location)) (configuration-layer//install-from-elpa pkg-name) (if pkg (progn (eieio-oset pkg ':lazy-install nil)))) ((and (listp location) (eq 'recipe (car location))) (configuration-layer//install-from-recipe pkg) (eieio-oset pkg ':lazy-install nil)) (t (configuration-layer//warning "Cannot install package %S." pkg-name))) ((debug quote error) (configuration-layer//error (concat "\nAn error occurred while installing %s " "(error: %s)\n") pkg-name err) (spacemacs//redisplay))))
  (let* ((layer (if pkg (progn (car (eieio-oref pkg ':owners))))) (location (if pkg (progn (eieio-oref pkg ':location)))) (min-version (if pkg (progn (eieio-oref pkg ':min-version))))) (spacemacs-buffer/replace-last-line (format "--> installing %s: %s%s... [%s/%s]" (if layer "package" "dependency") pkg-name (if layer (format "@%S" layer) "") installed-count not-inst-count) t) (spacemacs//redisplay) (if (package-installed-p pkg-name min-version) nil (condition-case err (cond ((or (null pkg) (eq 'elpa location)) (configuration-layer//install-from-elpa pkg-name) (if pkg (progn (eieio-oset pkg ... nil)))) ((and (listp location) (eq 'recipe (car location))) (configuration-layer//install-from-recipe pkg) (eieio-oset pkg ':lazy-install nil)) (t (configuration-layer//warning "Cannot install package %S." pkg-name))) ((debug quote error) (configuration-layer//error (concat "\nAn error occurred while installing %s " "(error: %s)\n") pkg-name err) (spacemacs//redisplay)))))
  configuration-layer//install-package(#<cfgl-package cfgl-package-155917de52b0> copilot 1 1)
  (if (and pkg (memq (eieio-oref pkg ':step) '(bootstrap pre))) nil (setq installed-count (1+ installed-count)) (configuration-layer//install-package pkg pkg-name installed-count not-inst-count))
  (let ((pkg (configuration-layer/get-package pkg-name))) (if (and pkg (memq (eieio-oref pkg ':step) '(bootstrap pre))) nil (setq installed-count (1+ installed-count)) (configuration-layer//install-package pkg pkg-name installed-count not-inst-count)))
  (let ((pkg-name (car --dolist-tail--))) (let ((pkg (configuration-layer/get-package pkg-name))) (if (and pkg (memq (eieio-oref pkg ':step) '(bootstrap pre))) nil (setq installed-count (1+ installed-count)) (configuration-layer//install-package pkg pkg-name installed-count not-inst-count))) (setq --dolist-tail-- (cdr --dolist-tail--)))
  (while --dolist-tail-- (let ((pkg-name (car --dolist-tail--))) (let ((pkg (configuration-layer/get-package pkg-name))) (if (and pkg (memq (eieio-oref pkg ':step) '(bootstrap pre))) nil (setq installed-count (1+ installed-count)) (configuration-layer//install-package pkg pkg-name installed-count not-inst-count))) (setq --dolist-tail-- (cdr --dolist-tail--))))
  (let ((--dolist-tail-- upkg-names)) (while --dolist-tail-- (let ((pkg-name (car --dolist-tail--))) (let ((pkg (configuration-layer/get-package pkg-name))) (if (and pkg (memq (eieio-oref pkg ...) '...)) nil (setq installed-count (1+ installed-count)) (configuration-layer//install-package pkg pkg-name installed-count not-inst-count))) (setq --dolist-tail-- (cdr --dolist-tail--)))))
  (let ((delayed-warnings-backup delayed-warnings-list)) (spacemacs-buffer/append (format "Found %s new package(s) to install...\n" not-inst-count)) (configuration-layer/retrieve-package-archives) (setq installed-count 0) (spacemacs//redisplay) (let ((--dolist-tail-- upkg-names)) (while --dolist-tail-- (let ((pkg-name (car --dolist-tail--))) (let ((pkg (configuration-layer/get-package pkg-name))) (if (and pkg (memq ... ...)) (progn (setq installed-count ...) (configuration-layer//install-package pkg pkg-name installed-count not-inst-count)))) (setq --dolist-tail-- (cdr --dolist-tail--))))) (let ((--dolist-tail-- upkg-names)) (while --dolist-tail-- (let ((pkg-name (car --dolist-tail--))) (let ((pkg (configuration-layer/get-package pkg-name))) (if (and pkg (memq ... ...)) nil (setq installed-count (1+ installed-count)) (configuration-layer//install-package pkg pkg-name installed-count not-inst-count))) (setq --dolist-tail-- (cdr --dolist-tail--))))) (spacemacs-buffer/append "\n") (if init-file-debug nil (setq delayed-warnings-list delayed-warnings-backup)))
  (progn (spacemacs-buffer/set-mode-line "Installing packages..." t) (let ((delayed-warnings-backup delayed-warnings-list)) (spacemacs-buffer/append (format "Found %s new package(s) to install...\n" not-inst-count)) (configuration-layer/retrieve-package-archives) (setq installed-count 0) (spacemacs//redisplay) (let ((--dolist-tail-- upkg-names)) (while --dolist-tail-- (let ((pkg-name (car --dolist-tail--))) (let ((pkg ...)) (if (and pkg ...) (progn ... ...))) (setq --dolist-tail-- (cdr --dolist-tail--))))) (let ((--dolist-tail-- upkg-names)) (while --dolist-tail-- (let ((pkg-name (car --dolist-tail--))) (let ((pkg ...)) (if (and pkg ...) nil (setq installed-count ...) (configuration-layer//install-package pkg pkg-name installed-count not-inst-count))) (setq --dolist-tail-- (cdr --dolist-tail--))))) (spacemacs-buffer/append "\n") (if init-file-debug nil (setq delayed-warnings-list delayed-warnings-backup))))
  (if upkg-names (progn (spacemacs-buffer/set-mode-line "Installing packages..." t) (let ((delayed-warnings-backup delayed-warnings-list)) (spacemacs-buffer/append (format "Found %s new package(s) to install...\n" not-inst-count)) (configuration-layer/retrieve-package-archives) (setq installed-count 0) (spacemacs//redisplay) (let ((--dolist-tail-- upkg-names)) (while --dolist-tail-- (let ((pkg-name ...)) (let (...) (if ... ...)) (setq --dolist-tail-- (cdr --dolist-tail--))))) (let ((--dolist-tail-- upkg-names)) (while --dolist-tail-- (let ((pkg-name ...)) (let (...) (if ... nil ... ...)) (setq --dolist-tail-- (cdr --dolist-tail--))))) (spacemacs-buffer/append "\n") (if init-file-debug nil (setq delayed-warnings-list delayed-warnings-backup)))))
  (let* ((upkg-names (configuration-layer//get-to-install-packages packages)) (not-inst-count (length upkg-names)) installed-count) (if upkg-names (progn (spacemacs-buffer/set-mode-line "Installing packages..." t) (let ((delayed-warnings-backup delayed-warnings-list)) (spacemacs-buffer/append (format "Found %s new package(s) to install...\n" not-inst-count)) (configuration-layer/retrieve-package-archives) (setq installed-count 0) (spacemacs//redisplay) (let ((--dolist-tail-- upkg-names)) (while --dolist-tail-- (let (...) (let ... ...) (setq --dolist-tail-- ...)))) (let ((--dolist-tail-- upkg-names)) (while --dolist-tail-- (let (...) (let ... ...) (setq --dolist-tail-- ...)))) (spacemacs-buffer/append "\n") (if init-file-debug nil (setq delayed-warnings-list delayed-warnings-backup))))))
  (let ((display-buffer-alist '(("\\(\\*Compile-Log\\*\\)\\|\\(\\*Warnings\\*\\)" (display-buffer-in-side-window) (inhibit-same-window . t) (side . bottom) (window-height . 0.2))))) (configuration-layer//configure-quelpa) (let* ((upkg-names (configuration-layer//get-to-install-packages packages)) (not-inst-count (length upkg-names)) installed-count) (if upkg-names (progn (spacemacs-buffer/set-mode-line "Installing packages..." t) (let ((delayed-warnings-backup delayed-warnings-list)) (spacemacs-buffer/append (format "Found %s new package(s) to install...\n" not-inst-count)) (configuration-layer/retrieve-package-archives) (setq installed-count 0) (spacemacs//redisplay) (let ((--dolist-tail-- upkg-names)) (while --dolist-tail-- (let ... ... ...))) (let ((--dolist-tail-- upkg-names)) (while --dolist-tail-- (let ... ... ...))) (spacemacs-buffer/append "\n") (if init-file-debug nil (setq delayed-warnings-list delayed-warnings-backup)))))))
  configuration-layer//install-packages((ac-ispell ace-jump-helm-line ace-link ace-window afternoon-theme aggressive-indent alect-themes all-the-icons ample-theme ample-zen-theme anti-zenburn-theme apropospriate-theme async auto-compile auto-complete auto-highlight-symbol auto-yasnippet avy badwolf-theme bind-key bind-map birds-of-paradise-plus-theme bubbleberry-theme busybee-theme centered-cursor-mode cherry-blossom-theme chocolate-theme clean-aindent-mode clues-theme color-theme-sanityinc-solarized color-theme-sanityinc-tomorrow column-enforce-mode company company-web copilot css-mode csv-mode cyberpunk-theme dakrone-theme darkmine-theme darkokai-theme darktooth-theme dash define-word desktop devdocs diminish dired-quick-sort django-theme doom-themes ...))
  (let ((packages (append (configuration-layer//filter-distant-packages configuration-layer--used-packages t #'(lambda (pkg) (not ...))) (if (eq 'all dotspacemacs-install-packages) (progn (let (all-other-packages) (let ... ...) (configuration-layer//filter-distant-packages all-other-packages nil))))))) (configuration-layer//install-packages packages) (if (and (or (eq 'used dotspacemacs-install-packages) (eq 'used-only dotspacemacs-install-packages)) (not configuration-layer-force-distribution) (not configuration-layer-exclude-all-layers)) (progn (configuration-layer/delete-orphan-packages packages))))
  (progn (let ((packages (append (configuration-layer//filter-distant-packages configuration-layer--used-packages t #'(lambda ... ...)) (if (eq 'all dotspacemacs-install-packages) (progn (let ... ... ...)))))) (configuration-layer//install-packages packages) (if (and (or (eq 'used dotspacemacs-install-packages) (eq 'used-only dotspacemacs-install-packages)) (not configuration-layer-force-distribution) (not configuration-layer-exclude-all-layers)) (progn (configuration-layer/delete-orphan-packages packages)))))
  (if spacemacs-sync-packages (progn (let ((packages (append (configuration-layer//filter-distant-packages configuration-layer--used-packages t #'...) (if (eq ... dotspacemacs-install-packages) (progn ...))))) (configuration-layer//install-packages packages) (if (and (or (eq 'used dotspacemacs-install-packages) (eq 'used-only dotspacemacs-install-packages)) (not configuration-layer-force-distribution) (not configuration-layer-exclude-all-layers)) (progn (configuration-layer/delete-orphan-packages packages))))))
  configuration-layer//load()
  (cond (changed-since-last-dump-p (configuration-layer//load) (if (spacemacs/emacs-with-pdumper-set-p) (progn (configuration-layer/message "Layer list has changed since last dump.") (configuration-layer//dump-emacs)))) (spacemacs-force-dump (configuration-layer//load) (if (spacemacs/emacs-with-pdumper-set-p) (progn (configuration-layer/message (concat "--force-dump passed on the command line or configu..." "been reloaded, forcing a redump.")) (configuration-layer//dump-emacs)))) ((spacemacs-is-dumping-p) (configuration-layer//load)) ((and (spacemacs/emacs-with-pdumper-set-p) (spacemacs-run-from-dump-p)) (configuration-layer/message "Running from a dumped file. Skipping the loading p...")) (t (configuration-layer//load) (if (spacemacs/emacs-with-pdumper-set-p) (progn (configuration-layer/message (concat "Layer list has not changed since last time. " "Skipping dumping process!"))))))
  configuration-layer/load()
  (let ((please-do-not-disable-file-name-handler-alist nil)) (require 'core-spacemacs) (spacemacs/dump-restore-load-path) (configuration-layer/load-lock-file) (spacemacs/init) (configuration-layer/stable-elpa-init) (configuration-layer/load) (spacemacs-buffer/display-startup-note) (spacemacs/setup-startup-hook) (spacemacs/dump-eval-delayed-functions) (if (and dotspacemacs-enable-server (not (spacemacs-is-dumping-p))) (progn (require 'server) (if dotspacemacs-server-socket-dir (progn (setq server-socket-dir dotspacemacs-server-socket-dir))) (if (server-running-p) nil (message "Starting a server...") (server-start)))))
  (if (not (version<= spacemacs-emacs-min-version emacs-version)) (error (concat "Your version of Emacs (%s) is too old. " "Spacemacs requires Emacs version %s or above.") emacs-version spacemacs-emacs-min-version) (let ((please-do-not-disable-file-name-handler-alist nil)) (require 'core-spacemacs) (spacemacs/dump-restore-load-path) (configuration-layer/load-lock-file) (spacemacs/init) (configuration-layer/stable-elpa-init) (configuration-layer/load) (spacemacs-buffer/display-startup-note) (spacemacs/setup-startup-hook) (spacemacs/dump-eval-delayed-functions) (if (and dotspacemacs-enable-server (not (spacemacs-is-dumping-p))) (progn (require 'server) (if dotspacemacs-server-socket-dir (progn (setq server-socket-dir dotspacemacs-server-socket-dir))) (if (server-running-p) nil (message "Starting a server...") (server-start))))))
  eval-buffer(#<buffer  *load*> nil "/home/user/.emacs.d/init.el" nil t)  ; Reading at buffer position 3366
  load-with-code-conversion("/home/user/.emacs.d/init.el" "/home/user/.emacs.d/init.el" t t)
  load("/home/user/.emacs.d/init" noerror nomessage)
  startup--load-user-init-file(#f(compiled-function () #<bytecode 0x15591757ce45>) #f(compiled-function () #<bytecode 0x15591757ce59>) t)
  command-line()
  normal-top-level()
invisiblegaudi commented 6 months ago

fixed by removing emacs and installing emacs28 from https://launchpad.net/~kelleyk/+archive/ubuntu/emacs