Structuring a list to run sequence of commands

Structuring a list to run sequence of commands

[Heime via Users list for the GNU Emacs text editor]

Have been hoping to grouping a sequence of commands and execute each one.

But am getting 

Debugger entered--Lisp error: (invalid-function (add-to-list 'load-path (marnap-sec-fpln-waypt "NAPLN")))
  ((add-to-list 'load-path (marnap-sec-fpln-waypt "NAPLN")) (require 'napoleon))
  eval(((add-to-list 'load-path (marnap-sec-fpln-waypt "NAPLN")) (require 'napoleon)))
  (let ((cmd (car tail))) (eval cmd) (setq tail (cdr tail)))

I want to ensures that each command in lookup-alist for options 'armg 
and 'go are evaluated independently.

The call I use is (marnap '(armg go))

(defun marnap (&optional actm-service)

  (let ( (lookup-alist '((armg ((add-to-list 'load-path
                                  (marnap-sec-fpln-waypt "NAPLN"))
                                (require 'napoleon)) )

                         (go   ((napoleon-tachyon 'go)) ) )) )

    (dolist (actm actm-service)

      (let ( (fnlist (cdr (assoc actm lookup-alist))) )
        (if fnlist
             ;; Iterate over list of commands and evaluate each
             (dolist (cmd fnlist)
               (eval cmd))  ; Evaluate command as a list
          (message "ACTM Unrecognised: '%s\n" actm))) )) )

Re: Structuring a list to run sequence of commands

[Joel Reicher]

Heime via Users list for the GNU Emacs text editor 
<help-gnu-emacs@gnu.org> writes:

> Have been hoping to grouping a sequence of commands and execute 
> each one.

Isn't this just what progn does?

Regards,

        - Joel