help-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

function with multiple symbol instructions


From: Heime
Subject: function with multiple symbol instructions
Date: Tue, 27 Aug 2024 13:16:16 +0000

I want a function to have the capability of passing multiple
symbol instructions in its argument.  I am using mapc to parse
the symbols.  Is this a good way as implementation goes ?


(defun marsot (&optional actn-list)
  "Add marsot path and requirements."

  ;; Check each symbol in actm-list
  (mapc (lambda (actn)
          (cond ( (eq actn 'armg)
                    (add-to-list 'load-path "~/Opstk/bin/marsot"))

                ( (eq actn 'go)
                    (require 'marsot)
                    (marsot-start))

                (t  (message "Unknown ACTN value: %s" actn))))
        actn-list)))





reply via email to

[Prev in Thread] Current Thread [Next in Thread]