about summary refs log tree commit diff
path: root/emacs/.emacs.d/elpa/let-alist-1.0.5/let-alist-autoloads.el
diff options
context:
space:
mode:
authorBen Harris <ben@tilde.team>2018-10-01 00:51:07 -0400
committerBen Harris <ben@tilde.team>2018-10-01 00:51:07 -0400
commitdb4a4fa9b74f49615aea0fd5f08c2322e1188a4a (patch)
treec57758c4138ea96f0825b6463b6b4a7d8ef012ed /emacs/.emacs.d/elpa/let-alist-1.0.5/let-alist-autoloads.el
parent54ed1fc2973e0314a1756256ed7626684c349b98 (diff)
import sublime and vscode settings
Diffstat (limited to 'emacs/.emacs.d/elpa/let-alist-1.0.5/let-alist-autoloads.el')
-rw-r--r--emacs/.emacs.d/elpa/let-alist-1.0.5/let-alist-autoloads.el50
1 files changed, 50 insertions, 0 deletions
diff --git a/emacs/.emacs.d/elpa/let-alist-1.0.5/let-alist-autoloads.el b/emacs/.emacs.d/elpa/let-alist-1.0.5/let-alist-autoloads.el
new file mode 100644
index 0000000..4fa674a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/let-alist-1.0.5/let-alist-autoloads.el
@@ -0,0 +1,50 @@
+;;; let-alist-autoloads.el --- automatically extracted autoloads
+;;
+;;; Code:
+(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
+
+;;;### (autoloads nil "let-alist" "let-alist.el" (23473 23425 443117
+;;;;;;  629000))
+;;; Generated autoloads from let-alist.el
+
+(autoload 'let-alist "let-alist" "\
+Let-bind dotted symbols to their cdrs in ALIST and execute BODY.
+Dotted symbol is any symbol starting with a `.'.  Only those present
+in BODY are let-bound and this search is done at compile time.
+
+For instance, the following code
+
+  (let-alist alist
+    (if (and .title .body)
+        .body
+      .site
+      .site.contents))
+
+essentially expands to
+
+  (let ((.title (cdr (assq \\='title alist)))
+        (.body  (cdr (assq \\='body alist)))
+        (.site  (cdr (assq \\='site alist)))
+        (.site.contents (cdr (assq \\='contents (cdr (assq \\='site alist))))))
+    (if (and .title .body)
+        .body
+      .site
+      .site.contents))
+
+If you nest `let-alist' invocations, the inner one can't access
+the variables of the outer one. You can, however, access alists
+inside the original alist by using dots inside the symbol, as
+displayed in the example above.
+
+\(fn ALIST &rest BODY)" nil t)
+
+(function-put 'let-alist 'lisp-indent-function '1)
+
+;;;***
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; End:
+;;; let-alist-autoloads.el ends here