Function: let-alist--access-sexp

let-alist--access-sexp is a byte-compiled function defined in let-alist.el.gz.

Signature

(let-alist--access-sexp SYMBOL VARIABLE)

Documentation

Return a sexp used to access SYMBOL inside VARIABLE.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/let-alist.el.gz
(defun let-alist--access-sexp (symbol variable)
  "Return a sexp used to access SYMBOL inside VARIABLE."
  (let* ((clean (let-alist--remove-dot symbol))
         (name (symbol-name clean)))
    (if (string-match "\\`\\." name)
        clean
      (let-alist--list-to-sexp
       (mapcar #'read (nreverse (split-string name "\\.")))
       variable))))