Hello, Michael Brand <michael.ch.br...@gmail.com> writes:
> + ;; FIXME: Remove this check when most default installations of > + ;; Emacs have at least Org 9.0. > + (let ((arglist (help-function-arglist cmd))) > + (when (or (memq '&optional arglist) > + (memq '&rest arglist) > + (/= 2 (length arglist))) > + (user-error > + (format > + "%s%s%S" > + "Please see Org News for version 9.0 about `org-file-apps', " > + "this function signature is wrong: " > + cmd)))) I have the feeling there is some over-engineering involved there. In any case, instead of relying on `help-function-arglist', I suggest to use something lightweight: (condition-case err (funcall ...) (wrong-number-of-arguments (user-error "Please ...")) (invalid-function (user-error "Please ..."))) Regards, -- Nicolas Goaziou