Re: Defining functions on the fly

[Alexis]

Andreas Röhler <andreas.roehler@easy-emacs.de> writes:

> Seems (intern... is not evaluated at this point:
>
> (defvar pfxd "pfxd-")
>
> (defun (intern (concat pfxd "-foo")) ())

You're right, sorry! When i use `intern' like this, it's in the 
context of quasiquoting, e.g.:

   (eval `(defun ,(intern (concat "ewmctrl-select-window-" 
   chosen-char "-for-action")) () 
            ,(concat "Select window '" chosen-char "' for an 
            action.")  (interactive) (ewmctrl--dispatch-action 
            ,chosen-char)))


Alexis.