Function: erc--with-entrypoint-environment

erc--with-entrypoint-environment is a macro defined in erc.el.gz.

Signature

(erc--with-entrypoint-environment ENV &rest BODY)

Documentation

Run BODY with bindings from ENV alist.

Source Code

;; Defined in /usr/src/emacs/lisp/erc/erc.el.gz
(defmacro erc--with-entrypoint-environment (env &rest body)
  "Run BODY with bindings from ENV alist."
  (declare (indent 1))
  (let ((syms (make-symbol "syms"))
        (vals (make-symbol "vals")))
    `(let (,syms ,vals)
       (pcase-dolist (`(,k . ,v) ,env) (push k ,syms) (push v ,vals))
       (cl-progv ,syms ,vals
         ,@body))))