First Commit

This commit is contained in:
Chris Cochrun 2021-02-16 09:06:14 -06:00
commit f894d49407
854 changed files with 20637 additions and 0 deletions

3
eshell/history Normal file
View file

@ -0,0 +1,3 @@
make autoloads
make
exit

152
init.el Normal file
View file

@ -0,0 +1,152 @@
;;; init.el -*- lexical-binding: t; -*-
(setq inhibit-startup-message t)
(scroll-bar-mode -1)
(tool-bar-mode -1)
(tooltip-mode -1)
(set-fringe-mode 10)
(menu-bar-mode -1)
(blink-cursor-mode -1)
(column-number-mode +1)
(set-face-attribute 'default nil :font "VictorMono Nerd Font" :height 120)
(setq display-line-numbers-type 'relative)
(global-set-key (kbd "<escape>") 'keyboard-escape-quit)
(defvar bootstrap-version)
(let ((bootstrap-file
(expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory))
(bootstrap-version 5))
(unless (file-exists-p bootstrap-file)
(with-current-buffer
(url-retrieve-synchronously
"https://raw.githubusercontent.com/raxod502/straight.el/develop/install.el"
'silent 'inhibit-cookies)
(goto-char (point-max))
(eval-print-last-sexp)))
(load bootstrap-file nil 'nomessage))
(setq straight-use-package-by-default t)
(straight-use-package 'use-package)
(use-package command-log-mode)
(use-package all-the-icons)
(use-package doom-modeline
:ensure t
:init
(doom-modeline-mode 1)
(setq doom-modeline-height 35
doom-modeline-bar-width 3
all-the-icons-scale-factor 0.9))
(use-package doom-themes
:ensure t
:init (load-theme 'doom-snazzy t))
(use-package rainbow-delimiters
:hook (prog-mode . rainbow-delimiters-mode))
(use-package which-key
:init (which-key-mode)
:config
(setq which-key-idle-delay 0.3))
(use-package evil
:init
(setq evil-want-integration t
evil-want-keybinding nil
evil-want-C-i-jump nil
evil-want-C-u-scroll t
evil-want-C-u-delete t)
:config
(evil-mode +1))
(use-package evil-collection
:after evil
:config (evil-collection-init))
(use-package general
:init
(general-evil-setup)
:config
(general-create-definer chris/leader-keys
:keymaps '(normal visual emacs)
:prefix "SPC")
(chris/leader-keys
"t" '(:ignore t :which-key "toggle")
"f" '(:ignore t :which-key "file")
"w" '(:ignore t :which-key "window")
"tt" '(consult-theme :which-key "choose theme")
"ff" '(find-file :which-key "find file")
"fs" '(save-buffer :which-key "save")
"ww" '(other-window :which-key "other window")
))
(use-package evil-escape
:after evil
:init (evil-escape-mode +1)
:config (setq evil-escape-key-sequence "fd"))
(use-package prescient
:config
(prescient-persist-mode +1))
(use-package consult)
;; Enable richer annotations using the Marginalia package
(use-package marginalia
:bind (:map minibuffer-local-map
("C-M-a" . marginalia-cycle)
;; :map embark-general-map
;; ("A" . marginalia-cycle)
)
;; The :init configuration is always executed (Not lazy!)
:init
;; Must be in the :init section of use-package such that the mode gets
;; enabled right away. Note that this forces loading the package.
(marginalia-mode)
;; When using Selectrum, ensure that Selectrum is refreshed when cycling annotations.
(advice-add #'marginalia-cycle :after
(lambda () (when (bound-and-true-p selectrum-mode) (selectrum-exhibit))))
;; Prefer richer, more heavy, annotations over the lighter default variant.
(setq marginalia-annotators '(marginalia-annotators-heavy marginalia-annotators-light nil)))
(use-package helpful
:config
)
(use-package org
:config
(setq org-startup-indented t)
(defun chris/org-babel-tangle-config ()
(when (string-equal (buffer-file-name)
(expand-file-name "~/.personal-emacs/init.org"))
(let ((org-confirm-babel-evaluate nil))
(org-babel-tangle))))
(add-hook 'org-mode-hook (lambda () (add-hook 'after-save-hook #'chris/org-babel-tangle-config))))
(use-package selectrum
:init
(selectrum-mode +1)
:config
(general-define-key
:keymaps 'selectrum-minibuffer-map
"C-j" 'selectrum-next-candidate
"C-k" 'selectrum-previous-candidate
"C-S-j" 'selectrum-goto-end
"C-S-k" 'selectrum-goto-beginning
"TAB" 'selectrum-insert-current-candidate))
(use-package selectrum-prescient
:init
(selectrum-prescient-mode +1))

332
init.org Normal file
View file

@ -0,0 +1,332 @@
#+TITLE: Init
#+AUTHOR: Chris Cochrun
* Early Init
#+PROPERTY: header-args:emacs-lisp :tangle early-init.el
#+begin_src emacs-lisp :tangle no
;;; early-init.el -*- lexical-binding: t; -*-
;; Emacs 27.1 introduced early-init.el, which is run before init.el, before
;; package and UI initialization happens, and before site files are loaded.
;; A big contributor to startup times is garbage collection. We up the gc
;; threshold to temporarily prevent it from running, then reset it later by
;; enabling `gcmh-mode'. Not resetting it will cause stuttering/freezes.
(setq gc-cons-threshold most-positive-fixnum)
;; In noninteractive sessions, prioritize non-byte-compiled source files to
;; prevent the use of stale byte-code. Otherwise, it saves us a little IO time
;; to skip the mtime checks on every *.elc file.
(setq load-prefer-newer noninteractive)
;; In Emacs 27+, package initialization occurs before `user-init-file' is
;; loaded, but after `early-init-file'. Doom handles package initialization, so
;; we must prevent Emacs from doing it early!
(setq package-enable-at-startup nil)
(fset #'package--ensure-init-file #'ignore) ; DEPRECATED Removed in 28
;; `file-name-handler-alist' is consulted on every `require', `load' and various
;; path/io functions. You get a minor speed up by nooping this. However, this
;; may cause problems on builds of Emacs where its site lisp files aren't
;; byte-compiled and we're forced to load the *.el.gz files (e.g. on Alpine)
(unless (daemonp)
(defvar doom--initial-file-name-handler-alist file-name-handler-alist)
(setq file-name-handler-alist nil)
;; Restore `file-name-handler-alist' later, because it is needed for handling
;; encrypted or compressed files, among other things.
(defun doom-reset-file-handler-alist-h ()
;; Re-add rather than `setq', because changes to `file-name-handler-alist'
;; since startup ought to be preserved.
(dolist (handler file-name-handler-alist)
(add-to-list 'doom--initial-file-name-handler-alist handler))
(setq file-name-handler-alist doom--initial-file-name-handler-alist))
(add-hook 'emacs-startup-hook #'doom-reset-file-handler-alist-h))
;; Ensure Doom is running out of this file's directory
(setq user-emacs-directory (file-name-directory load-file-name))
;; Load the heart of Doom Emacs
(load (concat user-emacs-directory "core/core") nil 'nomessage)
#+end_src
* Init
#+PROPERTY: header-args:emacs-lisp :tangle init.el
** Set basic UI config
Let's start by making some basic ui changes like turning off the scrollbar, toolbar, menu, tooltips, and setting our font and some things.
#+begin_src emacs-lisp :tangle yes
;;; init.el -*- lexical-binding: t; -*-
(setq inhibit-startup-message t)
(scroll-bar-mode -1)
(tool-bar-mode -1)
(tooltip-mode -1)
(set-fringe-mode 10)
(menu-bar-mode -1)
(blink-cursor-mode -1)
(column-number-mode +1)
(set-face-attribute 'default nil :font "VictorMono Nerd Font" :height 120)
(setq display-line-numbers-type 'relative)
#+end_src
Also, real quick let's make sure that ~<escape>~ works as the same as ~<C-g>~
#+begin_src emacs-lisp :tangle yes
(global-set-key (kbd "<escape>") 'keyboard-escape-quit)
#+end_src
** Let's bootstrap straight.el
#+begin_src emacs-lisp :tangle yes
(defvar bootstrap-version)
(let ((bootstrap-file
(expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory))
(bootstrap-version 5))
(unless (file-exists-p bootstrap-file)
(with-current-buffer
(url-retrieve-synchronously
"https://raw.githubusercontent.com/raxod502/straight.el/develop/install.el"
'silent 'inhibit-cookies)
(goto-char (point-max))
(eval-print-last-sexp)))
(load bootstrap-file nil 'nomessage))
(setq straight-use-package-by-default t)
(straight-use-package 'use-package)
#+end_src
#+begin_src emacs-lisp :tangle yes
(use-package command-log-mode)
#+end_src
#+begin_src emacs-lisp :tangle yes
(use-package all-the-icons)
#+end_src
#+begin_src emacs-lisp :tangle yes
(use-package doom-modeline
:ensure t
:init
(doom-modeline-mode 1)
(setq doom-modeline-height 35
doom-modeline-bar-width 3
all-the-icons-scale-factor 0.9))
#+end_src
#+begin_src emacs-lisp :tangle yes
(use-package doom-themes
:ensure t
:init (load-theme 'doom-snazzy t))
#+end_src
#+begin_src emacs-lisp :tangle yes
(use-package rainbow-delimiters
:hook (prog-mode . rainbow-delimiters-mode))
#+end_src
#+begin_src emacs-lisp :tangle yes
(use-package which-key
:init (which-key-mode)
:config
(setq which-key-idle-delay 0.3))
#+end_src
** Keybindings
There are two major packages we need to get the functionality I desire. Evil and general.
#+begin_src emacs-lisp :tangle yes
(use-package evil
:init
(setq evil-want-integration t
evil-want-keybinding nil
evil-want-C-i-jump nil
evil-want-C-u-scroll t
evil-want-C-u-delete t)
:config
(evil-mode +1))
#+end_src
This evil-collection package includes a lot of other evil based things.
#+begin_src emacs-lisp :tangle yes
(use-package evil-collection
:after evil
:config (evil-collection-init))
#+end_src
#+begin_src emacs-lisp :tangle yes
(use-package general
:init
(general-evil-setup)
:config
(general-create-definer chris/leader-keys
:keymaps '(normal visual emacs)
:prefix "SPC")
(chris/leader-keys
"t" '(:ignore t :which-key "toggle")
"f" '(:ignore t :which-key "file")
"w" '(:ignore t :which-key "window")
"tt" '(consult-theme :which-key "choose theme")
"ff" '(find-file :which-key "find file")
"fs" '(save-buffer :which-key "save")
"ww" '(other-window :which-key "other window")
))
#+end_src
#+begin_src emacs-lisp :tangle yes
(use-package evil-escape
:after evil
:init (evil-escape-mode +1)
:config (setq evil-escape-key-sequence "fd"))
#+end_src
** Completion
*** SELECTRUM
I prefer selectrum over Ivy or Helm for completions. It is using the basic completing read system and therefore it is more inline with basic emacs. Also, let's add prescient to be able to filter selectrum well. We'll add some keybindings too for easier navigation on the home row.
#+BEGIN_SRC elisp :tangle yes
(use-package selectrum
:init
(selectrum-mode +1)
:config
(general-define-key
:keymaps 'selectrum-minibuffer-map
"C-j" 'selectrum-next-candidate
"C-k" 'selectrum-previous-candidate
"C-S-j" 'selectrum-goto-end
"C-S-k" 'selectrum-goto-beginning
"TAB" 'selectrum-insert-current-candidate))
#+END_SRC
We need prescient so we can have smarter sorting and filtering by default. Ontop of that, setting persistance in prescient makes it get better over time.
#+begin_src emacs-lisp :tangle yes
(use-package prescient
:config
(prescient-persist-mode +1))
#+end_src
#+BEGIN_SRC elisp :tangle yes
(use-package selectrum-prescient
:init
(selectrum-prescient-mode +1))
#+END_SRC
#+BEGIN_SRC elisp :tangle no
;; enable company use of prescient
(company-prescient-mode +1)
;; enable magit to read with prescient
(setq magit-completing-read-function #'selectrum-completing-read)
#+END_SRC
Here we use posframe to make a prettier minibuffer. Posframe will work with EXWM with some tweaking, but I only stole some code for Ivy's posframe version, not selectrum's. So, I'll need to work on that.
#+BEGIN_SRC elisp :tangle no
(setq selectrum-display-action '(display-buffer-show-in-posframe))
(setq selectrum-display-action nil)
(defun display-buffer-show-in-posframe (buffer _alist)
(frame-root-window
(posframe-show buffer
:min-height 10
:min-width (/ (frame-width) 2)
:internal-border-width 1
:left-fringe 18
:right-fringe 18
:parent-frame nil
:z-group 'above
:poshandler 'posframe-poshandler-frame-center)))
(add-hook 'minibuffer-exit-hook 'posframe-delete-all)
#+END_SRC
#+RESULTS:
| exwm-input--on-minibuffer-exit | posframe-delete-all |
This is similar but using mini-frame. Mini-frame works well, but not if using exwm. With exwm the X windows get displayed above the mini-frame, so the minibuffer isn't visible. Best to let Selectrum or Consult push the frame up and view the vertical completions below the frame.
#+BEGIN_SRC elisp :tangle no
(mini-frame-mode +1)
(mini-frame-mode -1)
(setq resize-mini-frames t)
(custom-set-variables
'(mini-frame-show-parameters
'((top . 400)
(width . 0.7)
(left . 0.5))))
;; workaround bug#44080, should be fixed in version 27.2 and above, see #169
(define-advice fit-frame-to-buffer (:around (f &rest args) dont-skip-ws-for-mini-frame)
(cl-letf* ((orig (symbol-function #'window-text-pixel-size))
((symbol-function #'window-text-pixel-size)
(lambda (win from to &rest args)
(apply orig
(append (list win from
(if (and (window-minibuffer-p win)
(frame-root-window-p win)
(eq t to))
nil
to))
args)))))
(apply f args)))
#+END_SRC
#+RESULTS:
: fit-frame-to-buffer@dont-skip-ws-for-mini-frame
*** CONSULT
Consult has a lot of nice functions like Ivy's Counsel functions (enhanced searching functions), lets set some of them in the keymap so they are easily used.
#+begin_src emacs-lisp :tangle yes
(use-package consult)
#+end_src
#+begin_src emacs-lisp :tangle no
(map! :leader "s s" 'consult-line
:leader "f r" 'consult-recent-file)
#+end_src
*** MARGINALIA
Marginalia makes for some great decoration to our minibuffer completion items. Works great with Selectrum which does not have this out of the box.
#+begin_src emacs-lisp :tangle yes
;; Enable richer annotations using the Marginalia package
(use-package marginalia
:bind (:map minibuffer-local-map
("C-M-a" . marginalia-cycle)
;; :map embark-general-map
;; ("A" . marginalia-cycle)
)
;; The :init configuration is always executed (Not lazy!)
:init
;; Must be in the :init section of use-package such that the mode gets
;; enabled right away. Note that this forces loading the package.
(marginalia-mode)
;; When using Selectrum, ensure that Selectrum is refreshed when cycling annotations.
(advice-add #'marginalia-cycle :after
(lambda () (when (bound-and-true-p selectrum-mode) (selectrum-exhibit))))
;; Prefer richer, more heavy, annotations over the lighter default variant.
(setq marginalia-annotators '(marginalia-annotators-heavy marginalia-annotators-light nil)))
#+end_src
#+RESULTS:
** Help
#+begin_src emacs-lisp :tangle yes
(use-package helpful
:config
)
#+end_src
** Org Mode
Need to setup auto tangle yes
#+begin_src emacs-lisp :tangle yes
(use-package org
:config
(setq org-startup-indented t)
(defun chris/org-babel-tangle-config ()
(when (string-equal (buffer-file-name)
(expand-file-name "~/.personal-emacs/init.org"))
(let ((org-confirm-babel-evaluate nil))
(org-babel-tangle))))
(add-hook 'org-mode-hook (lambda () (add-hook 'after-save-hook #'chris/org-babel-tangle-config))))
#+end_src

1861
straight/build-cache.el Normal file

File diff suppressed because one or more lines are too long

View file

@ -0,0 +1,72 @@
;;; all-the-icons-autoloads.el --- automatically extracted autoloads -*- lexical-binding: t -*-
;;
;;; Code:
;;;### (autoloads nil "all-the-icons" "all-the-icons.el" (0 0 0 0))
;;; Generated autoloads from all-the-icons.el
(autoload 'all-the-icons-icon-for-dir "all-the-icons" "\
Get the formatted icon for DIR.
ARG-OVERRIDES should be a plist containining `:height',
`:v-adjust' or `:face' properties like in the normal icon
inserting functions.
Note: You want chevron, please use `all-the-icons-icon-for-dir-with-chevron'.
\(fn DIR &rest ARG-OVERRIDES)" nil nil)
(autoload 'all-the-icons-icon-for-file "all-the-icons" "\
Get the formatted icon for FILE.
ARG-OVERRIDES should be a plist containining `:height',
`:v-adjust' or `:face' properties like in the normal icon
inserting functions.
\(fn FILE &rest ARG-OVERRIDES)" nil nil)
(autoload 'all-the-icons-icon-for-mode "all-the-icons" "\
Get the formatted icon for MODE.
ARG-OVERRIDES should be a plist containining `:height',
`:v-adjust' or `:face' properties like in the normal icon
inserting functions.
\(fn MODE &rest ARG-OVERRIDES)" nil nil)
(autoload 'all-the-icons-icon-for-url "all-the-icons" "\
Get the formatted icon for URL.
If an icon for URL isn't found in `all-the-icons-url-alist', a globe is used.
ARG-OVERRIDES should be a plist containining `:height',
`:v-adjust' or `:face' properties like in the normal icon
inserting functions.
\(fn URL &rest ARG-OVERRIDES)" nil nil)
(autoload 'all-the-icons-install-fonts "all-the-icons" "\
Helper function to download and install the latests fonts based on OS.
When PFX is non-nil, ignore the prompt and just install
\(fn &optional PFX)" t nil)
(autoload 'all-the-icons-insert "all-the-icons" "\
Interactive icon insertion function.
When Prefix ARG is non-nil, insert the propertized icon.
When FAMILY is non-nil, limit the candidates to the icon set matching it.
\(fn &optional ARG FAMILY)" t nil)
(register-definition-prefixes "all-the-icons" '("all-the-icons-"))
;;;***
;;;### (autoloads nil nil ("all-the-icons-faces.el") (0 0 0 0))
;;;***
(provide 'all-the-icons-autoloads)
;; Local Variables:
;; version-control: never
;; no-byte-compile: t
;; no-update-autoloads: t
;; coding: utf-8
;; End:
;;; all-the-icons-autoloads.el ends here

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/all-the-icons.el/all-the-icons-faces.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/all-the-icons.el/all-the-icons.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/all-the-icons.el/data/data-alltheicons.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/all-the-icons.el/data/data-faicons.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/all-the-icons.el/data/data-fileicons.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/all-the-icons.el/data/data-material.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/all-the-icons.el/data/data-octicons.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/all-the-icons.el/data/data-weathericons.el

View file

@ -0,0 +1,41 @@
;;; annalist-autoloads.el --- automatically extracted autoloads -*- lexical-binding: t -*-
;;
;;; Code:
;;;### (autoloads nil "annalist" "annalist.el" (0 0 0 0))
;;; Generated autoloads from annalist.el
(autoload 'annalist-record "annalist" "\
In the store for ANNALIST, TYPE, and LOCAL, record RECORD.
ANNALIST should correspond to the package/user recording this information (e.g.
'general, 'me, etc.). TYPE is the type of information being recorded (e.g.
'keybindings). LOCAL corresponds to whether to store RECORD only for the current
buffer. This information together is used to select where RECORD should be
stored in and later retrieved from with `annalist-describe'. RECORD should be a
list of items to record and later print as org headings and column entries in a
single row. If PLIST is non-nil, RECORD should be a plist instead of an ordered
list (e.g. '(keymap org-mode-map key \"C-c a\" ...)). The plist keys should be
the symbols used for the definition of TYPE.
\(fn ANNALIST TYPE RECORD &key LOCAL PLIST)" nil nil)
(autoload 'annalist-describe "annalist" "\
Describe information recorded by ANNALIST for TYPE.
For example: (annalist-describe 'general 'keybindings) If VIEW is non-nil, use
those settings for displaying recorded information instead of the defaults.
\(fn ANNALIST TYPE &optional VIEW)" nil nil)
(register-definition-prefixes "annalist" '("annalist-"))
;;;***
(provide 'annalist-autoloads)
;; Local Variables:
;; version-control: never
;; no-byte-compile: t
;; no-update-autoloads: t
;; coding: utf-8
;; End:
;;; annalist-autoloads.el ends here

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/annalist.el/annalist.el

Binary file not shown.

View file

@ -0,0 +1,544 @@
This is annalist.info, produced by makeinfo version 6.7 from
annalist.texi.
INFO-DIR-SECTION Emacs
START-INFO-DIR-ENTRY
* Annalist: (annalist). Record and display information such as keybindings.
END-INFO-DIR-ENTRY

File: annalist.info, Node: Top, Next: Usage, Up: (dir)
Annalist User Manual
********************
file:https://melpa.org/packages/annalist-badge.svg
(https://melpa.org/#/annalist)
https://travis-ci.org/noctuid/annalist.el.svg?branch=master
(https://travis-ci.org/noctuid/annalist.el)
Incessant wind sweeps the plain. It murmurs on across grey stone,
carrying dust from far climes to nibble eternally at the memorial
pillars. There are a few shadows out there still but they are the
weak and the timid and the hopelessly lost.
It is immortality of a sort.
Memory is immortality of a sort.
In the night, when the wind dies and silence rules the place of
glittering stone, I remember. And they all live again.
annalist.el is a library that can be used to record information and
later print that information using org-mode headings and tables. It
allows defining different types of things that can be recorded (e.g.
keybindings, settings, hooks, and advice) and supports custom filtering,
sorting, and formatting. annalist is primarily intended for use in
other packages like general and evil-collection, but it can also be
used directly in a users configuration.
[https://user-images.githubusercontent.com/4250696/63480582-64e2cb00-c460-11e9-9571-706b5b96992c]
* Menu:
* Usage::
— The Detailed Node Listing —
Usage
* Disabling Annalist::
* Terminology::
* Settings::
* Defining New Types::
* Defining Views::
* Recording::
* Describing::
* Helper Functions::
* Builtin Types::
Defining New Types
* Type Top-level Settings::
* Type Item Settings::
* :record-update, :preprocess, and :postprocess Settings Argument: record-update preprocess and postprocess Settings Argument.
Defining Views
* View Top-level Settings::
* View Item Settings::
Helper Functions
* List Helpers::
* Formatting Helpers::
* Sorting Helpers::
Builtin Types
* Keybindings Type::

File: annalist.info, Node: Usage, Prev: Top, Up: Top
1 Usage
*******
* Menu:
* Disabling Annalist::
* Terminology::
* Settings::
* Defining New Types::
* Defining Views::
* Recording::
* Describing::
* Helper Functions::
* Builtin Types::

File: annalist.info, Node: Disabling Annalist, Next: Terminology, Up: Usage
1.1 Disabling Annalist
======================
What fool always has his nose in everywhere because he thinks he
has to know so he can record it in his precious Annals?
If you use a library that uses annalist (e.g. evil-collection or
general) but dont need its functionality during init or at all, you
can set annalist-record to nil to shave some milliseconds off of your
init time (especially if you have a lot of keybindings). Alternatively,
if you only want to prevent annalist from recording certain things or
have it only record certain things, you can configure
annalist-record-blacklist or annalist-record-whitelist respectively.

File: annalist.info, Node: Terminology, Next: Settings, Prev: Disabling Annalist, Up: Usage
1.2 Terminology
===============
• item - and individual recorded item; may be displayed as a heading
or as a table column entry (e.g. a key such as C-c)
• record - a list of related, printable items corresponding to one
piece of information (e.g. a single keybinding: a list of a
keymap, key, and definition)
• metadata - a plist of information about a data list that should not
be printed; appears as the last item in a record
• tome - a collection of records of a specific type

File: annalist.info, Node: Settings, Next: Defining New Types, Prev: Terminology, Up: Usage
1.3 Settings
============
Annalist provides annalist-describe-hook which is run in annalist
description buffers after they have been populated but before they are
marked read-only:
(add-hook 'annalist-describe-hook
(lambda () (visual-fill-column-mode -1)))

File: annalist.info, Node: Defining New Types, Next: Defining Views, Prev: Settings, Up: Usage
1.4 Defining New Types
======================
Three huge tomes bound in worn, cracked dark leather rested on a
large, long stone lectern, as though waiting for three speakers to
step up and read at the same time.
Annalist provides the function annalist-define-tome for defining
new types of tomes:
(annalist-define-tome 'battles
'(:primary-key (year name)
:table-start-index 1
year
name
casualties
...))
At minimum, a type definition must include :primary-key,
:table-start-index, and a symbol for each item records should store.
Items should be defined in the order they should appear in org headings
and then in the table.
* Menu:
* Type Top-level Settings::
* Type Item Settings::
* :record-update, :preprocess, and :postprocess Settings Argument: record-update preprocess and postprocess Settings Argument.

File: annalist.info, Node: Type Top-level Settings, Next: Type Item Settings, Up: Defining New Types
1.4.1 Type Top-level Settings
-----------------------------
These settings apply to the entirety of the recorded information.
:table-start-index - the index of the first item to be printed in
an org table; previous items are printed as headings (default:
none)
:primary-key - the item or list of items that uniquely identifies
the record; used with the :test values for those items to check
for an old record that should be replaced/updated (default: none)
:record-update - a function used to update a record before
recording it; this can be used to, for example, set the value of an
item to store the previous value of another item; the function is
called with old-record (nil if none), new-record, and
settings; see annalist--update-keybindings for an example of
how to create such a function (default: none)
:preprocess - a function used to alter a record before doing
anything with it; it is passed record and settings and should
return the altered record; see the default keybindings type for an
example (default: none)
:test - test function used for comparing the primary key (as a
list of each item in the order it appears in the definition); you
will need to create the test with define-hash-table-test if it
does not exist (default: equal; generally should be unnecessary
to change)
:defaults - a plist of default item settings; see below for valid
item settings (default: none)

File: annalist.info, Node: Type Item Settings, Next: record-update preprocess and postprocess Settings Argument, Prev: Type Top-level Settings, Up: Defining New Types
1.4.2 Type Item Settings
------------------------
Item settings only apply to a specific item. Defaults for items that
dont explicitly specify a setting can be set using the top-level
:defaults keyword.
:test - test function used for comparing items; only applicable
to heading items; you will need to create the test with
define-hash-table-test if it does not exist (default: equal;
generally should be unnecessary to change)

File: annalist.info, Node: record-update preprocess and postprocess Settings Argument, Prev: Type Item Settings, Up: Defining New Types
1.4.3 :record-update, :preprocess, and :postprocess Settings Argument
---------------------------------------------------------------------------
The settings plist past to the :record-update function contains all
information for both the tome type and view. The information is
converted into a valid plist and some extra keywords are added. Here is
an example:
'(:table-start-index 2
:primary-key (keymap state key)
;; the following keywords are generated for convenience
:type keybindings
:key-indices (2 1 0)
:final-index 4
:metadata-index 5
;; item settings can be accessed by their symbol or their index
keymap (:name keymap :index 0 :format annalist-code)
0 (:name keymap :index 0 :format annalist-code)
...)

File: annalist.info, Node: Defining Views, Next: Recording, Prev: Defining New Types, Up: Usage
1.5 Defining Views
==================
In those days the company was in service to…
Views contain settings for formatting and displaying recorded
information. Settings from the type definition cannot be changed later.
On the other hand, views are for all settings that a user may want to
change for a particular annalist-describe call. They are defined
using the same format as tome types:
(annalist-define-view 'battles 'default
'(:defaults (:format capitalize)
year
name
(casualties :title "Deaths")
...))
The default view is what annalist-describe will use if no view
name is explicitly specified. To prevent naming conflicts, external
packages that create views should prefix the views with their symbol
(e.g. general-alternate-view).
* Menu:
* View Top-level Settings::
* View Item Settings::

File: annalist.info, Node: View Top-level Settings, Next: View Item Settings, Up: Defining Views
1.5.1 View Top-level Settings
-----------------------------
These settings apply to the entirety of the recorded information.
:predicate - a function that is passed the entire record and
returns non-nil if the record should be printed (default: none)
:sort - a function used to sort records in each printed table;
the function is passed two records and and should return non-nil if
the first record should come first (default: none; tables are
printed in recorded order)
:hooks - a function or a list of functions to run in the describe
buffer after printing all headings and tables before making the
buffer readonly; these run before annalist-describe-hook
(default: none)
:postprocess - a function used to alter a record just before
printing it; it is passed record and settings and should return
the altered record; an example use case would be to alter the
record using its metadata (e.g. by replacing a keybinding
definition with a which-key description, if one exists) (default:
none)
:defaults - a plist of default item settings; see below for valid
item settings (default: none)
There is also a special :inherit keyword that can be used to create
a new type of tome that is based on another type:
(annalist-define-view 'keybindings 'alternate
;; override title for key column
'((key :title "Keybinding")
...)
:inherit 'keybindings)

File: annalist.info, Node: View Item Settings, Prev: View Top-level Settings, Up: Defining Views
1.5.2 View Item Settings
------------------------
Item settings only apply to a specific item. Defaults for items that
dont explicitly specify a setting can be set using the top-level
:defaults keyword.
(annalist-define-view 'keybindings 'my-view
'(:defaults (:format #'capitalize)
;; surround key with = instead of capitalizing
(key :format #'annalist-verbatim)
;; perform no formatting on definition
(definition :format nil)))
Sorting/filtering (only for items displayed in headings):
:predicate - a function that is passed the item and returns
non-nil if it should be printed; only applicable to heading items
(default: none)
:prioritize - list of items that should be printed before any
others; only applicable to heading items (default: none)
:sort - a function used to sort records; only applicable to
heading items; the function is passed two items and and should
return non-nil if the first item should come first (default: none;
printed in recorded order)
Formatting:
:title - a description of the item; used as the column title
(default: capitalize the symbol name; local only)
:format - function to run on the item value before it is printed
(e.g. #'capitalize, #'annalist-code, #'annalist-verbatim,
etc.); note that this is run on the item as-is if it has not been
truncated, so the function may need to convert the item to a string
first; has no effect if the item is extracted to a footnote/source
block (default: none)
:max-width - the max character width for an item; note that this
is compared to the item as-is before any formatting (default: 50)
:extractp - function to determine whether to extract longer
entries into footnotes instead of truncating them; (default:
listp)
:src-block-p function to determine whether to extract to a source
block when the :extractp function returns non-nil (default:
listp)

File: annalist.info, Node: Recording, Next: Describing, Prev: Defining Views, Up: Usage
1.6 Recording
=============
The Lady said, “I wanted you to see this, Annalist.” […] “What is
about to transpire. So that it is properly recorded in at least
one place.”
annalist-record is used to record information. It requires three
arguments: annalist type record. The annalist argument will
usually be the same as the package prefix that is recording the data.
annalist and any other names prefixed by annalist are reserved for
this package. type is the type of data to record, and record is the
actual data. Optionally, the user can also specify metadata that wont
be printed after the final item. Buffer-local records should
additionally specify :local t. Here is an example:
(annalist-record 'me 'keybindings
(list
;; keymap state key definition previous-definition
'global-map nil (kbd "C-+") #'text-scale-increase nil
;; metadata can be specified after final item
(list :zoom-related-binding t)))
;; alternatively, record using plist instead of ordered list
(annalist-record 'me 'keybindings
(list
'keymap 'global-map
'state nil
'key (kbd "C-+")
'definition #'text-scale-increase
;; metadata can be specified with `t' key
t (list :zoom-related-binding t))
:plist t)
Some items can potentially be recorded as nil. In the previous
example, the evil state is recorded as nil (which will always be the
case for non-evil users). When a heading item is nil, the heading at
that level will just be skipped/not printed.

File: annalist.info, Node: Describing, Next: Helper Functions, Prev: Recording, Up: Usage
1.7 Describing
==============
Once each month, in the evening, the entire Company assembles so
the Annalist can read from his predecessors.
annalist-describe is used to describe information. It takes three
arguments: name type view. view is optional (defaults to
default). For example:
(annalist-describe 'me 'keybindings)
It is possible to have custom filtering/sorting behavior by using a
custom view:
(annalist-define-view 'keybindings 'active-keybindings-only
'((keymap
;; only show keys bound in active keymaps
:predicate #'annalist--active-keymap
;; sort keymaps alphabetically
:sort #'annalist--string-<)))
(annalist-describe 'my 'keybindings 'active-keybindings-only)
annalist-org-startup-folded will determine what
org-startup-folded setting to use (defaults to nil; all headings will
be unfolded).

File: annalist.info, Node: Helper Functions, Next: Builtin Types, Prev: Describing, Up: Usage
1.8 Helper Functions
====================
* Menu:
* List Helpers::
* Formatting Helpers::
* Sorting Helpers::

File: annalist.info, Node: List Helpers, Next: Formatting Helpers, Up: Helper Functions
1.8.1 List Helpers
------------------
annalist-plistify-record can be used to convert a record that is an
ordered list to a plist. annalist-listify-record can be used to do
the opposite. This is what the :plist argument for annalist-record
uses internally. These functions can be useful, for example, inside a
:record-update function, so that you can get record items by their
name instead of by their index. However, if there will be a lot of data
recorded for a type during Emacs initialization time, the extra time to
convert between list types can add up, so its recommended that you
dont use these functions or :plist in such cases.

File: annalist.info, Node: Formatting Helpers, Next: Sorting Helpers, Prev: List Helpers, Up: Helper Functions
1.8.2 Formatting Helpers
------------------------
1. :format Helpers
Annalist provides annalist-verbatim (e.g. =verbatim text=),
annalist-code (e.g. ~my-function~), and annalist-capitalize.
There is also an annalist-compose helper for combining different
formatting functions.
2. Formatting Emacs Lisp Source Blocks
By default, Emacs Lisp extracted into source blocks will just be
one long line. You can add annalist-multiline-source-blocks to a
views :hooks keyword or to annalist-describe-hook to
autoformat org source blocks if lispy is installed. By default, it
uses lispy-alt-multiline. To use lispy-multiline instead,
customize annalist-multiline-function.
The builtin types have annlist-multiline-source-blocks in their
:hooks setting by default.
Here is an example of what this looks like:
[https://user-images.githubusercontent.com/4250696/62338313-1025e300-b4a6-11e9-845f-179c02abef35]

File: annalist.info, Node: Sorting Helpers, Prev: Formatting Helpers, Up: Helper Functions
1.8.3 Sorting Helpers
---------------------
Annalist provides annalist-string-< and annalist-key-< (e.g. (kbd
"C-c a") vs (kbd "C-c b")).

File: annalist.info, Node: Builtin Types, Prev: Helper Functions, Up: Usage
1.9 Builtin Types
=================
* Menu:
* Keybindings Type::

File: annalist.info, Node: Keybindings Type, Up: Builtin Types
1.9.1 Keybindings Type
----------------------
Annalist provides a type for recording keybindings that is used by
evil-collection and general. When recording a keybinding, the
keymap must be provided as a symbol. Here is an example:
(annalist-record 'annalist 'keybindings
(list 'org-mode-map nil (kbd "C-c g") #'counsel-org-goto))
In addition to the default view, it has a valid to only show
keybindings for keymaps/states that exist (since some keybindings may be
in a with-eval-after-load). It also has an active view to only show
keybindings that are currently active.

Tag Table:
Node: Top217
Node: Usage2195
Node: Disabling Annalist2443
Node: Terminology3226
Node: Settings3855
Node: Defining New Types4239
Node: Type Top-level Settings5272
Node: Type Item Settings6987
Node: record-update preprocess and postprocess Settings Argument7641
Node: Defining Views8601
Node: View Top-level Settings9596
Node: View Item Settings11236
Node: Recording13459
Node: Describing15400
Node: Helper Functions16437
Node: List Helpers16651
Node: Formatting Helpers17431
Node: Sorting Helpers18619
Node: Builtin Types18881
Node: Keybindings Type19031

End Tag Table

Local Variables:
coding: utf-8
End:

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/annalist.el/annalist.texi

View file

@ -0,0 +1,19 @@
This is the file .../info/dir, which contains the
topmost node of the Info hierarchy, called (dir)Top.
The first time you invoke Info you start off looking at this node.

File: dir, Node: Top This is the top of the INFO tree
This (the Directory node) gives a menu of major topics.
Typing "q" exits, "H" lists all Info commands, "d" returns here,
"h" gives a primer for first-timers,
"mEmacs<Return>" visits the Emacs manual, etc.
In Emacs, you can click mouse button 2 on a menu item or cross reference
to select it.
* Menu:
Emacs
* Annalist: (annalist). Record and display information such as
keybindings.

View file

@ -0,0 +1,82 @@
;;; bind-key-autoloads.el --- automatically extracted autoloads -*- lexical-binding: t -*-
;;
;;; Code:
;;;### (autoloads nil "bind-key" "bind-key.el" (0 0 0 0))
;;; Generated autoloads from bind-key.el
(autoload 'bind-key "bind-key" "\
Bind KEY-NAME to COMMAND in KEYMAP (`global-map' if not passed).
KEY-NAME may be a vector, in which case it is passed straight to
`define-key'. Or it may be a string to be interpreted as
spelled-out keystrokes, e.g., \"C-c C-z\". See documentation of
`edmacro-mode' for details.
COMMAND must be an interactive function or lambda form.
KEYMAP, if present, should be a keymap variable or symbol.
For example:
(bind-key \"M-h\" #'some-interactive-function my-mode-map)
(bind-key \"M-h\" #'some-interactive-function 'my-mode-map)
If PREDICATE is non-nil, it is a form evaluated to determine when
a key should be bound. It must return non-nil in such cases.
Emacs can evaluate this form at any time that it does redisplay
or operates on menu data structures, so you should write it so it
can safely be called at any time.
\(fn KEY-NAME COMMAND &optional KEYMAP PREDICATE)" nil t)
(autoload 'unbind-key "bind-key" "\
Unbind the given KEY-NAME, within the KEYMAP (if specified).
See `bind-key' for more details.
\(fn KEY-NAME &optional KEYMAP)" nil t)
(autoload 'bind-key* "bind-key" "\
Similar to `bind-key', but overrides any mode-specific bindings.
\(fn KEY-NAME COMMAND &optional PREDICATE)" nil t)
(autoload 'bind-keys "bind-key" "\
Bind multiple keys at once.
Accepts keyword arguments:
:map MAP - a keymap into which the keybindings should be
added
:prefix KEY - prefix key for these bindings
:prefix-map MAP - name of the prefix map that should be created
for these bindings
:prefix-docstring STR - docstring for the prefix-map variable
:menu-name NAME - optional menu string for prefix map
:filter FORM - optional form to determine when bindings apply
The rest of the arguments are conses of keybinding string and a
function symbol (unquoted).
\(fn &rest ARGS)" nil t)
(autoload 'bind-keys* "bind-key" "\
\(fn &rest ARGS)" nil t)
(autoload 'describe-personal-keybindings "bind-key" "\
Display all the personal keybindings defined by `bind-key'." t nil)
(register-definition-prefixes "bind-key" '("bind-key" "compare-keybindings" "get-binding-description" "override-global-m" "personal-keybindings"))
;;;***
(provide 'bind-key-autoloads)
;; Local Variables:
;; version-control: never
;; no-byte-compile: t
;; no-update-autoloads: t
;; coding: utf-8
;; End:
;;; bind-key-autoloads.el ends here

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/use-package/bind-key.el

Binary file not shown.

View file

@ -0,0 +1,42 @@
;;; command-log-mode-autoloads.el --- automatically extracted autoloads -*- lexical-binding: t -*-
;;
;;; Code:
;;;### (autoloads nil "command-log-mode" "command-log-mode.el" (0
;;;;;; 0 0 0))
;;; Generated autoloads from command-log-mode.el
(autoload 'command-log-mode "command-log-mode" "\
Toggle keyboard command logging.
If called interactively, toggle `Command-Log mode'. If the
prefix argument is positive, enable the mode, and if it is zero
or negative, disable the mode.
If called from Lisp, toggle the mode if ARG is `toggle'. Enable
the mode if ARG is nil, omitted, or is a positive number.
Disable the mode if ARG is a negative number.
The mode's hook is called both when the mode is enabled and when
it is disabled.
\(fn &optional ARG)" t nil)
(autoload 'clm/toggle-command-log-buffer "command-log-mode" "\
Toggle the command log showing or not.
\(fn &optional ARG)" t nil)
(register-definition-prefixes "command-log-mode" '("clm/" "command-log-mode-" "global-command-log-mode"))
;;;***
(provide 'command-log-mode-autoloads)
;; Local Variables:
;; version-control: never
;; no-byte-compile: t
;; no-update-autoloads: t
;; coding: utf-8
;; End:
;;; command-log-mode-autoloads.el ends here

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/command-log-mode/command-log-mode.el

Binary file not shown.

View file

@ -0,0 +1,347 @@
;;; consult-autoloads.el --- automatically extracted autoloads -*- lexical-binding: t -*-
;;
;;; Code:
;;;### (autoloads nil "consult" "consult.el" (0 0 0 0))
;;; Generated autoloads from consult.el
(autoload 'consult-multi-occur "consult" "\
Improved version of `multi-occur' based on `completing-read-multiple'.
See `multi-occur' for the meaning of the arguments BUFS, REGEXP and NLINES.
\(fn BUFS REGEXP &optional NLINES)" t nil)
(autoload 'consult-outline "consult" "\
Jump to an outline heading, obtained by matching against `outline-regexp'.
This command supports candidate preview.
The symbol at point is added to the future history." t nil)
(autoload 'consult-mark "consult" "\
Jump to a marker in the buffer-local `mark-ring'.
The command supports preview of the currently selected marker position.
The symbol at point is added to the future history." t nil)
(autoload 'consult-global-mark "consult" "\
Jump to a marker in `global-mark-ring'.
The command supports preview of the currently selected marker position.
The symbol at point is added to the future history." t nil)
(autoload 'consult-line "consult" "\
Search for a matching line and jump to the line beginning.
The default candidate is a non-empty line closest to point.
This command obeys narrowing. Optionally INITIAL input can be provided.
The symbol at point and the last `isearch-string' is added to the future history.
\(fn &optional INITIAL)" t nil)
(autoload 'consult-keep-lines "consult" "\
Select a subset of the lines in the current buffer with live preview.
The lines selected are those that match the minibuffer input.
This command obeys narrowing.
FILTER is the filter function.
INITIAL is the initial input.
\(fn &optional FILTER INITIAL)" t nil)
(autoload 'consult-focus-lines "consult" "\
Hide or show lines according to FILTER function.
With optional prefix argument SHOW reveal the hidden lines.
Optional INITIAL input can be provided when called from Lisp.
\(fn &optional SHOW FILTER INITIAL)" t nil)
(autoload 'consult-goto-line "consult" "\
Read line number and jump to the line with preview.
The command respects narrowing and the settings
`consult-goto-line-numbers' and `consult-line-numbers-widen'." t nil)
(autoload 'consult-recent-file "consult" "\
Find recent using `completing-read'." t nil)
(autoload 'consult-file-externally "consult" "\
Open FILE externally using the default application of the system.
\(fn FILE)" t nil)
(autoload 'consult-completion-in-region "consult" "\
Prompt for completion of region in the minibuffer if non-unique.
The function is called with 4 arguments: START END COLLECTION PREDICATE.
The arguments and expected return value are as specified for
`completion-in-region'. Use as a value for `completion-in-region-function'.
\(fn START END COLLECTION &optional PREDICATE)" nil nil)
(autoload 'consult-mode-command "consult" "\
Run a command from any of the given MODES.
If no MODES are specified, use currently active major and minor modes.
\(fn &rest MODES)" t nil)
(autoload 'consult-yank "consult" "\
Select text from the kill ring and insert it." t nil)
(autoload 'consult-yank-pop "consult" "\
If there is a recent yank act like `yank-pop'.
Otherwise select text from the kill ring and insert it.
See `yank-pop' for the meaning of ARG.
\(fn &optional ARG)" t nil)
(autoload 'consult-yank-replace "consult" "\
Select text from the kill ring.
If there was no recent yank, insert the text.
Otherwise replace the just-yanked text with the selected text." t nil)
(autoload 'consult-register-window "consult" "\
Enhanced drop-in replacement for `register-preview'.
BUFFER is the window buffer.
SHOW-EMPTY must be t if the window should be shown for an empty register list.
\(fn BUFFER &optional SHOW-EMPTY)" nil nil)
(autoload 'consult-register-format "consult" "\
Enhanced preview of register REG.
This function can be used as `register-preview-function'.
\(fn REG)" nil nil)
(autoload 'consult-register "consult" "\
Load register and either jump to location or insert the stored text.
This command is useful to search the register contents. For quick access to
registers it is still recommended to use the register functions
`consult-register-load' and `consult-register-store' or the built-in built-in
register access functions. The command supports narrowing, see
`consult-register-narrow'. Marker positions are previewed. See
`jump-to-register' and `insert-register' for the meaning of prefix ARG.
\(fn &optional ARG)" t nil)
(autoload 'consult-register-load "consult" "\
Do what I mean with a REG.
For a window configuration, restore it. For a number or text, insert it. For a
location, jump to it. See `jump-to-register' and `insert-register' for the
meaning of prefix ARG.
\(fn REG &optional ARG)" t nil)
(autoload 'consult-register-store "consult" "\
Store register dependent on current context, showing an action menu.
With an active region, store/append/prepend the contents, optionally deleting
the region when a prefix ARG is given. With a numeric prefix ARG, store/add the
number. Otherwise store point, frameset, window or kmacro.
\(fn ARG)" t nil)
(autoload 'consult-bookmark "consult" "\
If bookmark NAME exists, open it, otherwise create a new bookmark with NAME.
The command supports preview of file bookmarks and narrowing. See the
variable `consult-bookmark-narrow' for the narrowing configuration.
\(fn NAME)" t nil)
(autoload 'consult-apropos "consult" "\
Select pattern and call `apropos'.
The default value of the completion is the symbol at point." t nil)
(autoload 'consult-complex-command "consult" "\
Select and evaluate command from the command history.
This command can act as a drop-in replacement for `repeat-complex-command'." t nil)
(autoload 'consult-history "consult" "\
Insert string from HISTORY of current buffer.
In order to select from a specific HISTORY, pass the history variable as argument.
\(fn &optional HISTORY)" t nil)
(autoload 'consult-isearch "consult" "\
Read a search string with completion from history.
This replaces the current search string if Isearch is active, and
starts a new Isearch session otherwise." t nil)
(autoload 'consult-minor-mode-menu "consult" "\
Enable or disable minor mode.
This is an alternative to `minor-mode-menu-from-indicator'." t nil)
(autoload 'consult-theme "consult" "\
Disable current themes and enable THEME from `consult-themes'.
The command supports previewing the currently selected theme.
\(fn THEME)" t nil)
(autoload 'consult-buffer "consult" "\
Enhanced `switch-to-buffer' command with support for virtual buffers.
The command supports recent files, bookmarks, views and project files as virtual
buffers. Buffers are previewed. Furthermore narrowing to buffers (b), files (f),
bookmarks (m) and project files (p) is supported via the corresponding keys. In
order to determine the project-specific files and buffers, the
`consult-project-root-function' is used. See `consult-buffer-sources' and
`consult--multi' for the configuration of the virtual buffer sources." t nil)
(autoload 'consult-buffer-other-window "consult" "\
Variant of `consult-buffer' which opens in other window." t nil)
(autoload 'consult-buffer-other-frame "consult" "\
Variant of `consult-buffer' which opens in other frame." t nil)
(autoload 'consult-kmacro "consult" "\
Run a chosen keyboard macro.
With prefix ARG, run the macro that many times.
Macros containing mouse clicks are omitted.
\(fn ARG)" t nil)
(autoload 'consult-imenu "consult" "\
Choose item from flattened `imenu' using `completing-read' with preview.
The command supports preview and narrowing. See the variable
`consult-imenu-config', which configures the narrowing.
See also `consult-project-imenu'." t nil)
(autoload 'consult-project-imenu "consult" "\
Choose item from the imenus of all buffers from the same project.
In order to determine the buffers belonging to the same project, the
`consult-project-root-function' is used. Only the buffers with the
same major mode as the current buffer are used. See also
`consult-imenu' for more details." t nil)
(autoload 'consult-grep "consult" "\
Search for regexp with grep in DIR with INITIAL input.
The input string is split, the first part of the string is passed to
the asynchronous grep process and the second part of the string is
passed to the completion-style filtering. The input string is split at
a punctuation character, which is given as the first character of the
input string. The format is similar to Perl-style regular expressions,
e.g., /regexp/. Furthermore command line options can be passed to
grep, specified behind --.
Example: #async-regexp -- grep-opts#filter-string
The symbol at point is added to the future history. If `consult-grep'
is called interactively with a prefix argument, the user can specify
the directory to search in. By default the project directory is used
if `consult-project-root-function' is defined and returns non-nil.
Otherwise the `default-directory' is searched.
\(fn &optional DIR INITIAL)" t nil)
(autoload 'consult-git-grep "consult" "\
Search for regexp with grep in DIR with INITIAL input.
See `consult-grep' for more details.
\(fn &optional DIR INITIAL)" t nil)
(autoload 'consult-ripgrep "consult" "\
Search for regexp with rg in DIR with INITIAL input.
See `consult-grep' for more details.
\(fn &optional DIR INITIAL)" t nil)
(autoload 'consult-find "consult" "\
Search for regexp with find in DIR with INITIAL input.
The find process is started asynchronously, similar to `consult-grep'.
See `consult-grep' for more details regarding the asynchronous search.
\(fn &optional DIR INITIAL)" t nil)
(autoload 'consult-locate "consult" "\
Search for regexp with locate with INITIAL input.
The locate process is started asynchronously, similar to `consult-grep'.
See `consult-grep' for more details regarding the asynchronous search.
\(fn &optional INITIAL)" t nil)
(autoload 'consult-man "consult" "\
Search for regexp with man with INITIAL input.
The man process is started asynchronously, similar to `consult-grep'.
See `consult-grep' for more details regarding the asynchronous search.
\(fn &optional INITIAL)" t nil)
(register-definition-prefixes "consult" '("consult-"))
;;;***
;;;### (autoloads nil "consult-compile" "consult-compile.el" (0 0
;;;;;; 0 0))
;;; Generated autoloads from consult-compile.el
(autoload 'consult-compile-error "consult-compile" "\
Jump to a compilation error in the current buffer.
This command works in compilation buffers and grep buffers.
The command supports preview of the currently selected error." t nil)
(register-definition-prefixes "consult-compile" '("consult-compile--error-candidates"))
;;;***
;;;### (autoloads nil "consult-flymake" "consult-flymake.el" (0 0
;;;;;; 0 0))
;;; Generated autoloads from consult-flymake.el
(autoload 'consult-flymake "consult-flymake" "\
Jump to Flymake diagnostic." t nil)
(register-definition-prefixes "consult-flymake" '("consult-flymake--candidates"))
;;;***
;;;### (autoloads nil "consult-icomplete" "consult-icomplete.el"
;;;;;; (0 0 0 0))
;;; Generated autoloads from consult-icomplete.el
(register-definition-prefixes "consult-icomplete" '("consult-icomplete--refresh"))
;;;***
;;;### (autoloads nil "consult-selectrum" "consult-selectrum.el"
;;;;;; (0 0 0 0))
;;; Generated autoloads from consult-selectrum.el
(register-definition-prefixes "consult-selectrum" '("consult-selectrum--"))
;;;***
(provide 'consult-autoloads)
;; Local Variables:
;; version-control: never
;; no-byte-compile: t
;; no-update-autoloads: t
;; coding: utf-8
;; End:
;;; consult-autoloads.el ends here

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/consult/consult-compile.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/consult/consult-flymake.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/consult/consult-icomplete.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/consult/consult-selectrum.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/consult/consult.el

Binary file not shown.

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/consult/consult.texi

View file

@ -0,0 +1,18 @@
This is the file .../info/dir, which contains the
topmost node of the Info hierarchy, called (dir)Top.
The first time you invoke Info you start off looking at this node.

File: dir, Node: Top This is the top of the INFO tree
This (the Directory node) gives a menu of major topics.
Typing "q" exits, "H" lists all Info commands, "d" returns here,
"h" gives a primer for first-timers,
"mEmacs<Return>" visits the Emacs manual, etc.
In Emacs, you can click mouse button 2 on a menu item or cross reference
to select it.
* Menu:
Emacs
* Consult: (consult). Useful commands built on completing-read.

View file

@ -0,0 +1,21 @@
;;; dash-functional-autoloads.el --- automatically extracted autoloads -*- lexical-binding: t -*-
;;
;;; Code:
;;;### (autoloads nil "dash-functional" "dash-functional.el" (0 0
;;;;;; 0 0))
;;; Generated autoloads from dash-functional.el
(register-definition-prefixes "dash-functional" '("-a" "-c" "-f" "-iteratefn" "-juxt" "-not" "-o" "-prodfn" "-rpartial"))
;;;***
(provide 'dash-functional-autoloads)
;; Local Variables:
;; version-control: never
;; no-byte-compile: t
;; no-update-autoloads: t
;; coding: utf-8
;; End:
;;; dash-functional-autoloads.el ends here

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/dash.el/dash-functional.el

Binary file not shown.

View file

@ -0,0 +1,75 @@
;;; dash-autoloads.el --- automatically extracted autoloads -*- lexical-binding: t -*-
;;
;;; Code:
;;;### (autoloads nil "dash" "dash.el" (0 0 0 0))
;;; Generated autoloads from dash.el
(autoload 'dash-fontify-mode "dash" "\
Toggle fontification of Dash special variables.
If called interactively, toggle `Dash-Fontify mode'. If the
prefix argument is positive, enable the mode, and if it is zero
or negative, disable the mode.
If called from Lisp, toggle the mode if ARG is `toggle'. Enable
the mode if ARG is nil, omitted, or is a positive number.
Disable the mode if ARG is a negative number.
The mode's hook is called both when the mode is enabled and when
it is disabled.
Dash-Fontify mode is a buffer-local minor mode intended for Emacs
Lisp buffers. Enabling it causes the special variables bound in
anaphoric Dash macros to be fontified. These anaphoras include
`it', `it-index', `acc', and `other'. In older Emacs versions
which do not dynamically detect macros, Dash-Fontify mode
additionally fontifies Dash macro calls.
See also `dash-fontify-mode-lighter' and
`global-dash-fontify-mode'.
\(fn &optional ARG)" t nil)
(put 'global-dash-fontify-mode 'globalized-minor-mode t)
(defvar global-dash-fontify-mode nil "\
Non-nil if Global Dash-Fontify mode is enabled.
See the `global-dash-fontify-mode' command
for a description of this minor mode.
Setting this variable directly does not take effect;
either customize it (see the info node `Easy Customization')
or call the function `global-dash-fontify-mode'.")
(custom-autoload 'global-dash-fontify-mode "dash" nil)
(autoload 'global-dash-fontify-mode "dash" "\
Toggle Dash-Fontify mode in all buffers.
With prefix ARG, enable Global Dash-Fontify mode if ARG is positive;
otherwise, disable it. If called from Lisp, enable the mode if ARG
is omitted or nil.
Dash-Fontify mode is enabled in all buffers where
`dash--turn-on-fontify-mode' would do it.
See `dash-fontify-mode' for more information on Dash-Fontify mode.
\(fn &optional ARG)" t nil)
(autoload 'dash-register-info-lookup "dash" "\
Register the Dash Info manual with `info-lookup-symbol'.
This allows Dash symbols to be looked up with \\[info-lookup-symbol]." t nil)
(register-definition-prefixes "dash" '("!cdr" "!cons" "--" "->" "-a" "-butlast" "-c" "-d" "-e" "-f" "-gr" "-i" "-keep" "-l" "-m" "-non" "-only-some" "-p" "-r" "-s" "-t" "-u" "-value-to-list" "-when-let" "-zip" "dash-"))
;;;***
(provide 'dash-autoloads)
;; Local Variables:
;; version-control: never
;; no-byte-compile: t
;; no-update-autoloads: t
;; coding: utf-8
;; End:
;;; dash-autoloads.el ends here

1
straight/build/dash/dash.el Symbolic link
View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/dash.el/dash.el

Binary file not shown.

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/dash.el/dash.texi

18
straight/build/dash/dir Normal file
View file

@ -0,0 +1,18 @@
This is the file .../info/dir, which contains the
topmost node of the Info hierarchy, called (dir)Top.
The first time you invoke Info you start off looking at this node.

File: dir, Node: Top This is the top of the INFO tree
This (the Directory node) gives a menu of major topics.
Typing "q" exits, "H" lists all Info commands, "d" returns here,
"h" gives a primer for first-timers,
"mEmacs<Return>" visits the Emacs manual, etc.
In Emacs, you can click mouse button 2 on a menu item or cross reference
to select it.
* Menu:
Emacs
* Dash: (dash.info). A modern list library for GNU Emacs.

View file

@ -0,0 +1,126 @@
;;; doom-modeline-autoloads.el --- automatically extracted autoloads -*- lexical-binding: t -*-
;;
;;; Code:
;;;### (autoloads nil "doom-modeline" "doom-modeline.el" (0 0 0 0))
;;; Generated autoloads from doom-modeline.el
(autoload 'doom-modeline-init "doom-modeline" "\
Initialize doom mode-line." nil nil)
(autoload 'doom-modeline-set-main-modeline "doom-modeline" "\
Set main mode-line.
If DEFAULT is non-nil, set the default mode-line for all buffers.
\(fn &optional DEFAULT)" nil nil)
(autoload 'doom-modeline-set-minimal-modeline "doom-modeline" "\
Set minimal mode-line." nil nil)
(autoload 'doom-modeline-set-special-modeline "doom-modeline" "\
Set sepcial mode-line." nil nil)
(autoload 'doom-modeline-set-project-modeline "doom-modeline" "\
Set project mode-line." nil nil)
(autoload 'doom-modeline-set-dashboard-modeline "doom-modeline" "\
Set dashboard mode-line." nil nil)
(autoload 'doom-modeline-set-vcs-modeline "doom-modeline" "\
Set vcs mode-line." nil nil)
(autoload 'doom-modeline-set-info-modeline "doom-modeline" "\
Set Info mode-line." nil nil)
(autoload 'doom-modeline-set-package-modeline "doom-modeline" "\
Set package mode-line." nil nil)
(autoload 'doom-modeline-set-media-modeline "doom-modeline" "\
Set media mode-line." nil nil)
(autoload 'doom-modeline-set-message-modeline "doom-modeline" "\
Set message mode-line." nil nil)
(autoload 'doom-modeline-set-pdf-modeline "doom-modeline" "\
Set pdf mode-line." nil nil)
(autoload 'doom-modeline-set-org-src-modeline "doom-modeline" "\
Set org-src mode-line." nil nil)
(autoload 'doom-modeline-set-helm-modeline "doom-modeline" "\
Set helm mode-line.
\(fn &rest _)" nil nil)
(autoload 'doom-modeline-set-timemachine-modeline "doom-modeline" "\
Set timemachine mode-line." nil nil)
(defvar doom-modeline-mode nil "\
Non-nil if Doom-Modeline mode is enabled.
See the `doom-modeline-mode' command
for a description of this minor mode.
Setting this variable directly does not take effect;
either customize it (see the info node `Easy Customization')
or call the function `doom-modeline-mode'.")
(custom-autoload 'doom-modeline-mode "doom-modeline" nil)
(autoload 'doom-modeline-mode "doom-modeline" "\
Toggle doom-modeline on or off.
If called interactively, toggle `Doom-Modeline mode'. If the
prefix argument is positive, enable the mode, and if it is zero
or negative, disable the mode.
If called from Lisp, toggle the mode if ARG is `toggle'. Enable
the mode if ARG is nil, omitted, or is a positive number.
Disable the mode if ARG is a negative number.
The mode's hook is called both when the mode is enabled and when
it is disabled.
\(fn &optional ARG)" t nil)
(register-definition-prefixes "doom-modeline" '("doom-modeline-"))
;;;***
;;;### (autoloads nil "doom-modeline-core" "doom-modeline-core.el"
;;;;;; (0 0 0 0))
;;; Generated autoloads from doom-modeline-core.el
(register-definition-prefixes "doom-modeline-core" '("doom-modeline"))
;;;***
;;;### (autoloads nil "doom-modeline-env" "doom-modeline-env.el"
;;;;;; (0 0 0 0))
;;; Generated autoloads from doom-modeline-env.el
(autoload 'doom-modeline-env-setup-python "doom-modeline-env")
(autoload 'doom-modeline-env-setup-ruby "doom-modeline-env")
(autoload 'doom-modeline-env-setup-perl "doom-modeline-env")
(autoload 'doom-modeline-env-setup-go "doom-modeline-env")
(autoload 'doom-modeline-env-setup-elixir "doom-modeline-env")
(autoload 'doom-modeline-env-setup-rust "doom-modeline-env")
(register-definition-prefixes "doom-modeline-env" '("doom-modeline-"))
;;;***
;;;### (autoloads nil "doom-modeline-segments" "doom-modeline-segments.el"
;;;;;; (0 0 0 0))
;;; Generated autoloads from doom-modeline-segments.el
(register-definition-prefixes "doom-modeline-segments" '("doom-modeline-"))
;;;***
(provide 'doom-modeline-autoloads)
;; Local Variables:
;; version-control: never
;; no-byte-compile: t
;; no-update-autoloads: t
;; coding: utf-8
;; End:
;;; doom-modeline-autoloads.el ends here

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/doom-modeline/doom-modeline-core.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/doom-modeline/doom-modeline-env.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/doom-modeline/doom-modeline-segments.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/doom-modeline/doom-modeline.el

Binary file not shown.

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-Iosvkem-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-acario-dark-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-acario-light-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-ayu-light-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-ayu-mirage-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-challenger-deep-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-city-lights-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-dark+-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-dracula-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-ephemeral-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-fairy-floss-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-flatwhite-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-gruvbox-light-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-gruvbox-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-henna-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-homage-black-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-homage-white-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-horizon-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-laserwave-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-manegarm-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-material-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-miramare-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-molokai-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-monokai-classic-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-monokai-pro-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-monokai-spectrum-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-moonlight-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-nord-light-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-nord-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-nova-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-oceanic-next-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-old-hope-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-one-light-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-one-theme.el

View file

@ -0,0 +1 @@
/home/chris/.personal-emacs/straight/repos/emacs-doom-themes/themes/doom-opera-light-theme.el

Some files were not shown because too many files have changed in this diff Show more