Re: Invalid function error when loading elisp through native compilation

[Michael Heerdegen]

"picnoir" <picnoir@alternativebit.fr> writes:

>   Invalid function: (my-repo-pins--query-github-owner-repo "test" "test"
>   (lambda (result) (let ((new-state (if (null result) 'not-found
>   result))) (my-repo-pins--update-forges-state "GitHub.com" new-state
>   "test/test"))))

#+begin_src emacs-lisp
(defun my-repo-pins--query-forge-fetchers ..2..
  (let* ((parsed-repo-query
          (my-repo-pins--parse-repo-identifier repo-query))..1..)
    (cond
     ((equal repo-query-kind 'owner-repo)
      (seq-map
       (lambda (forge)
         (let* ((owner (alist-get 'owner parsed-repo-query))..3..)
           (apply `(,fetch-func
                    ,owner
                    ,repo
                    (lambda (result)..3..))))) ...)))))
#+end_src
                  ^^^^^^^^^^^^^^^^^^^^^^^  !

This argument to apply is not a valid function value.  Signature of
`apply' is (apply FUN . ARGS) - you are specifying only one list as first
arg FUN.


Michael.