Paste number 304676: guix-hydra-latest-builds error

Paste number 304676: guix-hydra-latest-builds error
Pasted by: civodul
When:6 years, 7 months ago
Share:Tweet this! | http://paste.lisp.org/+6J38
Channel:None
Paste contents:
Raw Source | XML | Display As
Debugger entered--Lisp error: (void-function guix-keyword-args-let)
  (guix-keyword-args-let args ((parent-group :parent-group (quote guix)) (parent-faces-group :parent-faces-group (quote guix-faces)) (group-doc :group-doc (format "Settings for '%s' buffers." type-str)) (faces-group-doc :faces-group-doc (format "Faces for '%s' buffers." type-str))) (list (quote progn) (list (quote defgroup) group nil group-doc (quote :group) (list (quote quote) parent-group)) (list (quote defgroup) faces-group nil faces-group-doc (quote :group) (list (quote quote) group) (quote :group) (list (quote quote) parent-faces-group))))
  (let* ((type-str (symbol-name type)) (prefix (concat "guix-" type-str)) (group (intern prefix)) (faces-group (intern (concat prefix "-faces")))) (guix-keyword-args-let args ((parent-group :parent-group (quote guix)) (parent-faces-group :parent-faces-group (quote guix-faces)) (group-doc :group-doc (format "Settings for '%s' buffers." type-str)) (faces-group-doc :faces-group-doc (format "Faces for '%s' buffers." type-str))) (list (quote progn) (list (quote defgroup) group nil group-doc (quote :group) (list (quote quote) parent-group)) (list (quote defgroup) faces-group nil faces-group-doc (quote :group) (list (quote quote) group) (quote :group) (list (quote quote) parent-faces-group)))))
  (closure (cl-struct-guix-buffer-item-tags t) (type &rest args) "Define `guix-TYPE' and `guix-TYPE-faces' custom groups.\nRemaining arguments (ARGS) should have a form [KEYWORD VALUE] ...\n\nOptional keywords:\n\n  - `:parent-group' - name of a parent custom group.\n\n  - `:parent-faces-group' - name of a parent custom faces group.\n\n  - `:group-doc' - docstring of a `guix-TYPE' group.\n\n  - `:faces-group-doc' - docstring of a `guix-TYPE-faces' group." (let* ((type-str (symbol-name type)) (prefix (concat "guix-" type-str)) (group (intern prefix)) (faces-group (intern (concat prefix "-faces")))) (guix-keyword-args-let args ((parent-group :parent-group (quote guix)) (parent-faces-group :parent-faces-group (quote guix-faces)) (group-doc :group-doc (format "Settings for '%s' buffers." type-str)) (faces-group-doc :faces-group-doc (format "Faces for '%s' buffers." type-str))) (list (quote progn) (list (quote defgroup) group nil group-doc (quote :group) (list (quote quote) parent-group)) (list (quote defgroup) faces-group nil faces-group-doc (quote :group) (list (quote quote) group) (quote :group) (list (quote quote) parent-faces-group))))))(hydra)
  (guix-define-groups hydra)
  eval-buffer(#<buffer  *load*-445999> nil "/home/ludo/src/guix/emacs/guix-hydra.el" nil t)  ; Reading at buffer position 1078
  load-with-code-conversion("/home/ludo/src/guix/emacs/guix-hydra.el" "/home/ludo/src/guix/emacs/guix-hydra.el" nil t)
  require(guix-hydra)
  eval-buffer(#<buffer  *load*> nil "/home/ludo/src/guix/emacs/guix-hydra-build.el" nil t)  ; Reading at buffer position 1035
  load-with-code-conversion("/home/ludo/src/guix/emacs/guix-hydra-build.el" "/home/ludo/src/guix/emacs/guix-hydra-build.el" nil t)
  autoload-do-load((autoload "guix-hydra-build" "Display latest NUMBER of Hydra builds.\nARGS are the same arguments as for `guix-hydra-build-latest-api-url'.\nInteractively, prompt for NUMBER.  With prefix argument, prompt\nfor all ARGS.\n\n(fn NUMBER &rest ARGS)" t nil) guix-hydra-latest-builds)
  command-execute(guix-hydra-latest-builds record)
  execute-extended-command(nil "guix-hydra-latest-builds")
  call-interactively(execute-extended-command nil nil)
  command-execute(execute-extended-command)

This paste has no annotations.

Colorize as:
Show Line Numbers

Lisppaste pastes can be made by anyone at any time. Imagine a fearsomely comprehensive disclaimer of liability. Now fear, comprehensively.